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

Really fixed the WITH-ARRAY-DATA syntax this time for sure, truly.

parent 9d317f88
No related branches found
No related tags found
No related merge requests found
......@@ -143,7 +143,8 @@
(start (fill-pointer vec)))
(dotimes (i len)
(vector-push-extend 0 vec))
(lisp::with-array-data ((data vec))
(lisp::with-array-data ((data vec) (ig1) (ig2))
(declare (ignore ig1 ig2))
(%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