Hannes Siebenhandl pushed to branch wip/fendor/hpc-bc-support at Glasgow Haskell Compiler / GHC
Commits:
-
0ea85353
by fendor at 2026-04-03T10:08:12+02:00
2 changed files:
Changes:
| ... | ... | @@ -41,8 +41,8 @@ hpcAddModule modlName ticks hash tickboxes = do |
| 41 | 41 | -- calling 'hpc_startup' multiple times is safe, it will only be initialised once.
|
| 42 | 42 | hpc_startup
|
| 43 | 43 | |
| 44 | -foreign import ccall "hs_hpc_module"
|
|
| 44 | +foreign import ccall unsafe "hs_hpc_module"
|
|
| 45 | 45 | hpc_register_module :: CString -> Word32 -> Word32 -> Ptr Word64 -> IO ()
|
| 46 | 46 | |
| 47 | -foreign import ccall "startupHpc"
|
|
| 47 | +foreign import ccall usnafe "startupHpc"
|
|
| 48 | 48 | hpc_startup :: IO () |
| ... | ... | @@ -600,6 +600,7 @@ extern char **environ; |
| 600 | 600 | SymI_HasProto(hs_free_fun_ptr) \
|
| 601 | 601 | SymI_HasProto(hs_hpc_rootModule) \
|
| 602 | 602 | SymI_HasProto(hs_hpc_module) \
|
| 603 | + SymI_HasProto(startupHpc) \
|
|
| 603 | 604 | SymI_HasProto(hs_thread_done) \
|
| 604 | 605 | SymI_HasProto(hs_try_putmvar) \
|
| 605 | 606 | SymI_HasProto(hs_try_putmvar_with_value) \
|