git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Add test for closing over an outer variable in a let binding
402263dPhil Freeman
examples/passing/Let.purs+7
@@ -41,6 +41,12 @@ test7 = let
41 f x = x
41 f x = x
42 in if f true then f 1 else f 2
42 in if f true then f 1 else f 2
43
43
44+test8 :: Number -> Number
45+test8 x = let
46+ go y | (x - 0.1 < y * y) && (y * y < x + 0.1) = y
47+ go y = go $ (y + x / y) / 2
48+ in go x
49+
44main = do
50main = do
45 Debug.Trace.print (test1 1)
51 Debug.Trace.print (test1 1)
46 Debug.Trace.print (test2 1 2)
52 Debug.Trace.print (test2 1 2)
@@ -49,3 +55,4 @@ main = do
49 Debug.Trace.print test5
55 Debug.Trace.print test5
50 Debug.Trace.print test6
56 Debug.Trace.print test6
51 Debug.Trace.print test7
57 Debug.Trace.print test7
58+ Debug.Trace.print (test8 100)