mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-07-03 16:20:39 +02:00
Code Activity

Small adjustment to remove compiler warning message.

Browse source
This commit is contained in:
Mikael Djurfeldt 1997-10-02 22:13:26 +00:00
parent ba031394ec
commit f44dd64b76
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/print.c
View file

@ -356,7 +356,7 @@ taloop:
name = scm_macro_name (exp); name = scm_macro_name (exp);
if (!SCM_CLOSUREP (SCM_CDR (exp))) if (!SCM_CLOSUREP (SCM_CDR (exp)))
{ {
code = 0; code = env = 0;
scm_gen_puts (scm_regular_string, "#<primitive-", scm_gen_puts (scm_regular_string, "#<primitive-",
port); port);
} }