Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Dylan Yudaken
GHC
Commits
3101c496
Commit
3101c496
authored
Jul 18, 2011
by
Simon Peyton Jones
Browse files
Accept wibble in core-syntax printing
parent
c9d1b379
Changes
3
Hide whitespace changes
Inline
Side-by-side
testsuite/tests/ghc-regress/simplCore/should_compile/T4908.stderr
View file @
3101c496
...
...
@@ -64,9 +64,9 @@ T4908.f =
------ Local rules for imported ids --------
"SC:$wf0" [ALWAYS]
forall
{
sc :: GHC.Types.Int
sc1 :: GHC.Prim.Int#
sc2 :: GHC.Prim.Int#
}
forall
(
sc :: GHC.Types.Int
)
(
sc1 :: GHC.Prim.Int#
)
(
sc2 :: GHC.Prim.Int#
).
T4908.$wf sc2 (sc, GHC.Types.I# sc1)
= T4908.f_$s$wf sc sc1 sc2
...
...
testsuite/tests/ghc-regress/simplCore/should_compile/spec-inline.stderr
View file @
3101c496
...
...
@@ -144,7 +144,7 @@ Roman.foo =
------ Local rules for imported ids --------
"SC:$wgo0" [ALWAYS]
forall
{
sc :: GHC.Prim.Int#
sc1 :: GHC.Prim.Int#
}
forall
(
sc :: GHC.Prim.Int#
) (
sc1 :: GHC.Prim.Int#
).
Roman.$wgo (Data.Maybe.Just @ GHC.Types.Int (GHC.Types.I# sc1))
(Data.Maybe.Just @ GHC.Types.Int (GHC.Types.I# sc))
= Roman.foo_$s$wgo sc sc1
...
...
testsuite/tests/ghc-regress/simplCore/should_run/T2486.stderr
View file @
3101c496
==================== Tidy Core rules ====================
"SPEC Main.fib [GHC.Types.Double]" [ALWAYS]
forall
{
$dNum :: GHC.Num.Num GHC.Types.Double
$dOrd :: GHC.Classes.Ord GHC.Types.Double
}
forall
(
$dNum :: GHC.Num.Num GHC.Types.Double
)
(
$dOrd :: GHC.Classes.Ord GHC.Types.Double
).
Main.fib @ GHC.Types.Double $dNum $dOrd
= Main.fib_$sfib1
"SPEC Main.fib [GHC.Types.Int]" [ALWAYS]
forall
{
$dNum :: GHC.Num.Num GHC.Types.Int
$dOrd :: GHC.Classes.Ord GHC.Types.Int
}
forall
(
$dNum :: GHC.Num.Num GHC.Types.Int
)
(
$dOrd :: GHC.Classes.Ord GHC.Types.Int
).
Main.fib @ GHC.Types.Int $dNum $dOrd
= Main.fib_$sfib
"SPEC Main.tak [GHC.Types.Double]" [ALWAYS]
forall
{
$dNum :: GHC.Num.Num GHC.Types.Double
$dOrd :: GHC.Classes.Ord GHC.Types.Double
}
forall
(
$dNum :: GHC.Num.Num GHC.Types.Double
)
(
$dOrd :: GHC.Classes.Ord GHC.Types.Double
).
Main.tak @ GHC.Types.Double $dNum $dOrd
= Main.tak_$stak1
"SPEC Main.tak [GHC.Types.Int]" [ALWAYS]
forall
{
$dNum :: GHC.Num.Num GHC.Types.Int
$dOrd :: GHC.Classes.Ord GHC.Types.Int
}
forall
(
$dNum :: GHC.Num.Num GHC.Types.Int
)
(
$dOrd :: GHC.Classes.Ord GHC.Types.Int
).
Main.tak @ GHC.Types.Int $dNum $dOrd
= Main.tak_$stak
...
...
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