[project @ 1996-01-18 16:33:17 by partain]

[ghc-hetmet.git] / ghc / compiler / basicTypes / Unique.lhs

diff --git a/ghc/compiler/basicTypes/Unique.lhs b/ghc/compiler/basicTypes/Unique.lhs
index 482b0a4..d92bab0 100644 (file)
--- a/ghc/compiler/basicTypes/Unique.lhs
+++ b/ghc/compiler/basicTypes/Unique.lhs
@@ -152,7 +152,8 @@ module Unique (
        trueDataConKey,
        unpackCStringIdKey, unpackCString2IdKey, unpackCStringAppendIdKey,
        packCStringIdKey,
-       integerZeroIdKey, integerPlusOneIdKey, integerMinusOneIdKey,
+       integerZeroIdKey, integerPlusOneIdKey,
+       integerPlusTwoIdKey, integerMinusOneIdKey,
        voidPrimIdKey,
        cCallableClassKey,
        cReturnableClassKey,
@@ -619,7 +620,7 @@ int2IntegerIdKey    = mkPreludeMiscIdUnique  7
 integerMinusOneIdKey   = mkPreludeMiscIdUnique  8
 integerPlusOneIdKey    = mkPreludeMiscIdUnique  9
 integerZeroIdKey       = mkPreludeMiscIdUnique 10
---UNUSED:lexIdKey              = mkPreludeMiscIdUnique 11
+integerPlusTwoIdKey    = mkPreludeMiscIdUnique 11
 packCStringIdKey       = mkPreludeMiscIdUnique 12
 parIdKey               = mkPreludeMiscIdUnique 13
 parErrorIdKey          = mkPreludeMiscIdUnique 14