[Git][ghc/ghc][wip/js-staging] PrimOp: disable LabelThreadOp for now

[Sylvain Henry (@hsyl20)]

Sylvain Henry pushed to branch wip/js-staging at Glasgow Haskell Compiler / GHC


Commits:
00268fee by Sylvain Henry at 2022-08-12T14:44:55+02:00
PrimOp: disable LabelThreadOp for now

- - - - -


1 changed file:

- compiler/GHC/StgToJS/Prim.hs


Changes:

=====================================
compiler/GHC/StgToJS/Prim.hs
=====================================
@@ -915,7 +915,6 @@ genPrim prof ty op = case op of
   KillThreadOp  -> \[] [tid,ex]  -> PRPrimCall $ returnS (app "h$killThread" [tid,ex])
   YieldOp       -> \[] []        -> PRPrimCall $ returnS (app "h$yield" [])
   MyThreadIdOp  -> \[r] []       -> PrimInline $ r |= var "h$currentThread"
-  LabelThreadOp -> \[] [t,la,lo] -> PrimInline $ t .^ "label" |= ValExpr (JList [la, lo])
   IsCurrentThreadBoundOp -> \[r] [] -> PrimInline $ r |= one_
   NoDuplicateOp -> \[] [] -> PrimInline mempty -- don't need to do anything as long as we have eager blackholing
   ThreadStatusOp -> \[stat,cap,locked] [tid] -> PrimInline $ appT [stat, cap, locked] "h$threadStatus" [tid]
@@ -1124,6 +1123,7 @@ genPrim prof ty op = case op of
   SetThreadAllocationCounter        -> unhandledPrimop op
   GetThreadLabelOp                  -> unhandledPrimop op
   ListThreadsOp                     -> unhandledPrimop op
+  LabelThreadOp                     -> unhandledPrimop op -- \[] [t,la,lo] -> PrimInline $ t .^ "label" |= ValExpr (JList [la, lo])
 
   VecBroadcastOp _ _ _              -> unhandledPrimop op
   VecPackOp _ _ _                   -> unhandledPrimop op



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/00268feee9b12b679557f031f3233b68be01e56c

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/00268feee9b12b679557f031f3233b68be01e56c
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20220812/e63b6fd1/attachment-0001.html>