-maybeCharLikeCon con = getUnique con == charDataConKey
-maybeIntLikeCon con = getUnique con == intDataConKey
-\end{code}
-
-%************************************************************************
-%* *
-\subsection{Commonly-used RdrNames}
-%* *
-%************************************************************************
-
-These RdrNames are not really "built in", but some parts of the compiler
-(notably the deriving mechanism) need to mention their names, and it's convenient
-to write them all down in one place.
-
-\begin{code}
-prelude_primop op = nameRdrName (getName (mkPrimitiveId op))
-
-main_RDR = varQual mAIN SLIT("main")
-otherwiseId_RDR = varQual pREL_BASE SLIT("otherwise")
-
-intTyCon_RDR = nameRdrName (getName intTyCon)
-ioTyCon_RDR = tcQual pREL_IO_BASE SLIT("IO")
-ioDataCon_RDR = dataQual pREL_IO_BASE SLIT("IO")
-bindIO_RDR = varQual pREL_IO_BASE SLIT("bindIO")
-
-orderingTyCon_RDR = tcQual pREL_BASE SLIT("Ordering")
-rationalTyCon_RDR = tcQual pREL_NUM SLIT("Rational")
-ratioTyCon_RDR = tcQual pREL_NUM SLIT("Ratio")
-ratioDataCon_RDR = dataQual pREL_NUM SLIT(":%")
-
-byteArrayTyCon_RDR = tcQual pREL_ARR SLIT("ByteArray")
-mutableByteArrayTyCon_RDR = tcQual pREL_ARR SLIT("MutableByteArray")
-
-foreignObjTyCon_RDR = tcQual pREL_IO_BASE SLIT("ForeignObj")
-stablePtrTyCon_RDR = tcQual pREL_STABLE SLIT("StablePtr")
-stablePtrDataCon_RDR = dataQual pREL_STABLE SLIT("StablePtr")
-deRefStablePtr_RDR = varQual pREL_STABLE SLIT("deRefStablePtr")
-makeStablePtr_RDR = varQual pREL_STABLE SLIT("makeStablePtr")
-
-eqClass_RDR = clsQual pREL_BASE SLIT("Eq")
-ordClass_RDR = clsQual pREL_BASE SLIT("Ord")
-boundedClass_RDR = clsQual pREL_BASE SLIT("Bounded")
-numClass_RDR = clsQual pREL_BASE SLIT("Num")
-enumClass_RDR = clsQual pREL_BASE SLIT("Enum")
-monadClass_RDR = clsQual pREL_BASE SLIT("Monad")
-monadPlusClass_RDR = clsQual pREL_BASE SLIT("MonadPlus")
-functorClass_RDR = clsQual pREL_BASE SLIT("Functor")
-showClass_RDR = clsQual pREL_BASE SLIT("Show")
-realClass_RDR = clsQual pREL_NUM SLIT("Real")
-integralClass_RDR = clsQual pREL_NUM SLIT("Integral")
-fractionalClass_RDR = clsQual pREL_NUM SLIT("Fractional")
-floatingClass_RDR = clsQual pREL_NUM SLIT("Floating")
-realFracClass_RDR = clsQual pREL_NUM SLIT("RealFrac")
-realFloatClass_RDR = clsQual pREL_NUM SLIT("RealFloat")
-readClass_RDR = clsQual pREL_READ SLIT("Read")
-ixClass_RDR = clsQual iX SLIT("Ix")
-ccallableClass_RDR = clsQual pREL_GHC SLIT("CCallable")
-creturnableClass_RDR = clsQual pREL_GHC SLIT("CReturnable")
-
-fromInt_RDR = varQual pREL_BASE SLIT("fromInt")
-fromInteger_RDR = varQual pREL_BASE SLIT("fromInteger")
-minus_RDR = varQual pREL_BASE SLIT("-")
-succ_RDR = varQual pREL_BASE SLIT("succ")
-pred_RDR = varQual pREL_BASE SLIT("pred")
-toEnum_RDR = varQual pREL_BASE SLIT("toEnum")
-fromEnum_RDR = varQual pREL_BASE SLIT("fromEnum")
-enumFrom_RDR = varQual pREL_BASE SLIT("enumFrom")
-enumFromTo_RDR = varQual pREL_BASE SLIT("enumFromTo")
-enumFromThen_RDR = varQual pREL_BASE SLIT("enumFromThen")
-enumFromThenTo_RDR = varQual pREL_BASE SLIT("enumFromThenTo")
-
-thenM_RDR = varQual pREL_BASE SLIT(">>=")
-returnM_RDR = varQual pREL_BASE SLIT("return")
-failM_RDR = varQual pREL_BASE SLIT("fail")
-
-fromRational_RDR = varQual pREL_NUM SLIT("fromRational")
-negate_RDR = varQual pREL_BASE SLIT("negate")
-eq_RDR = varQual pREL_BASE SLIT("==")
-ne_RDR = varQual pREL_BASE SLIT("/=")
-le_RDR = varQual pREL_BASE SLIT("<=")
-lt_RDR = varQual pREL_BASE SLIT("<")
-ge_RDR = varQual pREL_BASE SLIT(">=")
-gt_RDR = varQual pREL_BASE SLIT(">")
-ltTag_RDR = dataQual pREL_BASE SLIT("LT")
-eqTag_RDR = dataQual pREL_BASE SLIT("EQ")
-gtTag_RDR = dataQual pREL_BASE SLIT("GT")
-max_RDR = varQual pREL_BASE SLIT("max")
-min_RDR = varQual pREL_BASE SLIT("min")
-compare_RDR = varQual pREL_BASE SLIT("compare")
-minBound_RDR = varQual pREL_BASE SLIT("minBound")
-maxBound_RDR = varQual pREL_BASE SLIT("maxBound")
-false_RDR = dataQual pREL_BASE SLIT("False")
-true_RDR = dataQual pREL_BASE SLIT("True")
-and_RDR = varQual pREL_BASE SLIT("&&")
-not_RDR = varQual pREL_BASE SLIT("not")
-compose_RDR = varQual pREL_BASE SLIT(".")
-append_RDR = varQual pREL_BASE SLIT("++")
-map_RDR = varQual pREL_BASE SLIT("map")
-concat_RDR = varQual mONAD SLIT("concat")
-filter_RDR = varQual mONAD SLIT("filter")
-zip_RDR = varQual pREL_LIST SLIT("zip")
-
-showList___RDR = varQual pREL_BASE SLIT("showList__")
-showsPrec_RDR = varQual pREL_BASE SLIT("showsPrec")
-showList_RDR = varQual pREL_BASE SLIT("showList")
-showSpace_RDR = varQual pREL_BASE SLIT("showSpace")
-showString_RDR = varQual pREL_BASE SLIT("showString")
-showParen_RDR = varQual pREL_BASE SLIT("showParen")
-
-range_RDR = varQual iX SLIT("range")
-index_RDR = varQual iX SLIT("index")
-inRange_RDR = varQual iX SLIT("inRange")
-
-readsPrec_RDR = varQual pREL_READ SLIT("readsPrec")
-readList_RDR = varQual pREL_READ SLIT("readList")
-readParen_RDR = varQual pREL_READ SLIT("readParen")
-lex_RDR = varQual pREL_READ SLIT("lex")
-readList___RDR = varQual pREL_READ SLIT("readList__")
-
-plus_RDR = varQual pREL_BASE SLIT("+")
-times_RDR = varQual pREL_BASE SLIT("*")
-mkInt_RDR = dataQual pREL_BASE SLIT("I#")
-
-error_RDR = varQual pREL_ERR SLIT("error")
-assert_RDR = varQual pREL_GHC SLIT("assert")
-assertErr_RDR = varQual pREL_ERR SLIT("assertError")
-
-eqH_Char_RDR = prelude_primop CharEqOp
-ltH_Char_RDR = prelude_primop CharLtOp
-eqH_Word_RDR = prelude_primop WordEqOp
-ltH_Word_RDR = prelude_primop WordLtOp
-eqH_Addr_RDR = prelude_primop AddrEqOp
-ltH_Addr_RDR = prelude_primop AddrLtOp
-eqH_Float_RDR = prelude_primop FloatEqOp
-ltH_Float_RDR = prelude_primop FloatLtOp
-eqH_Double_RDR = prelude_primop DoubleEqOp
-ltH_Double_RDR = prelude_primop DoubleLtOp
-eqH_Int_RDR = prelude_primop IntEqOp
-ltH_Int_RDR = prelude_primop IntLtOp
-geH_RDR = prelude_primop IntGeOp
-leH_RDR = prelude_primop IntLeOp
-minusH_RDR = prelude_primop IntSubOp
-\end{code}
-
-\begin{code}
-mkTupConRdrName :: Int -> RdrName
-mkTupConRdrName arity = case mkTupNameStr arity of
- (mod, occ) -> dataQual mod occ
-
-mkUbxTupConRdrName :: Int -> RdrName
-mkUbxTupConRdrName arity = case mkUbxTupNameStr arity of
- (mod, occ) -> dataQual mod occ