diff options
author | Gabriel Dos Reis <gdr@axiomatics.org> | 2015-12-26 02:10:51 -0800 |
---|---|---|
committer | Gabriel Dos Reis <gdr@axiomatics.org> | 2015-12-26 02:10:51 -0800 |
commit | 6f164087ba2a3f6794f1c4a18a260350db4a0a55 (patch) | |
tree | 97f8b3a8a5f4c4d4de60117ca0aa8319a9026a34 /src/interp/c-doc.boot | |
parent | ce399e9928fc1fed29dddecc6fac5484b9f755a5 (diff) | |
download | open-axiom-6f164087ba2a3f6794f1c4a18a260350db4a0a55.tar.gz |
Introduce opcode '%constant' in lieu of IDENTITY.
Diffstat (limited to 'src/interp/c-doc.boot')
-rw-r--r-- | src/interp/c-doc.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/c-doc.boot b/src/interp/c-doc.boot index ba640875..b6cc0e66 100644 --- a/src/interp/c-doc.boot +++ b/src/interp/c-doc.boot @@ -1043,7 +1043,7 @@ checkSayBracket x == checkBeginEnd u == beginEndStack := nil while u repeat - IDENTITY + do x := first u string? x and x.0 = $charBack and #x > 2 and not tableValue($htMacroTable,x) and not (x is '"\spadignore") and IFCAR IFCDR u = $charLbrace |