git.iko.soy/elk
on master help sign in
Fix two typos.
e81bdc9evancz
elm/src/Types/Hints.hs+4−4
compare with master
unifiedsplit
@@ -47,9 +47,9 @@ shapes = [ numScheme (\n -> listOf (pairOf n) ==> pairOf n ==> shape) "polygon"
47 , "filled" -: color ==> shape ==> form
47 , "filled" -: color ==> shape ==> form
48 , "outlined" -: color ==> shape ==> form
48 , "outlined" -: color ==> shape ==> form
49 , "customOutline" -: listOf int ==> color ==> shape ==> form
49 , "customOutline" -: listOf int ==> color ==> shape ==> form
50− ] ++ map (numScheme (\n -> n ==> n ==> pairOf n ==> shape) [ "ngon"
50+ ] ++ map (numScheme (\n -> n ==> n ==> pairOf n ==> shape)) [ "ngon"
51− , "rect"
51+ , "rect"
52− , "oval" ]
52+ , "oval" ]
53
53
54
54
55-------- Foreign --------
55-------- Foreign --------
@@ -137,7 +137,7 @@ math =
137 [ numScheme (\t -> t ==> t) "abs" ] ++
137 [ numScheme (\t -> t ==> t) "abs" ] ++
138 hasType (binop float) [ "/", "logBase" ] ++
138 hasType (binop float) [ "/", "logBase" ] ++
139 hasType (binop int) ["rem","div","mod"] ++
139 hasType (binop int) ["rem","div","mod"] ++
140− hasType (float ==> float) ["sin","cos","tan","asin","acos","atan","sqrt"] ++
140+ hasType (float ==> float) ["sin","cos","tan","asin","acos","atan","sqrt"]
141
141
142bools =
142bools =
143 [ "not" -: bool ==> bool ] ++
143 [ "not" -: bool ==> bool ] ++