diff options
| author | Łukasz Hanuszczak <lukasz.hanuszczak@gmail.com> | 2015-08-19 17:07:25 +0200 |
|---|---|---|
| committer | Łukasz Hanuszczak <lukasz.hanuszczak@gmail.com> | 2015-08-22 23:40:28 +0200 |
| commit | 3378ef409170ae1f319c934876d2b9e1a14bb9a8 (patch) | |
| tree | 8750a9412a1f2ba91a7e248149480354d8e0e6e3 /hoogle-test/src/modules | |
| parent | 7d0317a9210ddbb4f00976318910018fa9abea99 (diff) | |
Create simple test cases for Hoogle backend.
Diffstat (limited to 'hoogle-test/src/modules')
| -rw-r--r-- | hoogle-test/src/modules/Bar.hs | 12 | ||||
| -rw-r--r-- | hoogle-test/src/modules/Foo.hs | 9 |
2 files changed, 21 insertions, 0 deletions
diff --git a/hoogle-test/src/modules/Bar.hs b/hoogle-test/src/modules/Bar.hs new file mode 100644 index 00000000..156a835f --- /dev/null +++ b/hoogle-test/src/modules/Bar.hs @@ -0,0 +1,12 @@ +module Bar where + + +import Foo + + +bar :: Int -> Int +bar x = foo' x x + + +bar' :: Int -> Int -> Int +bar' x y = foo' (bar (foo x)) (bar (foo y)) diff --git a/hoogle-test/src/modules/Foo.hs b/hoogle-test/src/modules/Foo.hs new file mode 100644 index 00000000..6581fe4c --- /dev/null +++ b/hoogle-test/src/modules/Foo.hs @@ -0,0 +1,9 @@ +module Foo where + + +foo :: Int -> Int +foo = (* 2) + + +foo' :: Int -> Int -> Int +foo' x y = foo x + foo y |