From a9832c2a419acae33a7a2a1b752d427e4cdf0b86 Mon Sep 17 00:00:00 2001
From: kitty <nepeta@canaglie.net>
Date: Tue, 21 Apr 2026 23:40:06 +1000
Subject: =?UTF-8?q?words=20now=20Working=E2=84=A2?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 test.fs | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'test.fs')

diff --git a/test.fs b/test.fs
index 78dd006..7eb09f0 100644
--- a/test.fs
+++ b/test.fs
@@ -477,4 +477,13 @@ t{ ge7 -> 124 }t
 t{ gs4 123 456
     -> }t
 
+testing vocabularies
+
+t{ vocabulary testvoc -> }t
+t{ also testvoc definitions -> }t
+t{ get-current empty-wordlist? -> <true> }t
+t{ : testicle  67 ; -> }t
+t{ get-current empty-wordlist? -> <false> }t
+t{ testicle -> 67 }t
+
 decimal
-- 
cgit v1.2.3