summaryrefslogtreecommitdiff
path: root/compiler/ghci/ByteCodeInstr.lhs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/ghci/ByteCodeInstr.lhs')
-rw-r--r--compiler/ghci/ByteCodeInstr.lhs4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/ghci/ByteCodeInstr.lhs b/compiler/ghci/ByteCodeInstr.lhs
index ada0be6f0f..d86942305c 100644
--- a/compiler/ghci/ByteCodeInstr.lhs
+++ b/compiler/ghci/ByteCodeInstr.lhs
@@ -75,7 +75,7 @@ data BCInstr
-- Push an alt continuation
| PUSH_ALTS (ProtoBCO Name)
- | PUSH_ALTS_UNLIFTED (ProtoBCO Name) CgRep
+ | PUSH_ALTS_UNLIFTED (ProtoBCO Name) [CgRep]
-- Pushing literals
| PUSH_UBX (Either Literal (Ptr ())) Word16
@@ -147,7 +147,7 @@ data BCInstr
-- To Infinity And Beyond
| ENTER
| RETURN -- return a lifted value
- | RETURN_UBX CgRep -- return an unlifted value, here's its rep
+ | RETURN_UBX [CgRep] -- return an unlifted value, here's its rep
-- Breakpoints
| BRK_FUN (MutableByteArray# RealWorld) Word16 BreakInfo