diff options
Diffstat (limited to 'src/interp/ax.boot')
| -rw-r--r-- | src/interp/ax.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/ax.boot b/src/interp/ax.boot index 950d9307..1f61ece4 100644 --- a/src/interp/ax.boot +++ b/src/interp/ax.boot @@ -287,7 +287,7 @@ axFormatCondOp op == axFormatOp op == op is ['IF, pred, trueops, falseops] => - NULL(trueops) or trueops='noBranch => + NULL(trueops) or trueops='%noBranch => ['If, ['Test,['Not, axFormatPred pred]], axFormatCondOp falseops, axFormatCondOp trueops] @@ -303,7 +303,7 @@ axFormatOp op == axFormatType attributeOrCategory ['RestrictTo, axFormatAttrib attributeOrCategory, 'Category] op is ['PROGN, :ops] => axFormatOpList ops - op is 'noBranch => [] + op is '%noBranch => [] axFormatType op addDefaults(catname, withform) == |