2019-05-02 06:48:46 +00:00
1 changed files with 1 additions and 1 deletions
--- a/osc.lisp
+++ b/osc.lisp
@ -303,7 +303,7 @@
                  for n below num-of-octets
                  collect `(,int (dpb (aref ,seq ,n) (byte 8 (* 8 (- (1- ,num-of-octets) ,n)))
                                      ,int))))
-         int))))
+         ,int))))

 (defint-decoder 4 "4 byte -> 32 bit unsigned int")
 (defint-decoder 8 "8 byte -> 64 bit unsigned int")