;; returns boolean true (bind-func my-test-13 (lambda (x:i64) (cond ((= x 1) (printf "A\n")) ((= x 2) (printf "B\n")) ((= x 3) (printf "C\n")) ((= x 4) (printf "D\n")) (else (printf "E\n"))) #t))