typed-racket/typed-racket-test/fail/issue-215-2.rkt
Sam Tobin-Hochstadt 6aa635d740 Fix equality handling on literals.
Repairs eb93a2b571 and closes #215.
2015-10-20 15:56:07 -04:00

8 lines
106 B
Racket

#lang typed/racket
(ann (let ((x 'b))
(if (equal? x 'a)
42
"foo")) Number)