diff options
Diffstat (limited to 'src/interp/br-saturn.boot')
| -rw-r--r-- | src/interp/br-saturn.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot index e40099e2..362aee5d 100644 --- a/src/interp/br-saturn.boot +++ b/src/interp/br-saturn.boot @@ -342,8 +342,8 @@ saturnTERPRI() == TERPRI() writeSaturnTable line == - open := charPosition(char '"_{",line,0) - close:= charPosition(char '"_}",line,0) + open := charPosition(char "{",line,0) + close:= charPosition(char "}",line,0) open < close => close := findBalancingBrace(line,open + 1,MAXINDEX line,0) or error '"no balancing brace" writeSaturnPrint SUBSTRING(line,0,close + 1) |