import {-# SOURCE #-} DsExpr ( dsExpr )
import HsSyn ( HsLit(..), OutPat(..), HsExpr(..) )
-import TcHsSyn ( TypecheckedHsExpr, TypecheckedPat )
import CoreSyn ( Expr(..), Bind(..) )
import Id ( Id )
import DsUtils
import Literal ( mkMachInt, Literal(..) )
-import PrimRep ( PrimRep(IntRep) )
import Maybes ( catMaybes )
import Type ( Type, isUnLiftedType )
import Panic ( panic, assertPanic )