@@ -66,7 +66,7 @@ module Prelude
6666
6767 foreign import cons
6868 "function cons(e) {\
69− \ return function (l) {\
69+ \ return function(l) {\
7070 \ return [e].concat(l);\
7171 \ };\
7272 \}" :: forall a. a -> [a] -> [a]
@@ -97,8 +97,8 @@ module Prelude
9797 show = showNumberImpl
9898
9999 foreign import showArrayImpl
100− "function showArrayImpl (f) {\
101− \ return function (xs) {\
100+ "function showArrayImpl(f) {\
101+ \ return function(xs) {\
102102 \ var ss = [];\
103103 \ for (var i = 0, l = xs.length; i < l; i++) {\
104104 \ ss[i] = f(xs[i]);\
@@ -327,10 +327,10 @@ module Prelude
327327
328328 foreign import unsafeCompareImpl
329329 "function unsafeCompareImpl(lt) {\
330− \ return function (eq) {\
331− \ return function (gt) {\
332− \ return function (x) {\
333− \ return function (y) {\
330+ \ return function(eq) {\
331+ \ return function(gt) {\
332+ \ return function(x) {\
333+ \ return function(y) {\
334334 \ return x < y ? lt : x > y ? gt : eq;\
335335 \ };\
336336 \ };\
@@ -803,7 +803,7 @@ module Control.Monad.Eff where
803803
804804 foreign import untilE "function untilE(f) {\
805805 \ return function() {\
806− \ while (!f()) { }\
806+ \ while (!f());\
807807 \ return {};\
808808 \ };\
809809 \}" :: forall e. Eff e Boolean -> Eff e Unit
@@ -878,7 +878,7 @@ module Control.Monad.ST where
878878 foreign import data STArray :: * -> * -> *
879879
880880 foreign import newSTRef "function newSTRef(val) {\
881− \ return function () {\
881+ \ return function() {\
882882 \ return { value: val };\
883883 \ };\
884884 \}" :: forall a h r. a -> Eff (st :: ST h | r) (STRef h a)