zzkt/osc
1
0
Fork 0
Code Issues 7 Pull requests Projects Releases Activity Actions

DEFINT-DECODER: Add missing unquote

Browse source 
Otherwise we return the unbound symbol INT instead of the value of the
we built in the decoder.

Fixes bug introduced in 9facf44.
This commit is contained in:
Javier Olaechea 2019-05-01 23:34:42 -05:00
parent 624709e253
commit 012df52daf
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
osc.lisp
View file

@ -303,7 +303,7 @@
for n below num-of-octets for n below num-of-octets
collect `(,int (dpb (aref ,seq ,n) (byte 8 (* 8 (- (1- ,num-of-octets) ,n))) collect `(,int (dpb (aref ,seq ,n) (byte 8 (* 8 (- (1- ,num-of-octets) ,n)))
,int)))) ,int))))
int)))) ,int))))
(defint-decoder 4 "4 byte -> 32 bit unsigned int") (defint-decoder 4 "4 byte -> 32 bit unsigned int")
(defint-decoder 8 "8 byte -> 64 bit unsigned int") (defint-decoder 8 "8 byte -> 64 bit unsigned int")