use append instead of nconc in binae
Wed Oct 24 15:50:11 PDT 2007 Ties Stuij <ties@stuij.se>
* use append instead of nconc in binae
diff -rN -u old-armish/src/directives.lisp new-armish/src/directives.lisp
--- old-armish/src/directives.lisp 2014-07-23 19:19:05.000000000 -0700
+++ new-armish/src/directives.lisp 2014-07-23 19:19:05.000000000 -0700
@@ -45,7 +45,7 @@
(define-directive binae (pack-size bins)
(loop for bin in bins
- nconc (process-bytes bin (* pack-size 8))))
+ append (process-bytes bin (* pack-size 8))))
(define-directive string (&rest strings)
(let ((null-terminated (or (member :null-terminated strings)