Cheng Shao pushed to branch wip/fix-ipe-bytecodeIPE-test at Glasgow Haskell Compiler / GHC
Commits:
-
cda90980
by Cheng Shao at 2026-07-13T06:46:10+02:00
1 changed file:
Changes:
| ... | ... | @@ -3,10 +3,8 @@ module BytecodeIPE where |
| 3 | 3 | import Data.Maybe (isJust)
|
| 4 | 4 | import GHC.InfoProv (whereFrom)
|
| 5 | 5 | |
| 6 | -marker :: String
|
|
| 7 | -marker = id "bytecode-stub-init"
|
|
| 8 | -{-# NOINLINE marker #-}
|
|
| 6 | +data Marker = Marker
|
|
| 9 | 7 | |
| 10 | 8 | -- `whereFrom` only succeeds if the module's IPE initializer ran.
|
| 11 | 9 | probe :: IO Bool
|
| 12 | -probe = isJust <$> whereFrom marker |
|
| 10 | +probe = isJust <$> whereFrom Marker |