projects / ghc-hetmet.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
[project @ 1997-07-26 23:49:03 by sof]
[ghc-hetmet.git] / ghc / tests / stranal / should_compile / fact.lhs
1 > module Test where
2 > fact :: Int -> Int
3 > fact n = if n==0 then 2 else (fact n) * n
Glasgow Haskell Compiler with heterogeneous metaprogramming (generalized arrows and modal types)