(bind-func toString (lambda (x:i64) (let ((st:i8* (salloc 256))) (sprintf st "%lld" x) (String st))))