From ff4d78c938128cd0572f6469425005d9019a7f38 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Wed, 30 Jul 2014 07:29:44 -0700
Subject: * parser.l: Allow unquotes and splices in QSPECIAL and BRACED states.

* parser.y (quasi_item): Support splices as items.

* genvim.txr: Syntax highlighting support for unquotes in
quasiliterals.

* txr.vim: Updated.
---
 parser.y | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'parser.y')

diff --git a/parser.y b/parser.y
index 68f54fc0..d59657c5 100644
--- a/parser.y
+++ b/parser.y
@@ -950,6 +950,8 @@ quasi_item : litchars           { $$ = lit_char_helper($1); }
            | METANUM            { $$ = cons(var_s, cons($1, nil));
                                   rl($$, num(lineno)); }
            | list               { $$ = rlcp(cons(expr_s, $1), $1); }
+           | ',' n_expr         { $$ = rlcp(cons(expr_s, list(sys_unquote_s, $2, nao)), $2); }
+           | SPLICE n_expr      { $$ = rlcp(cons(expr_s, list(sys_splice_s, $2, nao)), $2); }
            ;
 
 litchars : LITCHAR              { $$ = rl(cons(chr($1), nil), num(lineno)); }
-- 
cgit v1.2.3