diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1997-10-02 22:13:26 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1997-10-02 22:13:26 +0000 |
commit | f44dd64b76692365a4f9cc5f46cdf78aae116cac (patch) | |
tree | 6330f3b219ce0713b1e36255d6df9a458fa29af6 | |
parent | ba031394ecebf4f8c177b61fb0110ab9c905a27c (diff) | |
download | guile-f44dd64b76692365a4f9cc5f46cdf78aae116cac.tar.gz |
Small adjustment to remove compiler warning message.
-rw-r--r-- | libguile/print.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/print.c b/libguile/print.c index 90411b371..5a34f6001 100644 --- a/libguile/print.c +++ b/libguile/print.c @@ -356,7 +356,7 @@ taloop: name = scm_macro_name (exp); if (!SCM_CLOSUREP (SCM_CDR (exp))) { - code = 0; + code = env = 0; scm_gen_puts (scm_regular_string, "#<primitive-", port); } |