summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-12-08 09:25:45 -0800
committerKaz Kylheku <kaz@kylheku.com>2011-12-08 09:25:45 -0800
commitb1088a2502cba1a61b862f708489c8d4baa722fe (patch)
tree431c989e35795e4aba2bbe28905ab0d71ca95036 /eval.c
parentd453ed5dfbd7dee9d281c2d03a43146e0509bbde (diff)
downloadtxr-b1088a2502cba1a61b862f708489c8d4baa722fe.tar.gz
txr-b1088a2502cba1a61b862f708489c8d4baa722fe.tar.bz2
txr-b1088a2502cba1a61b862f708489c8d4baa722fe.zip
C++ maintenance.
* eval.c (and_s, or_s): Redundant variables removed. * match.h (do_s): extern storage class specifier added.
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/eval.c b/eval.c
index f3ee2b4f..7834c074 100644
--- a/eval.c
+++ b/eval.c
@@ -51,7 +51,7 @@ val op_table;
val eval_error_s;
val progn_s, let_s, let_star_s, lambda_s, call_s;
-val cond_s, if_s, and_s, or_s, defvar_s, defun_s;
+val cond_s, if_s, defvar_s, defun_s;
val inc_s, dec_s, push_s, pop_s, flip_s, gethash_s, car_s, cdr_s, vecref_s;
val for_s, for_star_s, dohash_s, uw_protect_s, return_s, return_from_s;
val list_s, append_s, apply_s;
@@ -1055,8 +1055,6 @@ void eval_init(void)
call_s = intern(lit("call"), user_package);
cond_s = intern(lit("cond"), user_package);
if_s = intern(lit("if"), user_package);
- and_s = intern(lit("and"), user_package);
- or_s = intern(lit("or"), user_package);
defvar_s = intern(lit("defvar"), user_package);
defun_s = intern(lit("defun"), user_package);
inc_s = intern(lit("inc"), user_package);