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