diff options
| -rw-r--r-- | src/interp/nruncomp.boot | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot index ab55362d..118fe6b4 100644 --- a/src/interp/nruncomp.boot +++ b/src/interp/nruncomp.boot @@ -389,10 +389,7 @@ stuffSlot(dollar,i,item) == stuffDomainSlots dollar == domname := devaluate dollar infovec := property(opOf domname,'infovec) - lookupFunction := getLookupFun infovec - lookupFunction := - lookupFunction is 'lookupIncomplete => function lookupIncomplete - function lookupComplete + lookupFunction := symbolFunction getLookupFun infovec template := infovec.0 if vectorRef(template,5) then stuffSlot(dollar,5,vectorRef(template,5)) |