c9db5dded7
With this we don't need to infer the length of the dotted variable, in parts of the inference. Closes #120.
10 lines
184 B
Racket
10 lines
184 B
Racket
#lang typed/racket
|
|
|
|
(: my-apply (All (a ...) ((Any ... a -> Any) a ... a -> Any)))
|
|
(define (my-apply f . x) (apply f x))
|
|
|
|
(: id (All (a) (a -> a)))
|
|
(define (id x) x)
|
|
|
|
(my-apply id 'y)
|