(bind-func cerberus_extras_cc
(lambda ()
(let ((val 0.0:f))
(lambda (inst:i8* offset:i32 cc:i32 value:i32)
;; (println 'cerberus_extras_cc cc value)
(set! val (/ (i32tof value) 127.0))
;; nothing yet!
void))))