Merge pull request #6 from PuercoPop/fix-defint-decoder-bug

Fix DEFINT-DECODER
This commit is contained in:
nik gaffney 2019-05-02 08:48:45 +02:00 committed by GitHub
commit e1ac269e25
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

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")