parent
7c4eb845a0
commit
0e3471b952
|
@ -0,0 +1,13 @@
|
||||||
|
#;
|
||||||
|
(exn-pred #rx"Expected 'foo, but got 'bar")
|
||||||
|
#lang racket/load
|
||||||
|
|
||||||
|
;; Test for PR 14144
|
||||||
|
;; Make sure that the second definition is checked
|
||||||
|
;; against the synthesized type for the first definition
|
||||||
|
|
||||||
|
(require typed/racket)
|
||||||
|
|
||||||
|
(define x 'foo)
|
||||||
|
(define x 'bar)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user