12 lines
248 B
Racket
12 lines
248 B
Racket
#;
|
|
(exn-pred exn:fail:syntax?
|
|
#rx"Type \\(List X\\) could not be converted to a contract"
|
|
#rx"contains free variables"
|
|
#rx"10.8")
|
|
|
|
#lang typed/racket
|
|
(: f : (All (X) (-> X X)))
|
|
(define (f x)
|
|
(cast (list x) Any)
|
|
x)
|