Fix Unit integration tests to match AnyValues in error messages
This commit is contained in:
parent
f89d91d864
commit
93b9390e3b
|
@ -1,5 +1,5 @@
|
|||
#;
|
||||
(exn-pred (regexp-quote "type mismatch\n expected: (Unit (import) (export x-sig) (init-depend) Any)\n given: (Unit (import) (export) (init-depend) Void)"))
|
||||
(exn-pred (regexp-quote "type mismatch\n expected: (Unit (import) (export x-sig) (init-depend) AnyValues)\n given: (Unit (import) (export) (init-depend) Void)"))
|
||||
#lang typed/racket
|
||||
|
||||
(define-signature x-sig ([x : Integer]))
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
#;
|
||||
(exn-pred (regexp-quote "type mismatch\n expected: (Unit (import) (export) (init-depend) Any)\n given: (Unit (import x-sig) (export) (init-depend) Integer)"))
|
||||
(exn-pred (regexp-quote "type mismatch\n expected: (Unit (import) (export) (init-depend) AnyValues)\n given: (Unit (import x-sig) (export) (init-depend) Integer)"))
|
||||
|
||||
#lang typed/racket
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user