typed-racket/typed-racket-test/fail/div-0-complex.rkt
2015-11-09 17:16:09 -06:00

10 lines
254 B
Racket

#;
(exn-pred "division by zero")
#lang typed/racket
;; float-complex opts should not make div-by-0 errors go away
(* (/ (make-rectangular +inf.f -1.3086925781062948e-124)
(exp 2)
(bitwise-and (exact-round -3/11)))
-4.880003479031522e-08)