From 0693e88031ad093c15320703557f0798b59ac46f Mon Sep 17 00:00:00 2001
From: Tony Garnock-Jones <tonygarnockjones@gmail.com>
Date: Wed, 11 May 2016 10:59:27 -0400
Subject: [PATCH] Allow "message type ..." as well as "assertion type ...".

---
 js/compiler/syndicate.ohm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/js/compiler/syndicate.ohm b/js/compiler/syndicate.ohm
index 1bc0a01..b07d9e9 100644
--- a/js/compiler/syndicate.ohm
+++ b/js/compiler/syndicate.ohm
@@ -27,7 +27,7 @@ Syndicate <: ES5 {
     | react FacetBlock                                   -- forever
 
   AssertionTypeDeclarationStatement
-    = assertion type identifier "(" FormalParameterList ")" ("=" stringLiteral)? #(sc)
+    = (assertion | message) type identifier "(" FormalParameterList ")" ("=" stringLiteral)? #(sc)
 
   SendMessageStatement = "::" Expression<withIn> #(sc)