DEFINT-DECODER: Add missing unquote

Otherwise we return the unbound symbol INT instead of the value of the we built in the decoder. Fixes bug introduced in 9facf44.
2019-05-01 23:34:42 -05:00 · 2019-05-01 23:34:42 -05:00 · 012df52daf
parent 624709e253
commit 012df52daf
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")