diff options
| -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 |