summaryrefslogtreecommitdiff
path: root/compiler/GHC/StgToJS/Monad.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/StgToJS/Monad.hs')
-rw-r--r--compiler/GHC/StgToJS/Monad.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/StgToJS/Monad.hs b/compiler/GHC/StgToJS/Monad.hs
index 2c4575dd9e..f64275c399 100644
--- a/compiler/GHC/StgToJS/Monad.hs
+++ b/compiler/GHC/StgToJS/Monad.hs
@@ -180,4 +180,4 @@ globalOccs jst = do
let g = GlobalOcc i gid 1
in go (addToUFM_C inc gids i g) is
- pure $ go emptyUFM (identsS jst)
+ pure $ go emptyUFM (identsS $ satJStat jst)