Simon Peyton Jones pushed to branch wip/T24464 at Glasgow Haskell Compiler / GHC
Commits:
-
1a6aff80
by Simon Peyton Jones at 2026-01-29T13:50:26+00:00
4 changed files:
- testsuite/tests/codeGen/should_run/CgStaticPointersNoFullLazyness.hs
- testsuite/tests/ghci/scripts/T20150.stdout
- testsuite/tests/parser/should_compile/DumpRenamedAst.stderr
- testsuite/tests/parser/should_compile/T14189.stderr
Changes:
| ... | ... | @@ -15,9 +15,9 @@ main = do |
| 15 | 15 | print $ deRefStaticPtr (static g)
|
| 16 | 16 | print $ deRefStaticPtr p0 'a'
|
| 17 | 17 | print $ deRefStaticPtr (static t_field) $ T 'b'
|
| 18 | - where
|
|
| 19 | - g :: String
|
|
| 20 | - g = "found"
|
|
| 18 | + |
|
| 19 | +g :: String
|
|
| 20 | +g = "found"
|
|
| 21 | 21 | |
| 22 | 22 | lookupKey :: StaticPtr a -> IO a
|
| 23 | 23 | lookupKey p = unsafeLookupStaticPtr (staticKey p) >>= \case
|
| ... | ... | @@ -2,5 +2,3 @@ Collecting type info for 1 module(s) ... |
| 2 | 2 | T20150.hs:(7,1)-(7,3): GHC.Internal.StaticPtr.StaticPtr GHC.Internal.Types.Int
|
| 3 | 3 | T20150.hs:(7,14)-(7,14): GHC.Internal.Types.Int
|
| 4 | 4 | T20150.hs:(7,7)-(7,14): GHC.Internal.StaticPtr.StaticPtr GHC.Internal.Types.Int |
| 5 | -T20150.hs:(7,7)-(7,14): GHC.Internal.StaticPtr.StaticPtr GHC.Internal.Types.Int -> GHC.Internal.StaticPtr.StaticPtr GHC.Internal.Types.Int
|
|
| 6 | -T20150.hs:(7,7)-(7,14): GHC.Internal.StaticPtr.StaticPtr GHC.Internal.Types.Int |
| ... | ... | @@ -6,7 +6,7 @@ |
| 6 | 6 | (HsGroup
|
| 7 | 7 | (NoExtField)
|
| 8 | 8 | (XValBindsLR
|
| 9 | - (NValBinds
|
|
| 9 | + (HsVBG
|
|
| 10 | 10 | [((,)
|
| 11 | 11 | (NonRecursive)
|
| 12 | 12 | [(L
|
| ... | ... | @@ -6,7 +6,7 @@ |
| 6 | 6 | (HsGroup
|
| 7 | 7 | (NoExtField)
|
| 8 | 8 | (XValBindsLR
|
| 9 | - (NValBinds
|
|
| 9 | + (HsVBG
|
|
| 10 | 10 | []
|
| 11 | 11 | []))
|
| 12 | 12 | []
|