summaryrefslogtreecommitdiff
path: root/ghc/compiler/tests/stranal/fact.lhs
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/compiler/tests/stranal/fact.lhs')
-rw-r--r--ghc/compiler/tests/stranal/fact.lhs2
1 files changed, 2 insertions, 0 deletions
diff --git a/ghc/compiler/tests/stranal/fact.lhs b/ghc/compiler/tests/stranal/fact.lhs
new file mode 100644
index 0000000000..2507c6b41a
--- /dev/null
+++ b/ghc/compiler/tests/stranal/fact.lhs
@@ -0,0 +1,2 @@
+> fact :: Int -> Int
+> fact n = if n==0 then 2 else (fact n) * n