Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Alex D
GHC
Commits
8adef36c
Commit
8adef36c
authored
Dec 22, 2018
by
Ömer Sinan Ağacan
Browse files
Add test for #16038
parent
6d2f6df3
Changes
6
Hide whitespace changes
Inline
Side-by-side
testsuite/tests/simplCore/should_compile/T16038/A.hs
0 → 100644
View file @
8adef36c
module
A
where
import
B
data
HsExpr
id
=
HsOverLit
(
HsOverLit
id
)
|
HsBracketOut
(
HsExpr
id
)
deriving
Eq
testsuite/tests/simplCore/should_compile/T16038/A.hs-boot
0 → 100644
View file @
8adef36c
module
A
where
data
HsExpr
i
instance
Eq
i
=>
Eq
(
HsExpr
i
)
testsuite/tests/simplCore/should_compile/T16038/B.hs
0 → 100644
View file @
8adef36c
module
B
where
import
{-#
SOURCE
#-
}
A
(
HsExpr
)
data
HsOverLit
id
=
OverLit
(
HsExpr
id
)
deriving
Eq
testsuite/tests/simplCore/should_compile/T16038/Makefile
0 → 100644
View file @
8adef36c
TOP
=
../../../..
include
$(TOP)/mk/boilerplate.mk
include
$(TOP)/mk/test.mk
T16038
:
'
$(TEST_HC)
'
$(TEST_HC_OPTS)
-O
-c
A.hs-boot
'
$(TEST_HC)
'
$(TEST_HC_OPTS)
-O
-c
B.hs
# All `fEqHsExpr` bindings should be in one recursive group:
'
$(TEST_HC)
'
$(TEST_HC_OPTS)
-O
-c
A.hs
-ddump-simpl
-dsuppress-all
|
\
grep
-e
"^
\$
$fEqHsExpr
"
-e
"Rec"
testsuite/tests/simplCore/should_compile/T16038/T16038.stdout
0 → 100644
View file @
8adef36c
Rec {
$fEqHsExpr_$c/=
$fEqHsExpr_$c/=
$fEqHsExpr
$fEqHsExpr
$fEqHsExpr_$c==
$fEqHsExpr_$c==
end Rec }
testsuite/tests/simplCore/should_compile/T16038/test.T
0 → 100644
View file @
8adef36c
test
('
T16038
',
[
extra_files
(['
A.hs
',
'
A.hs-boot
',
'
B.hs
'])],
run_command
,
['
$MAKE -s --no-print-directory T16038
'])
Write
Preview
Markdown
is supported
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