Commit 14332335 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Add a test for trac #314 (#line pragmas not respected inside nested comments)

parent 88bb3591
......@@ -38,3 +38,4 @@ test('read028', normal, compile_fail, [''])
test('read029', normal, compile_fail, [''])
test('read030', normal, compile_fail, [''])
test('read031', normal, compile_fail, [''])
test('read032', normal, compile_fail, ['-cpp'])
-- Test for trac #314
{-
/*
This
uses
up
some
lines
This
uses
up
some
lines
*/
-}
module ShouldFail where
type_error = "Type error on line 21":"Type error on line 21"
read032.hs:21:37:
Couldn't match expected type `[Char]' against inferred type `Char'
Expected type: [[Char]]
Inferred type: [Char]
In the second argument of `(:)', namely `"Type error on line 21"'
In the expression:
"Type error on line 21" : "Type error on line 21"
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment