diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2012-10-14 13:03:32 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2012-10-19 12:03:16 +0100 |
| commit | 6fbd46b0bb3ee56160b8216cb2a3bb718ccb41c2 (patch) | |
| tree | 8e8c569d0989f89c66a6ccd0d59a466266130649 /compiler/ghci/ByteCodeInstr.lhs | |
| parent | 53810006bbcd3fc9b58893858f95c3432cb33f0e (diff) | |
| download | haskell-6fbd46b0bb3ee56160b8216cb2a3bb718ccb41c2.tar.gz | |
Remove the old codegen
Except for CgUtils.fixStgRegisters that is used in the NCG and LLVM
backends, and should probably be moved somewhere else.
Diffstat (limited to 'compiler/ghci/ByteCodeInstr.lhs')
| -rw-r--r-- | compiler/ghci/ByteCodeInstr.lhs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/ghci/ByteCodeInstr.lhs b/compiler/ghci/ByteCodeInstr.lhs index ed49960709..7fc84ae214 100644 --- a/compiler/ghci/ByteCodeInstr.lhs +++ b/compiler/ghci/ByteCodeInstr.lhs @@ -22,6 +22,7 @@ module ByteCodeInstr ( import ByteCodeItbls ( ItblPtr ) +import StgCmmLayout ( ArgRep(..) ) import PprCore import Type import Outputable @@ -34,7 +35,6 @@ import DataCon import VarSet import PrimOp import SMRep -import ClosureInfo -- CgRep stuff import Module (Module) import GHC.Exts @@ -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) ArgRep -- 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 ArgRep -- return an unlifted value, here's its rep -- Breakpoints | BRK_FUN (MutableByteArray# RealWorld) Word16 BreakInfo |