a test case for info.

This commit is contained in:
Kazu Yamamoto
2013-03-30 21:24:57 +09:00
parent 5aabca1e99
commit b87a1e0e39
2 changed files with 12 additions and 0 deletions

6
test/data/Info.hs Normal file
View File

@@ -0,0 +1,6 @@
module Info () where
fib :: Int -> Int
fib 0 = 0
fib 1 = 1
fib n = fib (n - 1) + fib (n - 2)