Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
GHC
Commits
5dc393d7
Commit
5dc393d7
authored
Apr 24, 2009
by
Ian Lynagh
Browse files
Also test the other part of
#2806
in tcfail203
parent
27bf63ea
Changes
3
Hide whitespace changes
Inline
Side-by-side
testsuite/tests/ghc-regress/typecheck/should_fail/all.T
View file @
5dc393d7
...
...
@@ -198,9 +198,7 @@ test('tcfail199', normal, compile_fail, [''])
test
('
tcfail200
',
normal
,
compile_fail
,
[''])
test
('
tcfail201
',
normal
,
compile_fail
,
[''])
test
('
tcfail202
',
normal
,
compile_fail
,
[''])
# -Werror is a temporary hack. Once GHC makes this an error, rather
# than a warning, we won't need it.
test
('
tcfail203
',
normal
,
compile_fail
,
['
-Werror
'])
test
('
tcfail203
',
expect_broken
(
2806
),
compile_fail
,
[''])
test
('
T1899
',
normal
,
compile_fail
,
[''])
test
('
T2126
',
normal
,
compile_fail
,
[''])
...
...
testsuite/tests/ghc-regress/typecheck/should_fail/tcfail203.hs
View file @
5dc393d7
...
...
@@ -48,3 +48,6 @@ fail8 = 'a'
fail9
=
'a'
where
(
#
b
,
!
x
#
)
=
(
#
True
,
5
#
#
)
fail10
=
'a'
where
!
(
b
,
~
(
c
,
(
I
#
x
)))
=
(
True
,
(
False
,
5
))
testsuite/tests/ghc-regress/typecheck/should_fail/tcfail203.stderr
View file @
5dc393d7
...
...
@@ -71,6 +71,9 @@ tcfail203.hs:49:10:
where
(# b, !x #) = (# True, 5# #)
<no location info>:
Failing due to -Werror.
tcfail203.hs:52:15:
A lazy (~) pattern cannot contain unlifted types ~(c, (I# x))
In the pattern: ~(c, (I# x))
In the pattern: (b, ~(c, (I# x)))
In the pattern: !(b, ~(c, (I# x)))
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment