ghc-mod/test/data/non-exported/Fib.hs

9 lines
149 B
Haskell
Raw Normal View History

2015-03-05 15:50:06 +00:00
{-# LANGUAGE TemplateHaskell #-} -- for HscInterpreted
module Fib () where
fib :: Int -> Int
fib 0 = 0
fib 1 = 1
fib n = fib (n - 1) + fib (n - 2)