diff options
Diffstat (limited to 'src/interp/br-saturn.boot')
| -rw-r--r-- | src/interp/br-saturn.boot | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot index f380a334..bcc85827 100644 --- a/src/interp/br-saturn.boot +++ b/src/interp/br-saturn.boot @@ -82,8 +82,8 @@ off()== -- --protectedEVAL1 x == -- error := true --- val := NIL --- UNWIND_-PROTECT((val := saturnEVAL x; error := NIL), +-- val := nil +-- UNWIND_-PROTECT((val := saturnEVAL x; error := nil), -- error => (resetStackLimits(); sendHTErrorSignal())) -- val -- @@ -1157,7 +1157,7 @@ htShowPageStar() == $saturn => htShowPageStarSaturn() htSayStandard '"\endscroll " if $exposedOnlyIfTrue then - htMakePage [['bcLinks,['"Unexposed Also",'"",'repeatSearch,NIL]]] + htMakePage [['bcLinks,['"Unexposed Also",'"",'repeatSearch,nil]]] else htMakePage [['bcLinks,['"Exposed Only",'"",'repeatSearch,'T]]] htShowPageNoScroll() @@ -1166,7 +1166,7 @@ htShowPageStarSaturn() == $newPage : local := nil $htLineList : local := nil if $exposedOnlyIfTrue then - htMakePage [['bcLinks,['"Unexposed Also",'"",'repeatSearch,NIL]]] + htMakePage [['bcLinks,['"Unexposed Also",'"",'repeatSearch,nil]]] else htMakePage [['bcLinks,['"Exposed Only",'"",'repeatSearch,'T]]] $saturnContextMenuLines := $htLineList |