10 lines
99 B
Racket
10 lines
99 B
Racket
#;
|
|
(exn-pred 1)
|
|
#lang typed-scheme
|
|
|
|
|
|
(: f (Foo -> String))
|
|
(define (f x) (string-append x))
|
|
|
|
(f 1)
|