Skip to content

Commit

Permalink
More test data.
Browse files Browse the repository at this point in the history
  • Loading branch information
23Skidoo committed Oct 27, 2011
1 parent 9a1365c commit 4780a8a
Show file tree
Hide file tree
Showing 13 changed files with 74 additions and 0 deletions.
10 changes: 10 additions & 0 deletions tests/data/executable-lhs-mutrec/A.lhs
Original file line number Diff line number Diff line change
@@ -0,0 +1,10 @@
> module A
> where
>
> import qualified B
>
> exportedString :: String
> exportedString = "another string"
>
> aString :: String
> aString = B.exportedString
4 changes: 4 additions & 0 deletions tests/data/executable-lhs-mutrec/A.lhs-boot
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
> module A
> where
>
> exportedString :: String
10 changes: 10 additions & 0 deletions tests/data/executable-lhs-mutrec/B.hs
Original file line number Diff line number Diff line change
@@ -0,0 +1,10 @@
module B
where

import {-# SOURCE #-} qualified A

exportedString :: String
exportedString = "test string"

bString :: String
bString = A.exportedString
5 changes: 5 additions & 0 deletions tests/data/executable-lhs-mutrec/C/C.hs
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
module C.C
where

cString :: IO ()
cString = print "C.cString"
9 changes: 9 additions & 0 deletions tests/data/executable-lhs-mutrec/Main.hs
Original file line number Diff line number Diff line change
@@ -0,0 +1,9 @@
module Main
where

import A
import B
import qualified C.C as C

main :: IO ()
main = print aString >> print bString >> C.cString
3 changes: 3 additions & 0 deletions tests/data/executable-lhs-mutrec/OUTPUT
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
"test string"
"another string"
"C.cString"
5 changes: 5 additions & 0 deletions tests/data/executable-lhs/A.lhs
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
> module A
> where
>
> aString :: String
> aString = "test string"
5 changes: 5 additions & 0 deletions tests/data/executable-lhs/B.hs
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
module B
where

bString :: String
bString = "another string"
5 changes: 5 additions & 0 deletions tests/data/executable-lhs/C/C.hs
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
module C.C
where

cString :: IO ()
cString = print "C.cString"
9 changes: 9 additions & 0 deletions tests/data/executable-lhs/Main.hs
Original file line number Diff line number Diff line change
@@ -0,0 +1,9 @@
module Main
where

import A
import B
import qualified C.C as C

main :: IO ()
main = print aString >> print bString >> C.cString
3 changes: 3 additions & 0 deletions tests/data/executable-lhs/OUTPUT
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
"test string"
"another string"
"C.cString"
3 changes: 3 additions & 0 deletions tests/data/executable-mutrec/OUTPUT
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
"test string"
"another string"
"C.cString"
3 changes: 3 additions & 0 deletions tests/data/executable/OUTPUT
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
"test string"
"another string"
"C.cString"

0 comments on commit 4780a8a

Please sign in to comment.