From 61aa8e0cfc6c1483ad7d71cfa15df7aae926df48 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 8 Mar 2014 09:49:12 -0800
Subject: * genvim.txr: Handle variable definition without embedded intern.

---
 genvim.txr | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'genvim.txr')

diff --git a/genvim.txr b/genvim.txr
index b9d6b816..d443439d 100644
--- a/genvim.txr
+++ b/genvim.txr
@@ -24,6 +24,9 @@ static void dir_tables_init(void)
   reg_fun(intern(lit("@{txl-sym}")@(skip)
 @    (or)
   reg_fun(@{txl-sym}_s,@(skip)
+@    (or)
+  reg_var(@{txl-sym-special}_s,@(skip)
+@      (bind txl-sym `*@{txl-sym-special}*`)
 @    (or)
   @/ */reg_var(@(skip)intern(lit("@{txl-sym}")@(skip)
 @    (end)
-- 
cgit v1.2.3