diff options
Diffstat (limited to 'src/interp/int-top.boot')
| -rw-r--r-- | src/interp/int-top.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/int-top.boot b/src/interp/int-top.boot index 9554b7b5..3b30ab03 100644 --- a/src/interp/int-top.boot +++ b/src/interp/int-top.boot @@ -297,7 +297,7 @@ ncloopEscaped x== ncloopDQlines (dq,stream)== StreamNull stream - a:= poGlobalLinePosn tokPosn CADR dq + a:= poGlobalLinePosn tokPosn second dq b:= poGlobalLinePosn CAAR stream streamChop (a-b+1,stream) @@ -435,6 +435,6 @@ getParserMacros() == displayParserMacro m == m := ASSQ(m, $pfMacros) null m => nil - pfPrintSrcLines CADDR m + pfPrintSrcLines third m |