diff options
Diffstat (limited to 'src/interp/nruncomp.boot')
| -rw-r--r-- | src/interp/nruncomp.boot | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot index 353492f4..2fe210e9 100644 --- a/src/interp/nruncomp.boot +++ b/src/interp/nruncomp.boot @@ -191,6 +191,8 @@ $onlyAbstractSlot := false genDeltaEntry(op,mm,e) == if mm.mmDC is 'Rep then mm := substitute(getRepresentation e,'Rep,mm) + else if (x := get('$,'%dc,e)) and x = mm.mmDC then + mm := MSUBST('$,x,mm) [[dc,:sig],[.,cform:=[kind,.,nsig]]] := mm if $profileCompiler then profileRecord(dc,op,sig) kind is 'XLAM => cform |