Skip to content
Snippets Groups Projects
Commit 16a82022 authored by ram's avatar ram
Browse files

In WRITE-PACKED-BIT-VECTOR, fixed syntax of WITH-ARRAY-DATA call.

parent bc44c40d
No related branches found
No related tags found
No related merge requests found
......@@ -143,7 +143,7 @@
(start (fill-pointer vec)))
(dotimes (i len)
(vector-push-extend 0 vec))
(lisp::with-array-data (data vec)
(lisp::with-array-data ((data vec))
(%primitive byte-blt bits 0 data start (+ start len))))
(undefined-value))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment