2021-06-04 13:56:03 +00:00
|
|
|
;;; SPDX-License-Identifier: LGPL-3.0-or-later
|
2021-06-04 14:20:14 +00:00
|
|
|
;;; SPDX-FileCopyrightText: Copyright © 2021 Tony Garnock-Jones <tonyg@leastfixedpoint.com>
|
2021-06-01 15:19:24 +00:00
|
|
|
|
2018-04-29 11:22:12 +00:00
|
|
|
#lang racket/base
|
|
|
|
|
|
2021-06-02 13:00:25 +00:00
|
|
|
(provide (all-from-out "actor.rkt")
|
|
|
|
|
(all-from-out "syntax.rkt")
|
2021-06-03 20:38:45 +00:00
|
|
|
(all-from-out preserves)
|
2021-06-03 21:32:22 +00:00
|
|
|
|
|
|
|
|
assertion-struct
|
|
|
|
|
message-struct
|
|
|
|
|
|
2021-06-03 20:38:45 +00:00
|
|
|
:pattern
|
|
|
|
|
:template)
|
2021-05-27 09:28:10 +00:00
|
|
|
|
2021-06-02 13:00:25 +00:00
|
|
|
(require (except-in "actor.rkt" actor-system))
|
|
|
|
|
(require "syntax.rkt")
|
|
|
|
|
(require preserves)
|
2021-06-03 21:32:22 +00:00
|
|
|
|
|
|
|
|
;; Thin veneers over `struct` for declaring intent.
|
|
|
|
|
(define-syntax-rule (assertion-struct item ...) (struct item ... #:prefab))
|
|
|
|
|
(define-syntax-rule (message-struct item ...) (struct item ... #:prefab))
|
|
|
|
|
|
2021-06-03 20:38:45 +00:00
|
|
|
(require (only-in "pattern.rkt" :pattern :template))
|
2018-04-29 11:22:12 +00:00
|
|
|
|
2021-06-03 20:36:29 +00:00
|
|
|
(module reader syntax/module-reader syndicate/lang)
|
