diff options
Diffstat (limited to 'ghc/compiler/tests/reader/read004.hs')
| -rw-r--r-- | ghc/compiler/tests/reader/read004.hs | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/ghc/compiler/tests/reader/read004.hs b/ghc/compiler/tests/reader/read004.hs new file mode 100644 index 0000000000..77ab5a0268 --- /dev/null +++ b/ghc/compiler/tests/reader/read004.hs @@ -0,0 +1,43 @@ +--!!! string gaps +--!!! + +----------- + +main = appendChan stdout "\ + +\Some girls give me money\n\ + +\Some girls buy me clothes\n\ + +\..." + exit done + +----------- + +main2 = appendChan stdout "\ +\ \ +..." exit done + +----------- + +main3 = appendChan stdout "\ + +\Some girls give me money\n\ +-- and here is a comment +\Some girls buy me clothes\n\ + +\..." + exit done + +----------- + +main3 = appendChan stdout "\ +{- + and here is a nested {- comment -} +-} +\Some girls give me money\n\ + +\Some girls buy me clothes\n\ + +\..." + exit done |