9 lines
289 B
Racket
9 lines
289 B
Racket
|
#lang racket/base
|
||
|
;; Wrapper struct to mark a need for 32-bit IEEE floating-point
|
||
|
;; precision (de)serialization. In many circumstances, Racket lacks
|
||
|
;; 32-bit floating point support, and single-flonum? always yields #f.
|
||
|
|
||
|
(provide (struct-out float))
|
||
|
|
||
|
(struct float (value) #:transparent)
|