diff options
Diffstat (limited to 'src/interp/i-util.boot')
| -rw-r--r-- | src/interp/i-util.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-util.boot b/src/interp/i-util.boot index 708f07d5..4762fccb 100644 --- a/src/interp/i-util.boot +++ b/src/interp/i-util.boot @@ -135,7 +135,7 @@ Undef(:u) == if $reportBottomUpFlag then sayMessage concat ['" Retrospective determination of slot",'%b, slot,'%d,'"of",'%b,:prefix2String domain,'%d] - APPLY(first ELT(domain',slot),[:u'',rest ELT(domain',slot)]) + apply(first ELT(domain',slot),[:u'',rest ELT(domain',slot)]) throwKeyedMsg("S2IF0008",[formatOpSignature(op,sig),domain]) makeInitialModemapFrame() == |