diff options
Diffstat (limited to 'testsuite/tests/arityanal/f2.hs')
-rw-r--r-- | testsuite/tests/arityanal/f2.hs | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/testsuite/tests/arityanal/f2.hs b/testsuite/tests/arityanal/f2.hs index bdc06e45f2..39ddae0f06 100644 --- a/testsuite/tests/arityanal/f2.hs +++ b/testsuite/tests/arityanal/f2.hs @@ -1,7 +1,7 @@ -module F2 where
-
-f2f = \h -> \x -> h x 0
-f2 = let g = \x -> \y -> if (x > 0)
- then g (x-1) (x+y)
- else y
- in f2f g 5
\ No newline at end of file +module F2 where + +f2f = \h -> \x -> h x 0 +f2 = let g = \x -> \y -> if (x > 0) + then g (x-1) (x+y) + else y + in f2f g 5 |