adding test cases for elisp.

This commit is contained in:
Kazu Yamamoto
2014-04-23 14:51:02 +09:00
parent 3ea98737b1
commit 1fdf8b2cc1
2 changed files with 49 additions and 0 deletions

21
test-elisp/inp.hs Normal file
View File

@@ -0,0 +1,21 @@
module Main where
test1 :: Int
test2 :: a -> a -> Complex a
test2 = (:+)
test25 :: NFData a => a
test25 = undefined
test3 :: (b -> b -> c) -> (a -> b) -> a -> a -> c
test3 = on
test4 = putStrLn "Bar"
test5 :: [t] -> ()
test5 (_:_) = ()
-- hlint
test6 :: [Integer] -> [Integer]
test6 = map (+ 1) . map (* 2)