1
1
mirror of https://github.com/kanaka/mal.git synced 2024-11-13 11:23:59 +03:00

Common Lisp: Fix warning while compiling core.lisp

This commit is contained in:
Iqbal Ansari 2016-11-22 13:42:27 +05:30
parent 7a6fdd1b4c
commit f88f1ca1e1

View File

@ -145,8 +145,8 @@
(or (nth (types:mal-data-value index)
(map 'list #'identity (types:mal-data-value sequence)))
(error 'index-error
:size (length (mal-value sequence))
:index (mal-value index)
:size (length (types:mal-data-value sequence))
:index (types:mal-data-value index)
:sequence sequence)))
(defun mal-first (sequence)