summaryrefslogtreecommitdiff
path: root/testsuite/tests/stranal
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2021-06-15 08:41:46 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-07-29 13:13:21 -0400
commit4d5b4ed24ef8cecd7b74d1a3d54f443e1216b22d (patch)
treef37d973e1e414e53527750f5cf3fa70767e4bd89 /testsuite/tests/stranal
parente6731578246b6e6959026d4a9da9971b097c83aa (diff)
downloadhaskell-4d5b4ed24ef8cecd7b74d1a3d54f443e1216b22d.tar.gz
compiler: Name generated locals more descriptively
Previously `GHC.Types.Id.Make.newLocal` would name all locals `dt`, making it unnecessarily difficult to determine their origin. Noticed while looking at #19557.
Diffstat (limited to 'testsuite/tests/stranal')
-rw-r--r--testsuite/tests/stranal/should_compile/T16029.stdout5
1 files changed, 3 insertions, 2 deletions
diff --git a/testsuite/tests/stranal/should_compile/T16029.stdout b/testsuite/tests/stranal/should_compile/T16029.stdout
index 76bf2617fb..20861eac28 100644
--- a/testsuite/tests/stranal/should_compile/T16029.stdout
+++ b/testsuite/tests/stranal/should_compile/T16029.stdout
@@ -1,6 +1,7 @@
:: Int %1 -> Int %1 -> T
- Tmpl= \ (dt [Occ=Once1!] :: Int) (dt [Occ=Once1!] :: Int) ->
- = \ (dt [Occ=Once1!] :: Int) (dt [Occ=Once1!] :: Int) ->
+ Tmpl= \ (conrep [Occ=Once1!] :: Int)
+ (conrep [Occ=Once1!] :: Int) ->
+ = \ (conrep [Occ=Once1!] :: Int) (conrep [Occ=Once1!] :: Int) ->
:: GHC.Prim.Int# -> GHC.Prim.Int#
= \ (ww :: GHC.Prim.Int#) ->
g2 [InlPrag=[2]] :: T -> Int -> Int