aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrunopt.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-09-29 05:59:06 +0000
committerdos-reis <gdr@axiomatics.org>2009-09-29 05:59:06 +0000
commitd6d284af63e89085e704e27c2f8c893c0ebc2e1a (patch)
treeaa3680ecbd0f5965a6aba6981bdb097af5ed9816 /src/interp/nrunopt.boot
parente8f38c351d90d6dea371a9ac15d2c4906bff9910 (diff)
downloadopen-axiom-d6d284af63e89085e704e27c2f8c893c0ebc2e1a.tar.gz
* interp/i-funsel.boot (matchMmSig): Fix thinko from revision 1297.
Diffstat (limited to 'src/interp/nrunopt.boot')
-rw-r--r--src/interp/nrunopt.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nrunopt.boot b/src/interp/nrunopt.boot
index deecbd19..a4aea6b5 100644
--- a/src/interp/nrunopt.boot
+++ b/src/interp/nrunopt.boot
@@ -105,7 +105,7 @@ makeCompactDirect1(op,items) ==
--identified by a 0 in slot position
if r is [n,:s] then
slot :=
- n is [p,:.] => p --the CDR is linenumber of function definition
+ n is [p,:.] => p --the rest is linenumber of function definition
n
predCode :=
s is [pred,:.] => predicateBitIndex pred