aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-op2.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-18 17:41:01 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-18 17:41:01 +0000
commita4a45e923a2435574c09619da442fd15e71b2652 (patch)
tree46db3f474ca5b7979597bcff5ce38795968cb79d /src/interp/br-op2.boot
parent18cdfe64dbe07358b58d06a70b8d6bc2c276769d (diff)
downloadopen-axiom-a4a45e923a2435574c09619da442fd15e71b2652.tar.gz
cleanup
Diffstat (limited to 'src/interp/br-op2.boot')
-rw-r--r--src/interp/br-op2.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-op2.boot b/src/interp/br-op2.boot
index e6b3de61..399c58fd 100644
--- a/src/interp/br-op2.boot
+++ b/src/interp/br-op2.boot
@@ -148,7 +148,7 @@ dbGetFormFromDocumentation(op,sig,x) ==
string? doc and
(stringPrefix?('"\spad{",doc) and (k := 6) or
stringPrefix?('"\s{",doc) and (k := 3)) =>
- n := charPosition($charRbrace,doc,k)
+ n := charPosition(char "}",doc,k)
s := subString(doc,k,n - k)
parse := ncParseFromString s
parse is [=op,:.] and #parse = #sig => parse