From 19b8654f3cc6b51e8c22138b42bee7031bef151a Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 2 Oct 2015 06:30:53 -0700 Subject: bugfix: macro-time not bound as special operator. * eval.c (eval_init): Bind macro-time to op_error. * genvim.txr: No longer manually add macro-time to txl-orig-sym. --- eval.c | 1 + genvim.txr | 1 - 2 files changed, 1 insertion(+), 1 deletion(-) diff --git a/eval.c b/eval.c index 12f8c305..f2386bfd 100644 --- a/eval.c +++ b/eval.c @@ -4056,6 +4056,7 @@ void eval_init(void) reg_op(macrolet_s, op_error); reg_op(symacrolet_s, op_error); + reg_op(macro_time_s, op_error); reg_op(var_s, op_meta_error); reg_op(expr_s, op_meta_error); reg_op(quote_s, op_quote); diff --git a/genvim.txr b/genvim.txr index 0bf7a34a..114766f2 100644 --- a/genvim.txr +++ b/genvim.txr @@ -18,7 +18,6 @@ static void dir_tables_init(void) (append-each ((sym (package-symbols pkg))) (when (or (boundp sym) (fboundp sym) (constantp sym)) (list sym))))) -@(do (set [txl-orig-sym 0..0] '(macro-time))) @(bind txl-sym @(append-each ((sym txl-orig-sym)) (let* ((pkg (symbol-package sym)) -- cgit v1.2.3