diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2014-10-20 07:35:05 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2014-10-20 07:35:05 -0700 |
commit | c8b05c1e80d9b17a4fb002ee2cd8683632e6184d (patch) | |
tree | fd5a3b21943c1e635776b2d2681cc57f1d8cb71b /genvim.txr | |
parent | b50d160363fd8f2c84b23b03a5f5e9d22911693e (diff) | |
download | txr-c8b05c1e80d9b17a4fb002ee2cd8683632e6184d.tar.gz txr-c8b05c1e80d9b17a4fb002ee2cd8683632e6184d.tar.bz2 txr-c8b05c1e80d9b17a4fb002ee2cd8683632e6184d.zip |
Source file inclusion implemented: needed for macros.
* match.c (include_s): New symbol variable.
(v_load): Function extended to handle include semantics.
(include): External wrapper function for doing inclusion
via v_load.
(syms_init): include_s initialized.
* match.h (include_s): Declared.
(include): Declared.
* parser.y (check_for_include): New static function.
(clauses_rev): Use check_for_include to replace @(include ..)
directive.
* txr.1: Documented include.
* genvim.txr: Added include symbol.
* txr.vim: Regenerated.
Diffstat (limited to 'genvim.txr')
-rw-r--r-- | genvim.txr | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -37,7 +37,8 @@ static void dir_tables_init(void) @(do (set [txr-sym 0..0] '("rep" "end" "and" "or" "catch" "finally" "until" "last" - "if" "else" "elif"))) + "if" "else" "elif" + "include"))) @(do (set [txl-sym 0..0] '("macro-time" "macrolet" "symacrolet"))) @(set (txr-sym txl-sym) (@(sort (uniq txr-sym)) @(sort (uniq txl-sym)))) @(output) |