git.iko.soy/elk
on master help sign in
cosmetic: switch from `fmap` to <$>
9ebce90Evan Czaplicki
src/Canonicalize/Variable.hs+2−2
compare with master
unifiedsplit
@@ -59,7 +59,7 @@ variable region env var =
59 logVar (Var.Canonical (Var.Module moduleName) varName)
59 logVar (Var.Canonical (Var.Module moduleName) varName)
60
60
61 _ ->
61 _ ->
62− case Set.toList `fmap` Map.lookup var (Env._values env) of
62+ case Set.toList <$> Map.lookup var (Env._values env) of
63 Just [v] ->
63 Just [v] ->
64 logVar v
64 logVar v
65
65
@@ -104,7 +104,7 @@ pvar
104 -> Int
104 -> Int
105 -> Result Var.Canonical
105 -> Result Var.Canonical
106pvar region env var actualArgs =
106pvar region env var actualArgs =
107− case Set.toList `fmap` Map.lookup var (Env._patterns env) of
107+ case Set.toList <$> Map.lookup var (Env._patterns env) of
108 Just [value] ->
108 Just [value] ->
109 foundArgCheck value
109 foundArgCheck value
110
110