Commit 351a0212 authored by rl@cse.unsw.edu.au's avatar rl@cse.unsw.edu.au
Browse files

Add more NDP functions to PrelNames

parent c7852c6f
......@@ -220,7 +220,8 @@ ndpNames :: [Name]
ndpNames = [ parrayTyConName, paTyConName, closureTyConName
, mkClosureName, applyClosureName
, mkClosurePName, applyClosurePName
, lengthPAName, replicatePAName, emptyPAName ]
, lengthPAName, replicatePAName, emptyPAName, packPAName,
combinePAName, intEqPAName ]
\end{code}
......@@ -273,6 +274,7 @@ rANDOM = mkBaseModule FSLIT("System.Random")
gLA_EXTS = mkBaseModule FSLIT("GHC.Exts")
nDP_PARRAY = mkNDPModule FSLIT("Data.Array.Parallel.Lifted.PArray")
nDP_UTILS = mkNDPModule FSLIT("Data.Array.Parallel.Lifted.Utils")
nDP_CLOSURE = mkNDPModule FSLIT("Data.Array.Parallel.Lifted.Closure")
nDP_INTERFACE_NAME = mkModuleNameFS FSLIT("Data.Array.Parallel.Lifted")
nDP_BUILTIN = mkModuleNameFS FSLIT(":NDP")
......@@ -695,6 +697,9 @@ paTyConName = tcQual nDP_PARRAY FSLIT("PA") paTyConKey
lengthPAName = varQual nDP_PARRAY FSLIT("lengthPA") lengthPAIdKey
replicatePAName = varQual nDP_PARRAY FSLIT("replicatePA") replicatePAIdKey
emptyPAName = varQual nDP_PARRAY FSLIT("emptyPA") emptyPAIdKey
packPAName = varQual nDP_PARRAY FSLIT("packPA") packPAIdKey
combinePAName = varQual nDP_PARRAY FSLIT("combinePA") combinePAIdKey
intEqPAName = varQual nDP_UTILS FSLIT("intEqPA") intEqPAIdKey
closureTyConName = tcQual nDP_CLOSURE FSLIT(":->") closureTyConKey
mkClosureName = varQual nDP_CLOSURE FSLIT("mkClosure") mkClosureIdKey
applyClosureName = varQual nDP_CLOSURE FSLIT("$:") applyClosureIdKey
......@@ -1072,6 +1077,9 @@ closurePAIdKey = mkPreludeMiscIdUnique 130
lengthPAIdKey = mkPreludeMiscIdUnique 131
replicatePAIdKey = mkPreludeMiscIdUnique 132
emptyPAIdKey = mkPreludeMiscIdUnique 133
packPAIdKey = mkPreludeMiscIdUnique 134
combinePAIdKey = mkPreludeMiscIdUnique 135
intEqPAIdKey = mkPreludeMiscIdUnique 136
---------------- Template Haskell -------------------
-- USES IdUniques 200-399
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment