summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/strports.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/strports.c b/libguile/strports.c
index e0b1b092b..3518c9cff 100644
--- a/libguile/strports.c
+++ b/libguile/strports.c
@@ -259,7 +259,7 @@ scm_eval_0str (expr)
SCM_OPN | SCM_RDNG,
"scm_eval_0str");
SCM form;
- SCM ans;
+ SCM ans = SCM_EOL;
/* Read expressions from that port; ignore the values. */
while ((form = scm_read (port, SCM_BOOL_F, SCM_BOOL_F)) != SCM_EOF_VAL)