aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nruncomp.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/nruncomp.boot')
-rw-r--r--src/interp/nruncomp.boot1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot
index e5deec1b..02ce4bd1 100644
--- a/src/interp/nruncomp.boot
+++ b/src/interp/nruncomp.boot
@@ -90,6 +90,7 @@ deltaTran(item,compItem) ==
sig := substitute('$,dc,substitute("$$",'$,sig))
dcCode :=
dc = '$ => 0
+ dc = $NRTaddForm => 5
NRTassocIndex dc or keyedSystemError("S2NR0004",[dc])
formalSig:= SUBLISLIS($FormalMapVariableList,$formalArgList,sig)
kindFlag:= (kind = 'CONST => 'CONST; nil)