diff options
| author | dos-reis <gdr@axiomatics.org> | 2013-07-02 01:25:39 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2013-07-02 01:25:39 +0000 |
| commit | cb90da3427de1c9113fdf285ba6ba3a9d307fb6f (patch) | |
| tree | f8a576ce5781e94cf307c6680415a486e44b2864 | |
| parent | e49a62f7eac0a9f7be440bc6dad8a0234ee0e837 (diff) | |
| download | open-axiom-cb90da3427de1c9113fdf285ba6ba3a9d307fb6f.tar.gz | |
Fix typo.
| -rw-r--r-- | src/lisp/core.lisp.in | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lisp/core.lisp.in b/src/lisp/core.lisp.in index 28bcb227..921fe077 100644 --- a/src/lisp/core.lisp.in +++ b/src/lisp/core.lisp.in @@ -1468,10 +1468,10 @@ ;; but GCL has problems with it, for some obscure reasons. #-:gcl (defmacro |maxIndex| (x) - `(1- (length ,x)))) + `(1- (length ,x))) #+:gcl (defun |maxIndex| (x) - (1- (length x)))) + (1- (length x))) ;; Datatype for buffers mostly used for transmitting data between |