Skip to content
GitLab
Menu
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
GHC
Commits
3ad4e945
Commit
3ad4e945
authored
Apr 26, 2012
by
Simon Peyton Jones
Browse files
Test Trac
#5837
parent
02dd86da
Changes
3
Hide whitespace changes
Inline
Side-by-side
testsuite/tests/perf/compiler/T5837.hs
0 → 100644
View file @
3ad4e945
{-# LANGUAGE TypeFamilies #-}
module
T5837
where
type
family
TF
a
::
*
type
instance
TF
(
a
,
b
)
=
(
TF
a
,
TF
b
)
t
::
(
a
~
TF
(
a
,
Int
))
=>
Int
t
=
undefined
testsuite/tests/perf/compiler/T5837.stderr
0 → 100644
View file @
3ad4e945
T5837.hs:8:6:
Context reduction stack overflow; size = 51
Use -fcontext-stack=N to increase stack size to N
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
a)))))))))))))))))))))))))))))))))))))))))))))))))),
TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
Int)))))))))))))))))))))))))))))))))))))))))))))))))))
~ TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
(TF
a)))))))))))))))))))))))))))))))))))))))))))))))))
testsuite/tests/perf/compiler/all.T
View file @
3ad4e945
...
...
@@ -240,3 +240,14 @@ test('T5642',
compiler_stats_range_field
('
bytes allocated
',
3361296144
,
10
))
],
compile
,['
-O
'])
test
('
T5837
',
[
only_ways
(['
normal
']),
if_wordsize
(
32
,
# sample from x86/Linux
compiler_stats_range_field
('
bytes allocated
',
40000000
,
10
)),
# sample: 3926235424 (amd64/Linux, 15/2/2012)
if_wordsize
(
64
,
compiler_stats_range_field
('
bytes allocated
',
79110184
,
10
))
],
compile_fail
,['
-fcontext-stack=50
'])
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