syndicate-2017/racket/typed/examples/require-struct/driver.rkt

5 lines
77 B
Racket

#lang racket
(provide (struct-out msg))
(struct msg (in out) #:transparent)