8 lines
123 B
Racket
8 lines
123 B
Racket
#;
|
|
(exn-pred 1)
|
|
#lang typed/racket
|
|
|
|
(: f (All (a ...) (-> a ... a (values a ... a))))
|
|
(define (f . xs)
|
|
(apply values 3))
|