Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Alex D
GHC
Commits
9767f141
Commit
9767f141
authored
Jan 23, 2003
by
simonpj
Browse files
[project @ 2003-01-23 14:30:25 by simonpj]
Add two new deriving tests
parent
65f38b66
Changes
4
Hide whitespace changes
Inline
Side-by-side
testsuite/tests/ghc-regress/deriving/should_fail/all.T
View file @
9767f141
...
...
@@ -3,4 +3,6 @@ test('drvfail001', normal, compile_fail, [''])
test
('
drvfail002
',
normal
,
compile_fail
,
[''])
test
('
drvfail003
',
normal
,
compile_fail
,
[''])
test
('
drvfail004
',
normal
,
compile_fail
,
[''])
test
('
drvfail005
',
normal
,
compile_fail
,
[''])
test
('
drvfail006
',
normal
,
compile_fail
,
[''])
test
('
drvfail007
',
normal
,
compile_fail
,
[''])
testsuite/tests/ghc-regress/deriving/should_fail/drvfail005.hs
0 → 100644
View file @
9767f141
module
ShouldFail
where
data
Test
a
=
T
a
deriving
(
Show
a
,
Read
)
testsuite/tests/ghc-regress/deriving/should_fail/drvfail005.stderr
0 → 100644
View file @
9767f141
drvfail005.hs:3:
Can't make a derived instance of `Show a (Test a)'
(`Show a' is not a class)
When deriving instances for type `Test'
testsuite/tests/ghc-regress/deriving/should_fail/drvfail006.hs
0 → 100644
View file @
9767f141
{-# OPTIONS -fglasgow-exts #-}
-- Testing the newtype-deriving stuff
module
ShouldFail
where
import
Control.Monad.State
newtype
T
a
=
T
(
StateT
Int
IO
a
)
deriving
(
MonadState
)
-- Here MonadState takes two type params,
-- but exactly one is needed.
\ No newline at end of file
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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