(bind-func test38 (lambda () (memzone 1024 (* 44100 10) (let ((a:|5,double|* (alloc))) (aset! a 0 5.5) (aref a 0)))))