6e3c509a86
add a typed-field syntax class (`[id : expr]`) and use it to report errors + simplify other code
14 lines
274 B
Racket
14 lines
274 B
Racket
#;
|
|
(exn-pred ".*while parsing typed-field.*")
|
|
#lang racket/base
|
|
|
|
(module server racket
|
|
(provide (struct-out posn))
|
|
(struct posn [x y]))
|
|
|
|
(module client typed/racket
|
|
(require/typed (submod ".." server)
|
|
(#:struct posn ((x Integer) (y Integer)))))
|
|
|
|
(require 'client)
|