From 3d6cbdfd5e29a48da30493d98e9653d5eebbd9f5 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 30 Nov 2011 16:12:46 -0800 Subject: * lib.h (or2): Restore macro version of or2, because we need the sequencing! Making it an inline function broke the tests. But we can't have multiple evaluation either, so it's going to use a temporary lexical variable. (uses_or2): Macro which declares the lexical variable needed by or2. * debug.c (debug): add uses_or2. * eval.c (eval_intrinsic, op_modplace): Likewise. * lib.c (lazy_str, lazy_str_force_upto, lazy_str_get_trailing_list): Likewise. * match.c (h_parallel, v_freeform, v_parallel, v_output): Likewise. * parser.y (unquotes_occur): Likewise. * stream.c (format): Likewise. --- debug.c | 1 + 1 file changed, 1 insertion(+) (limited to 'debug.c') diff --git a/debug.c b/debug.c index 35e1e831..38a4b379 100644 --- a/debug.c +++ b/debug.c @@ -34,6 +34,7 @@ val debug(val form, val bindings, val data, val line, val chr) val print_data = t; for (;;) { + uses_or2; val input, command; if (print_form) { -- cgit v1.2.3