Commit 7457641d authored by simonpj's avatar simonpj

[project @ 2003-02-06 09:30:14 by simonpj]

Add error-message test
parent ce35c343
......@@ -6,3 +6,4 @@ test('drvfail004', normal, compile_fail, [''])
test('drvfail005', normal, compile_fail, [''])
test('drvfail006', normal, compile_fail, [''])
test('drvfail007', normal, compile_fail, [''])
test('drvfail008', normal, compile_fail, [''])
-- Should fail without -fglasgow-exts
-- Succeeds with -fglasgow-exts
module ShouldFail where
import Control.Monad.State
data S = S Int
newtype M a = M (StateT S IO a) deriving( Monad )
drvfail008.hs:10:
Can't make a derived instance of `Monad M'
(`Monad' is not a derivable class
Try -fglasgow-exts for GHC's newtype-deriving extension)
When deriving instances for type `M'
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