summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2012-01-26 20:51:38 -0800
committerKaz Kylheku <kaz@kylheku.com>2012-01-26 20:51:38 -0800
commit75df8bf9079c5edf23f6b6d3c4b1c5902ddf9653 (patch)
tree43ba39fdd2256c06160e5e846677aeb6d3ba1317 /eval.c
parent7002405ab17218baa4e2366a47860a5770d18650 (diff)
downloadtxr-75df8bf9079c5edf23f6b6d3c4b1c5902ddf9653.tar.gz
txr-75df8bf9079c5edf23f6b6d3c4b1c5902ddf9653.tar.bz2
txr-75df8bf9079c5edf23f6b6d3c4b1c5902ddf9653.zip
* eval.c (op_modplace): Fix warning caught by gcc, but not g++.txr-55
* lib.c (replace_list): Fix code that is valid C++ but not C.
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/eval.c b/eval.c
index af712130..8ae828fe 100644
--- a/eval.c
+++ b/eval.c
@@ -782,7 +782,7 @@ static val op_modplace(val form, val env)
/* TODO: dispatch these with hash table. */
val sym = car(place);
if (sym == dwim_s) {
- val ret;
+ val ret = nil;
loc = dwim_loc(place, env, op, newval, &ret);
if (loc == 0)
return ret;