From 42cf0984b569e49060252e536c0c7e7aee469873 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Sat, 30 Apr 2011 18:55:21 +0000 Subject: * More cleanup --- src/interp/incl.boot | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/interp/incl.boot') diff --git a/src/interp/incl.boot b/src/interp/incl.boot index bbe9cb08..7a68d933 100644 --- a/src/interp/incl.boot +++ b/src/interp/incl.boot @@ -190,10 +190,10 @@ incHandleMessage(xl) == inclHandleBug(incPos xl.0, xl.1.0) xlOK(eb, str, lno, ufo) == - [incLine(eb, str, -1, lno, ufo), [NIL, "none"]] + [incLine(eb, str, -1, lno, ufo), [nil, "none"]] xlOK1(eb, str,str1, lno, ufo) == - [incLine1(eb, str,str1, -1, lno, ufo), [NIL, "none"]] + [incLine1(eb, str,str1, -1, lno, ufo), [nil, "none"]] incLine1(eb, str,str1, gno, lno, ufo) == ln := lnCreate(eb,str,gno,lno,ufo) @@ -201,7 +201,7 @@ incLine1(eb, str,str1, gno, lno, ufo) == xlSkip(eb, str, lno, ufo) == str := strconc('"-- Omitting:", str) - [incLine(eb, str, -1, lno, ufo), [NIL, "none"]] + [incLine(eb, str, -1, lno, ufo), [nil, "none"]] xlMsg(eb, str, lno, ufo, mess) == [incLine(eb, str, -1, lno, ufo), mess] -- cgit v1.2.3