diff options
| author | simonpj@microsoft.com <unknown> | 2006-09-29 16:07:17 +0000 |
|---|---|---|
| committer | simonpj@microsoft.com <unknown> | 2006-09-29 16:07:17 +0000 |
| commit | bf40e268d916947786c56ec38db86190854a2d2c (patch) | |
| tree | 210ae9ba6590d4bb670088ed850621c2f2aaa6f3 /compiler/prelude | |
| parent | e6d057711f4d6d6ff6342c39fa2b9e44d25447f1 (diff) | |
| download | haskell-bf40e268d916947786c56ec38db86190854a2d2c.tar.gz | |
Remove Linear Implicit Parameters, and all their works
Linear implicit parameters have been in GHC quite a while,
but we decided they were a mis-feature and scheduled them for
removal. This patch does the job.
Diffstat (limited to 'compiler/prelude')
| -rw-r--r-- | compiler/prelude/PrelInfo.lhs | 1 | ||||
| -rw-r--r-- | compiler/prelude/PrelNames.lhs | 9 |
2 files changed, 0 insertions, 10 deletions
diff --git a/compiler/prelude/PrelInfo.lhs b/compiler/prelude/PrelInfo.lhs index 88c8bb7089..939c496e9b 100644 --- a/compiler/prelude/PrelInfo.lhs +++ b/compiler/prelude/PrelInfo.lhs @@ -28,7 +28,6 @@ import PrelNames ( basicKnownKeyNames, import PrimOp ( PrimOp, allThePrimOps, primOpOcc, primOpTag, maxPrimOpTag ) import DataCon ( DataCon ) import Id ( Id, idName ) -import MkId ( mkPrimOpId, wiredInIds ) import MkId -- All of it, for re-export import Name ( nameOccName ) import TysPrim ( primTyCons ) diff --git a/compiler/prelude/PrelNames.lhs b/compiler/prelude/PrelNames.lhs index 0644654233..03a96927c2 100644 --- a/compiler/prelude/PrelNames.lhs +++ b/compiler/prelude/PrelNames.lhs @@ -192,9 +192,6 @@ basicKnownKeyNames -- MonadFix monadFixClassName, mfixName, - -- Splittable class - splittableClassName, splitName, - -- Other classes randomClassName, randomGenClassName, monadPlusClassName, @@ -627,10 +624,6 @@ newStablePtrName = varQual gHC_STABLE FSLIT("newStablePtr") newStablePtrId -- PrelST module runSTRepName = varQual gHC_ST FSLIT("runSTRep") runSTRepIdKey --- The "split" Id for splittable implicit parameters -splittableClassName = clsQual gLA_EXTS FSLIT("Splittable") splittableClassKey -splitName = methName splittableClassName FSLIT("split") splitIdKey - -- Recursive-do notation monadFixClassName = clsQual mONAD_FIX FSLIT("MonadFix") monadFixClassKey mfixName = methName monadFixClassName FSLIT("mfix") mfixIdKey @@ -723,7 +716,6 @@ typeable6ClassKey = mkPreludeClassUnique 26 typeable7ClassKey = mkPreludeClassUnique 27 monadFixClassKey = mkPreludeClassUnique 28 -splittableClassKey = mkPreludeClassUnique 29 monadPlusClassKey = mkPreludeClassUnique 30 randomClassKey = mkPreludeClassUnique 31 @@ -921,7 +913,6 @@ printIdKey = mkPreludeMiscIdUnique 43 failIOIdKey = mkPreludeMiscIdUnique 44 nullAddrIdKey = mkPreludeMiscIdUnique 46 voidArgIdKey = mkPreludeMiscIdUnique 47 -splitIdKey = mkPreludeMiscIdUnique 48 fstIdKey = mkPreludeMiscIdUnique 49 sndIdKey = mkPreludeMiscIdUnique 50 otherwiseIdKey = mkPreludeMiscIdUnique 51 |