aboutsummaryrefslogtreecommitdiff
path: root/src/interp/mark.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2007-11-22 17:20:27 +0000
committerdos-reis <gdr@axiomatics.org>2007-11-22 17:20:27 +0000
commitfcc7f11db9c755b9b58ce43d37bbe8a702af8ebf (patch)
tree05aa94e2606b88faf554913a03a60bc424e56102 /src/interp/mark.boot
parent4244764830efa92de999f8e548f0cc2a800e61d1 (diff)
downloadopen-axiom-fcc7f11db9c755b9b58ce43d37bbe8a702af8ebf.tar.gz
* as.boot: Globally substitute %noBranch for noBranch.
* ax.boot: Likewise. * cattable.boot: Likewise. * compiler.boot: Likewise. * def.lisp: Likewise. * define.boot: Likewise. * functor.boot: Likewise. * g-opt.boot: Likewise. * i-analy.boot: Likewise. * i-intern.boot: Likewise. * i-map.boot: Likewise. * i-object.boot: Likewise. * i-output.boot: Likewise. * i-spec2.boot: Likewise. * info.boot: Likewise. * mark.boot: Likewise. * nrunopt.boot: Likewise. * package.boot: Likewise. * parse.boot: Likewise. * pf2atree.boot: Likewise. * pf2sex.boot: Likewise. * postpar.boot: Likewise. * pspad2.boot: Likewise. * wi2.boot: Likewise.
Diffstat (limited to 'src/interp/mark.boot')
-rw-r--r--src/interp/mark.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/mark.boot b/src/interp/mark.boot
index 95efaf83..67ec82c8 100644
--- a/src/interp/mark.boot
+++ b/src/interp/mark.boot
@@ -1170,7 +1170,7 @@ markPartOp? op ==
markWrapPart y ==
----------------new definition----------94/10/11
atom y =>
- y = 'noBranch => y
+ y = '%noBranch => y
GETL(y, 'SPECIAL) => y
$partNumber := $partNumber + 1
['PART,$partNumber, y]
@@ -1465,7 +1465,7 @@ buildNewDefinition(op,theSig,formPredAlist) ==
outerPred
def := ['DEF, theForm, theSig, theNils, ifize theAlist]
value :=
- thePred => ['IF, thePred, def, 'noBranch]
+ thePred => ['IF, thePred, def, '%noBranch]
def
stop value
value