* eval.c (subst_vars): Handle lone symbols (not wrapped

in sys::var form) as variables. This allows interpretation of metanums
in quasiliterals, because these are replaced by variables in the
op expander.

* parser.l: Recognize METANUM in QSILIT state.

* parser.y (quasi_item): METANUM parsed in quasiliteral.

* txr.vim: Metanums highlighted properly.

1 files changed, 2 insertions, 0 deletions

diff --git a/parser.y b/parser.y
index 1059c863..24f38fb0 100644
--- a/parser.y
+++ b/parser.y
@@ -833,6 +833,8 @@ quasi_items : quasi_item                { $$ = cons($1, nil); }
 quasi_item : litchars           { $$ = lit_char_helper($1); }
            | TEXT               { $$ = string_own($1); }
            | o_var              { $$ = $1; }
+           | METANUM            { $$ = cons(var_s, cons($1, nil));
+                                  rl($$, num(lineno)); }
            | list               { $$ = rlcp(cons(expr_s, expand($1)), $1); }
            ;