;; Three integer operations have no right answer. Each used to be a bare SIGFPE
;; or an undefined value; each signals ArithError now. The divisor goes through
;; a global so that constant folding cannot answer it before the backend does.
(defvar zero i32 0)

(defn main [] ()
  (println "before")
  (println (/ 10 zero))
  (println "unreachable"))