primOpType, primOpSig,
primOpTag, maxPrimOpTag, primOpOcc,
+ tagToEnumKey,
+
primOpOutOfLine, primOpNeedsWrapper,
primOpOkForSpeculation, primOpIsCheap, primOpIsDupable,
import Type ( Type, mkForAllTys, mkFunTy, mkFunTys, tyConAppTyCon,
typePrimRep )
import BasicTypes ( Arity, Boxity(..) )
+import Unique ( Unique, mkPrimOpIdUnique )
import Outputable
import FastTypes
\end{code}
#include "primop-list.hs-incl"
\end{code}
+\begin{code}
+tagToEnumKey :: Unique
+tagToEnumKey = mkPrimOpIdUnique (primOpTag TagToEnumOp)
+\end{code}
+
+
+
%************************************************************************
%* *
\subsection[PrimOp-info]{The essential info about each @PrimOp@}