txr: allow variable to span vertical function.

* match.c (v_var_compat, v_var): New static functions.
(match_files): No longer recognize v_var specially; it is now
handled via vertical table.
(dir_tables_init): Register a vertical sys:var directive also
via v_var function.
(match_compat_fixup): New function.

* txr.c (compat): Call match_compat_fixup.

* tests/010/span-var.txr: New file.

* txr.1: Documented.

1 files changed, 2 insertions, 0 deletions

diff --git a/txr.c b/txr.c
index 3157b879..f29ce7bd 100644
--- a/txr.c
+++ b/txr.c
@@ -451,6 +451,8 @@ static int compat(val optval)
   }
 
   sysroot_compat_fixup(compat);
+  match_compat_fixup(compat);
+
   opt_compat = compat;
   reg_varl(intern(lit("compat"), system_package), num(compat));
   return 1;