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

Merge pull request #21 from byulparan/develop

Browse source 
Fix conditional build to `encode-float32` for sbcl
This commit is contained in:
nik gaffney 2024-01-27 18:00:54 +01:00 committed by GitHub
commit 2c7076d469
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
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

@ -356,7 +356,7 @@
(defun encode-float32 (f) (defun encode-float32 (f)
"Encode an ieee754 float as a 4 byte vector." "Encode an ieee754 float as a 4 byte vector."
#+sbcl (encode-int32 (sb-kernel:single-float-bits f)) #+sbcl (encode-int32 (sb-kernel:single-float-bits f))
(encode-int32 (ieee-floats:encode-float32 f))) #-sbcl (encode-int32 (ieee-floats:encode-float32 f)))
(defun decode-float32 (v) (defun decode-float32 (v)
"Convert a vector of 4 bytes in network byte order into an ieee754 float." "Convert a vector of 4 bytes in network byte order into an ieee754 float."