;; (bind-val NUM_i64 NUM{i64}* (NUM num_i64_plus num_i64_minus num_i64_mul num_i64_div)) (bind-func NUM (lambda (a:i64) (let ((obj:NUM{i64}* (alloc))) (tfill! obj num_i64_plus num_i64_minus num_i64_mul num_i64_div a) obj)))