Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tag: v0.0.5
Fetching contributors…

Cannot retrieve contributors at this time

12 lines (8 sloc) 0.314 kb
;;;; Depends on the IEEE-Floats library
(in-package :cleric)
(defun double-float-to-bytes (f)
(let ((bits (ieee-floats:encode-float64 f)))
(unsigned-integer-to-bytes bits 8)))
(defun bytes-to-double-float (bytes)
(let ((bits (bytes-to-unsigned-integer bytes 8)))
(ieee-floats:decode-float64 bits)))
Jump to Line
Something went wrong with that request. Please try again.