import GHC.Ptr
import Module (Module)
-import GHC.Prim
+import GHC.Exts
-- ----------------------------------------------------------------------------
| CASEFAIL
| JMP LocalLabel
- -- For doing calls to C (via glue code generated by ByteCodeFFI)
+ -- For doing calls to C (via glue code generated by ByteCodeFFI, or libffi)
| CCALL Int -- stack frame size
(Ptr ()) -- addr of the glue code