diff options
Diffstat (limited to 'ghc/compiler/deSugar/DsCCall.lhs')
| -rw-r--r-- | ghc/compiler/deSugar/DsCCall.lhs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/ghc/compiler/deSugar/DsCCall.lhs b/ghc/compiler/deSugar/DsCCall.lhs index fbae35c89b..47eb7c1b56 100644 --- a/ghc/compiler/deSugar/DsCCall.lhs +++ b/ghc/compiler/deSugar/DsCCall.lhs @@ -8,7 +8,7 @@ module DsCCall ( dsCCall ) where -import Ubiq +IMP_Ubiq() import CoreSyn @@ -23,15 +23,13 @@ import PprType ( GenType{-instances-} ) import Pretty import PrelVals ( packStringForCId ) import PrimOp ( PrimOp(..) ) -import Type ( isPrimType, maybeAppDataTyConExpandingDicts, eqTy ) +import Type ( isPrimType, maybeAppDataTyConExpandingDicts, eqTy, maybeBoxedPrimType ) import TysPrim ( byteArrayPrimTy, realWorldTy, realWorldStatePrimTy ) import TysWiredIn ( getStatePairingConInfo, realWorldStateTy, stateDataCon, stringTy ) import Util ( pprPanic, pprError, panic ) - -maybeBoxedPrimType = panic "DsCCall.maybeBoxedPrimType" \end{code} Desugaring of @ccall@s consists of adding some state manipulation, |