typed-racket/typed-racket-test/fail/def-val-inv-unit-sig-mismatch.rkt
Daniel Feltey 2e0cc095c7 Initial support for typed units in typed racket.
Most unit forms are supported, including most of the "infer" forms that
infer imports/exports/linkages from the current context.

Notably, none of the structural linking forms for units are supported, and
`define-unit-binding` is also currently unsupported.
2015-09-10 16:32:11 -05:00

8 lines
300 B
Racket

#;
(exn-pred (regexp-quote "type mismatch\n expected: (Unit (import) (export x-sig) (init-depend) Any)\n given: (Unit (import) (export) (init-depend) Void)"))
#lang typed/racket
(define-signature x-sig ([x : Integer]))
(define-values/invoke-unit (unit (import) (export)) (import) (export x-sig))