Commit b8c44942 authored by simonpj's avatar simonpj
Browse files

Test for Trac #1930

parent a47b664f
......@@ -48,6 +48,7 @@ test('ghci029', normal, ghci_script, ['ghci029.script'])
test('ghci030', normal, ghci_script, ['ghci030.script'])
test('ghci031', expect_broken(2138), ghci_script, ['ghci031.script'])
test('ghci032', if_compiler_lt('ghc', '6.9', skip), ghci_script, ['ghci032.script'])
test('ghci033', normal, ghci_script, ['ghci033.script'])
extra_clean(['T1914A.hs', 'T1914B.hs']),
-- Test Trac #1930: display of infix constructors
module Test where
data Foo = Foo1 Int
| Int `InfixCon` Bool
\ No newline at end of file
data Foo = Foo1 Int | Int `InfixCon` Bool
-- Defined at ghci033.hs:4:5-7
Supports Markdown
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