9 lines
166 B
Racket
9 lines
166 B
Racket
#;
|
|
(exn-pred #rx"does not match the given number:")
|
|
#lang typed/racket
|
|
|
|
;; Check bad arity for recursive invocation of Foo
|
|
|
|
(define-type (Foo A) (Listof (Foo A A)))
|
|
|