Ensure that `?` is provided by pattern.rkt and clients

2016-06-14 03:48:12 -04:00 · 2016-06-14 03:48:12 -04:00 · 7271ef6b73
parent 0b2d80a997
commit 7271ef6b73
2 changed files with 3 additions and 0 deletions
--- a/racket/syndicate/actor.rkt
+++ b/racket/syndicate/actor.rkt
@ -22,6 +22,8 @@

         patch-without-linkage

+         ? ;; from pattern.rkt
+
         ;;----------------------------------------
         (struct-out actor-state)
         pretty-print-actor-state
--- a/racket/syndicate/pattern.rkt
+++ b/racket/syndicate/pattern.rkt
@ -4,6 +4,7 @@
 (provide (for-syntax analyze-pattern)
         (struct-out predicate-match)
         match-value/captures
+         ?
         )

 (require (for-syntax racket/base))