diff options
Diffstat (limited to 'libraries/base/GHC/Stack/CCS.hsc')
-rw-r--r-- | libraries/base/GHC/Stack/CCS.hsc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/GHC/Stack/CCS.hsc b/libraries/base/GHC/Stack/CCS.hsc index b6d3f83b94..274202efd6 100644 --- a/libraries/base/GHC/Stack/CCS.hsc +++ b/libraries/base/GHC/Stack/CCS.hsc @@ -76,7 +76,7 @@ clearCCS :: IO a -> IO a clearCCS (IO m) = IO $ \s -> clearCCS## m s -- | Get the 'CostCentre' at the head of a 'CostCentreStack'. -#if defined(js_HOST_ARCH) +#if defined(javascript_HOST_ARCH) ccsCC :: Ptr CostCentreStack -> IO (Ptr CostCentre) ccsCC p = peekByteOff p 4 |