diff options
| author | Roman Leshchinskiy <rl@cse.unsw.edu.au> | 2007-08-08 06:48:34 +0000 |
|---|---|---|
| committer | Roman Leshchinskiy <rl@cse.unsw.edu.au> | 2007-08-08 06:48:34 +0000 |
| commit | c7852c6f0e7d22c5dc9b7171d4e6f36a12616990 (patch) | |
| tree | eedfde1f138c01ddc350384440235de8ab6a59ae | |
| parent | f363bf9a76bcaddc1bfea61135f4f4d2fbcfd955 (diff) | |
| download | haskell-c7852c6f0e7d22c5dc9b7171d4e6f36a12616990.tar.gz | |
PA functions are no longer methods
| -rw-r--r-- | compiler/prelude/PrelNames.lhs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/compiler/prelude/PrelNames.lhs b/compiler/prelude/PrelNames.lhs index 5bbd9947de..1f2d901b28 100644 --- a/compiler/prelude/PrelNames.lhs +++ b/compiler/prelude/PrelNames.lhs @@ -692,9 +692,9 @@ checkDotnetResName = varQual dOTNET FSLIT("checkResult") checkDotnetResNam -- NDP stuff parrayTyConName = tcQual nDP_PARRAY FSLIT("PArray") parrayTyConKey paTyConName = tcQual nDP_PARRAY FSLIT("PA") paTyConKey -lengthPAName = methName nDP_PARRAY FSLIT("lengthPA") lengthPAClassOpKey -replicatePAName = methName nDP_PARRAY FSLIT("replicatePA") replicatePAClassOpKey -emptyPAName = varQual nDP_PARRAY FSLIT("emptyPA") emptyPAClassOpKey +lengthPAName = varQual nDP_PARRAY FSLIT("lengthPA") lengthPAIdKey +replicatePAName = varQual nDP_PARRAY FSLIT("replicatePA") replicatePAIdKey +emptyPAName = varQual nDP_PARRAY FSLIT("emptyPA") emptyPAIdKey closureTyConName = tcQual nDP_CLOSURE FSLIT(":->") closureTyConKey mkClosureName = varQual nDP_CLOSURE FSLIT("mkClosure") mkClosureIdKey applyClosureName = varQual nDP_CLOSURE FSLIT("$:") applyClosureIdKey @@ -1069,9 +1069,9 @@ applyClosureIdKey = mkPreludeMiscIdUnique 127 mkClosurePIdKey = mkPreludeMiscIdUnique 128 applyClosurePIdKey = mkPreludeMiscIdUnique 129 closurePAIdKey = mkPreludeMiscIdUnique 130 -lengthPAClassOpKey = mkPreludeMiscIdUnique 131 -replicatePAClassOpKey = mkPreludeMiscIdUnique 132 -emptyPAClassOpKey = mkPreludeMiscIdUnique 133 +lengthPAIdKey = mkPreludeMiscIdUnique 131 +replicatePAIdKey = mkPreludeMiscIdUnique 132 +emptyPAIdKey = mkPreludeMiscIdUnique 133 ---------------- Template Haskell ------------------- -- USES IdUniques 200-399 |