(bind-func set_float_nans_
(lambda ()
(let ((nan32 #x7FC00000)
(nan64 #x7FFC000000000000)
(n32:i32* (alloc))
(n64:i64* (alloc)))
(pset! n32 0 nan32)
(pset! n64 0 nan64)
(set! NaNf (pref (cast n32 float*) 0))
(set! NaN (pref (cast n64 double*) 0))
void)))