diff options
Diffstat (limited to 'compiler/codeGen/StgCmmMonad.hs')
| -rw-r--r-- | compiler/codeGen/StgCmmMonad.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/codeGen/StgCmmMonad.hs b/compiler/codeGen/StgCmmMonad.hs index 7ddbcd6cbc..dd82b7f941 100644 --- a/compiler/codeGen/StgCmmMonad.hs +++ b/compiler/codeGen/StgCmmMonad.hs @@ -227,6 +227,10 @@ data Sequel -- may allocate (e.g. it's a foreign call or -- allocating primOp) +instance Outputable Sequel where + ppr (Return b) = ptext (sLit "Return") <+> ppr b + ppr (AssignTo regs b) = ptext (sLit "AssignTo") <+> ppr regs <+> ppr b + -- See Note [sharing continuations] below data ReturnKind = AssignedDirectly |