diff options
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/g-opt.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/g-opt.boot b/src/interp/g-opt.boot index fceb3a2d..85bee73c 100644 --- a/src/interp/g-opt.boot +++ b/src/interp/g-opt.boot @@ -393,7 +393,7 @@ optSEQ ["SEQ",:l] == aft:= after(l,before) null before => ["SEQ",:aft] null aft => ["COND",:transform,'(%true (conderr))] - ["COND",:transform,['%true,optSEQ ["SEQ",:aft]]] + optCond ["COND",:transform,['%true,optSEQ ["SEQ",:aft]]] tryToRemoveSEQ l == l is ["SEQ",[op,a]] and op in '(EXIT RETURN THROW) => a l |