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
b8c44942
Commit
b8c44942
authored
Aug 04, 2008
by
simonpj
Browse files
Test for Trac #1930
parent
a47b664f
Changes
4
Hide whitespace changes
Inline
Side-by-side
testsuite/tests/ghc-regress/ghci/scripts/all.T
View file @
b8c44942
...
...
@@ -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
'])
test
('
1914
',
extra_clean
(['
T1914A.hs
',
'
T1914B.hs
']),
...
...
testsuite/tests/ghc-regress/ghci/scripts/ghci033.hs
0 → 100644
View file @
b8c44942
-- Test Trac #1930: display of infix constructors
module
Test
where
data
Foo
=
Foo1
Int
|
Int
`
InfixCon
`
Bool
\ No newline at end of file
testsuite/tests/ghc-regress/ghci/scripts/ghci033.script
0 → 100644
View file @
b8c44942
:l ghci033
:i Foo
testsuite/tests/ghc-regress/ghci/scripts/ghci033.stdout
0 → 100644
View file @
b8c44942
data Foo = Foo1 Int | Int `InfixCon` Bool
-- Defined at ghci033.hs:4:5-7
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