- mkPRVar <- dsLookupGlobalId mkPRName
- mkClosureVar <- dsLookupGlobalId mkClosureName
- applyClosureVar <- dsLookupGlobalId applyClosureName
- mkClosurePVar <- dsLookupGlobalId mkClosurePName
- applyClosurePVar <- dsLookupGlobalId applyClosurePName
- replicatePAIntPrimVar <- dsLookupGlobalId replicatePAIntPrimName
- upToPAIntPrimVar <- dsLookupGlobalId upToPAIntPrimName
- lengthPAVar <- dsLookupGlobalId lengthPAName
- replicatePAVar <- dsLookupGlobalId replicatePAName
- emptyPAVar <- dsLookupGlobalId emptyPAName
+ voidVar <- externalVar nDP_REPR FSLIT("void")
+ mkPRVar <- externalVar nDP_PARRAY FSLIT("mkPR")
+ mkClosureVar <- externalVar nDP_CLOSURE FSLIT("mkClosure")
+ applyClosureVar <- externalVar nDP_CLOSURE FSLIT("$:")
+ mkClosurePVar <- externalVar nDP_CLOSURE FSLIT("mkClosureP")
+ applyClosurePVar <- externalVar nDP_CLOSURE FSLIT("$:^")
+ replicatePAIntPrimVar <- externalVar nDP_PRIM FSLIT("replicatePA_Int#")
+ upToPAIntPrimVar <- externalVar nDP_PRIM FSLIT("upToPA_Int#")
+ lengthPAVar <- externalVar nDP_PARRAY FSLIT("lengthPA")
+ replicatePAVar <- externalVar nDP_PARRAY FSLIT("replicatePA")
+ emptyPAVar <- externalVar nDP_PARRAY FSLIT("emptyPA")