diff options
Diffstat (limited to 'src/lisp/core.lisp.in')
| -rw-r--r-- | src/lisp/core.lisp.in | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/lisp/core.lisp.in b/src/lisp/core.lisp.in index 27808ad2..3fe31dae 100644 --- a/src/lisp/core.lisp.in +++ b/src/lisp/core.lisp.in @@ -152,6 +152,7 @@ "mkVector" "mkIntArray" "listToString" + "maxIndex" "%hasFeature" "%systemOptions" @@ -1396,6 +1397,10 @@ ;; -*- Native Datatype correspondance -*- ;; +(defmacro |maxIndex| (x) + `(1- (length ,x))) + + ;; Datatype for buffers mostly used for transmitting data between ;; the Lisp world and Native World. (deftype |%ByteArray| () |