[project @ 1996-01-11 14:06:51 by partain]
[ghc-hetmet.git] / ghc / compiler / prelude / TysWiredIn.hi
index 270b1d6..6999800 100644 (file)
@@ -4,143 +4,74 @@ import Id(Id)
 import TyCon(TyCon)
 import UniType(UniType)
 addrDataCon :: Id
 import TyCon(TyCon)
 import UniType(UniType)
 addrDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 addrTy :: UniType
 addrTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 addrTyCon :: TyCon
 addrTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 boolTy :: UniType
 boolTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 boolTyCon :: TyCon
 boolTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 charDataCon :: Id
 charDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 charTy :: UniType
 charTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 charTyCon :: TyCon
 charTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 cmpTagTy :: UniType
 cmpTagTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 cmpTagTyCon :: TyCon
 cmpTagTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 consDataCon :: Id
 consDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 doubleDataCon :: Id
 doubleDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 doubleTy :: UniType
 doubleTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 doubleTyCon :: TyCon
 doubleTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 eqPrimDataCon :: Id
 eqPrimDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 falseDataCon :: Id
 falseDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 floatDataCon :: Id
 floatDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 floatTy :: UniType
 floatTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 floatTyCon :: TyCon
 floatTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 getStatePairingConInfo :: UniType -> (Id, UniType)
 getStatePairingConInfo :: UniType -> (Id, UniType)
-       {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _S_ "S" _N_ _N_ #-}
 gtPrimDataCon :: Id
 gtPrimDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 intDataCon :: Id
 intDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 intTy :: UniType
 intTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 intTyCon :: TyCon
 intTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
+integerDataCon :: Id
 integerTy :: UniType
 integerTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 integerTyCon :: TyCon
 integerTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 liftDataCon :: Id
 liftDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 liftTyCon :: TyCon
 liftTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 listTyCon :: TyCon
 listTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 ltPrimDataCon :: Id
 ltPrimDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 mallocPtrTyCon :: TyCon
 mallocPtrTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 mkLiftTy :: UniType -> UniType
 mkLiftTy :: UniType -> UniType
-       {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _N_ _N_ _N_ #-}
 mkListTy :: UniType -> UniType
 mkListTy :: UniType -> UniType
-       {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _N_ _N_ _N_ #-}
 mkPrimIoTy :: UniType -> UniType
 mkPrimIoTy :: UniType -> UniType
-       {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _N_ _N_ _N_ #-}
 mkStateTransformerTy :: UniType -> UniType -> UniType
 mkStateTransformerTy :: UniType -> UniType -> UniType
-       {-# GHC_PRAGMA _A_ 2 _U_ 22 _N_ _N_ _N_ _N_ #-}
 mkTupleTy :: Int -> [UniType] -> UniType
 mkTupleTy :: Int -> [UniType] -> UniType
-       {-# GHC_PRAGMA _A_ 2 _U_ 22 _N_ _N_ _N_ _N_ #-}
 nilDataCon :: Id
 nilDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 primIoTyCon :: TyCon
 primIoTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 ratioDataCon :: Id
 ratioDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 ratioTyCon :: TyCon
 ratioTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 rationalTy :: UniType
 rationalTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 rationalTyCon :: TyCon
 rationalTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 realWorldStateTy :: UniType
 realWorldStateTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 return2GMPsTyCon :: TyCon
 return2GMPsTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 returnIntAndGMPTyCon :: TyCon
 returnIntAndGMPTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stTyCon :: TyCon
 stTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stablePtrTyCon :: TyCon
 stablePtrTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndAddrPrimTyCon :: TyCon
 stateAndAddrPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndArrayPrimTyCon :: TyCon
 stateAndArrayPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndByteArrayPrimTyCon :: TyCon
 stateAndByteArrayPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndCharPrimTyCon :: TyCon
 stateAndCharPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndDoublePrimTyCon :: TyCon
 stateAndDoublePrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndFloatPrimTyCon :: TyCon
 stateAndFloatPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndIntPrimTyCon :: TyCon
 stateAndIntPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndMallocPtrPrimTyCon :: TyCon
 stateAndMallocPtrPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndMutableArrayPrimTyCon :: TyCon
 stateAndMutableArrayPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndMutableByteArrayPrimTyCon :: TyCon
 stateAndMutableByteArrayPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndPtrPrimTyCon :: TyCon
 stateAndPtrPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndStablePtrPrimTyCon :: TyCon
 stateAndStablePtrPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndSynchVarPrimTyCon :: TyCon
 stateAndSynchVarPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateAndWordPrimTyCon :: TyCon
 stateAndWordPrimTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateDataCon :: Id
 stateDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stateTyCon :: TyCon
 stateTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 stringTy :: UniType
 stringTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 2 _APP_  _ORIG_ TysWiredIn mkListTy [ _ORIG_ TysWiredIn charTy ] _N_ #-}
 stringTyCon :: TyCon
 stringTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 trueDataCon :: Id
 trueDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 unitTy :: UniType
 unitTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 wordDataCon :: Id
 wordDataCon :: Id
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 wordTy :: UniType
 wordTy :: UniType
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}
 wordTyCon :: TyCon
 wordTyCon :: TyCon
-       {-# GHC_PRAGMA _A_ 0 _N_ _N_ _N_ _N_ _N_ #-}