From 17e862b8017e3ccd8ed1c1fc8fb17019343b9657 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Mon, 8 Jun 2020 11:20:44 -0700
Subject: [PATCH] misc: add private definitions to syntax-test file.

---
 misc/syntax-test.factor | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/misc/syntax-test.factor b/misc/syntax-test.factor
index ea5d915e44..ca39b3ad38 100644
--- a/misc/syntax-test.factor
+++ b/misc/syntax-test.factor
@@ -63,6 +63,27 @@
     SLOT: name
     C: <foo> foo
 
+! Private definitions
+
+<PRIVATE
+
+    : word ( x -- ) drop ;
+    :: word ( x -- ) x drop ;
+    TYPED: word ( a b: class ... -- x: class y ... ) body ;
+    TYPED:: word ( a b: class ... -- x: class y ... ) body ;
+    MACRO: word ( inputs... -- ) definition... ) ;
+    MACRO:: word ( vars... -- outputs... ) definition... ) ;
+    M: class generic (definition) ... ;
+    M:: class generic ( vars... -- outputs... ) body... ;
+    GENERIC: word ( stack -- effect )
+    HOOK: word variable ( stack -- effect )
+    GENERIC#: word 1 ( stack -- effect )
+    MATH: + ( x y -- z ) foldable flushable
+    SLOT: name
+    C: <foo> foo
+
+PRIVATE>
+
 ! Alien
 
     LIBRARY: name
-- 
2.34.1