diff options
Diffstat (limited to 'src/interp/g-error.boot')
-rw-r--r-- | src/interp/g-error.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/g-error.boot b/src/interp/g-error.boot index aafefd93..06275781 100644 --- a/src/interp/g-error.boot +++ b/src/interp/g-error.boot @@ -117,10 +117,10 @@ handleLispBreakLoop($BreakMode) == '" ",:bright '"break ",'" to enter a LISP break loop.",'"%l",_ '"%l",'" Please enter your choice now:"] x := STRING2ID_-N(queryUser msgQ,1) - x := selectOptionLC(x,'(top break continue),NIL) + x := selectOptionLC(x,'(top break continue),nil) null x => sayBrightly bright '" That was not one of your choices!" - gotIt := NIL + gotIt := nil x = 'top => returnToTopLevel() x = 'break => $BreakMode := 'break |