summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/ChangeLog17
-rw-r--r--libguile/alist.c1
-rw-r--r--libguile/arbiters.c1
-rw-r--r--libguile/async.c1
-rw-r--r--libguile/backtrace.c1
-rw-r--r--libguile/boolean.c1
-rw-r--r--libguile/chars.c1
-rw-r--r--libguile/continuations.c1
-rw-r--r--libguile/debug-malloc.c1
-rw-r--r--libguile/debug.c1
-rw-r--r--libguile/dynwind.c1
-rw-r--r--libguile/eq.c1
-rw-r--r--libguile/eval.c1
-rw-r--r--libguile/feature.c1
-rw-r--r--libguile/filesys.h1
-rw-r--r--libguile/gc.c1
-rw-r--r--libguile/gc_os_dep.c1
-rw-r--r--libguile/gdbint.c1
-rw-r--r--libguile/gh_data.c2
-rw-r--r--libguile/gh_eval.c2
-rw-r--r--libguile/gh_funcs.c2
-rw-r--r--libguile/gh_io.c2
-rw-r--r--libguile/gh_list.c2
-rw-r--r--libguile/gh_predicates.c2
-rw-r--r--libguile/hash.c1
-rw-r--r--libguile/hashtab.c1
-rw-r--r--libguile/iselect.c1
-rw-r--r--libguile/keywords.c1
-rw-r--r--libguile/list.c1
-rw-r--r--libguile/load.c1
-rw-r--r--libguile/mallocs.c1
-rw-r--r--libguile/net_db.c1
-rw-r--r--libguile/numbers.c1
-rw-r--r--libguile/objprop.c1
-rw-r--r--libguile/objprop.h1
-rw-r--r--libguile/options.c1
-rw-r--r--libguile/pairs.c1
-rw-r--r--libguile/print.c1
-rw-r--r--libguile/procprop.c1
-rw-r--r--libguile/procs.c2
-rw-r--r--libguile/properties.c1
-rw-r--r--libguile/ramap.c1
-rw-r--r--libguile/regex-posix.c1
-rw-r--r--libguile/root.c2
-rw-r--r--libguile/scmsigs.c1
-rw-r--r--libguile/simpos.c1
-rw-r--r--libguile/socket.c2
-rw-r--r--libguile/sort.c1
-rw-r--r--libguile/srcprop.c1
-rw-r--r--libguile/stackchk.c1
-rw-r--r--libguile/stacks.c1
-rw-r--r--libguile/strings.c1
-rw-r--r--libguile/strop.c1
-rw-r--r--libguile/strorder.c1
-rw-r--r--libguile/struct.c1
-rw-r--r--libguile/symbols.c1
-rw-r--r--libguile/tag.c1
-rw-r--r--libguile/threads.c1
-rw-r--r--libguile/unif.c1
-rw-r--r--libguile/variable.c1
-rw-r--r--libguile/vectors.c1
-rw-r--r--libguile/weaks.c1
62 files changed, 23 insertions, 64 deletions
diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 31cee4d36..cb5b40732 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,20 @@
+2001-03-09 Keisuke Nishida <kxn30@po.cwru.edu>
+
+ * alist.c, arbiters.c, async.c, backtrace.c, boolean.c, chars.c,
+ continuations.c, debug-malloc.c, debug.c, dynwind.c, eq.c, eval.c,
+ feature.c, filesys.h, gc_os_dep.c, gh_data.c, gh_eval.c,
+ gh_funcs.c, gh_io.c, gh_list.c, gh_predicates.c, hash.c,
+ hashtab.c, iselect.c, keywords.c, list.c, load.c, mallocs.c,
+ net_db.c, numbers.c, objprop.c, objprop.h, options.c, pairs.c,
+ print.c, procprop.c, procs.c, properties.c, ramap.c,
+ regex-posix.c, root.c, scmsigs.c, simpos.c, socket.c, srcprop.c,
+ stackchk.c, stacks.c, strings.c, strop.c, strorder.c, struct.c,
+ symbols.c, tag.c, threads.c, variable.c, vectors.c, weaks.c:
+ Remove #include <stdio.h>
+ * gc.c, gdbint.c, root.c, sort.c, unif.c: Add #include <string.h>.
+
+ * procs.c (scm_make_subr_opt): Init symcell to avoid warning.
+
2001-03-09 Martin Grabmueller <mgrabmue@cs.tu-berlin.de>
* posix.c (scm_gethostname): Set initial name length to 256 for
diff --git a/libguile/alist.c b/libguile/alist.c
index cd4f182ff..5e75c8e95 100644
--- a/libguile/alist.c
+++ b/libguile/alist.c
@@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/eq.h"
#include "libguile/list.h"
diff --git a/libguile/arbiters.c b/libguile/arbiters.c
index c388dfaf0..faa0f4613 100644
--- a/libguile/arbiters.c
+++ b/libguile/arbiters.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/ports.h"
#include "libguile/smob.h"
diff --git a/libguile/async.c b/libguile/async.c
index d1f834df0..e57b821ae 100644
--- a/libguile/async.c
+++ b/libguile/async.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include <signal.h>
#include "libguile/_scm.h"
#include "libguile/eval.h"
diff --git a/libguile/backtrace.c b/libguile/backtrace.c
index 7661c19d6..d0f4820ba 100644
--- a/libguile/backtrace.c
+++ b/libguile/backtrace.c
@@ -47,7 +47,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include <ctype.h>
#include "libguile/_scm.h"
diff --git a/libguile/boolean.c b/libguile/boolean.c
index 9fd89a611..7bda2139f 100644
--- a/libguile/boolean.c
+++ b/libguile/boolean.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/validate.h"
diff --git a/libguile/chars.c b/libguile/chars.c
index 9ca1fac6b..c47705645 100644
--- a/libguile/chars.c
+++ b/libguile/chars.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include <ctype.h>
#include "libguile/_scm.h"
#include "libguile/validate.h"
diff --git a/libguile/continuations.c b/libguile/continuations.c
index 3b07e1f06..28985e060 100644
--- a/libguile/continuations.c
+++ b/libguile/continuations.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include <string.h>
#include "libguile/_scm.h"
diff --git a/libguile/debug-malloc.c b/libguile/debug-malloc.c
index 8b2a08ceb..4240f7d8b 100644
--- a/libguile/debug-malloc.c
+++ b/libguile/debug-malloc.c
@@ -40,7 +40,6 @@
* If you do not wish that, delete this exception notice. */
#include <string.h>
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/alist.h"
diff --git a/libguile/debug.c b/libguile/debug.c
index 275c05bc4..354ddd6e6 100644
--- a/libguile/debug.c
+++ b/libguile/debug.c
@@ -47,7 +47,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/eval.h"
#include "libguile/stackchk.h"
diff --git a/libguile/dynwind.c b/libguile/dynwind.c
index 647c044ab..101107c70 100644
--- a/libguile/dynwind.c
+++ b/libguile/dynwind.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/eval.h"
#include "libguile/alist.h"
diff --git a/libguile/eq.c b/libguile/eq.c
index 275fa717f..8eda34047 100644
--- a/libguile/eq.c
+++ b/libguile/eq.c
@@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/ramap.h"
#include "libguile/stackchk.h"
diff --git a/libguile/eval.c b/libguile/eval.c
index 93a4a166a..4c58a54df 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -78,7 +78,6 @@ char *alloca ();
# endif
#endif
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/debug.h"
#include "libguile/dynwind.h"
diff --git a/libguile/feature.c b/libguile/feature.c
index 4b4320901..d37b83ce9 100644
--- a/libguile/feature.c
+++ b/libguile/feature.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#ifdef HAVE_STRING_H
#include <string.h>
#endif
diff --git a/libguile/filesys.h b/libguile/filesys.h
index c71d844f2..549d71a05 100644
--- a/libguile/filesys.h
+++ b/libguile/filesys.h
@@ -47,7 +47,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include "libguile/__scm.h"
diff --git a/libguile/gc.c b/libguile/gc.c
index 038822a50..bf554aa05 100644
--- a/libguile/gc.c
+++ b/libguile/gc.c
@@ -51,6 +51,7 @@
#include <stdio.h>
+#include <string.h>
#include "libguile/_scm.h"
#include "libguile/eval.h"
#include "libguile/stime.h"
diff --git a/libguile/gc_os_dep.c b/libguile/gc_os_dep.c
index 0001cf824..d05105a63 100644
--- a/libguile/gc_os_dep.c
+++ b/libguile/gc_os_dep.c
@@ -1419,7 +1419,6 @@ word x;
# endif
# endif
-# include <stdio.h>
# include <signal.h>
/* Blatantly OS dependent routines, except for those that are related */
diff --git a/libguile/gdbint.c b/libguile/gdbint.c
index 2f6a036aa..e18fea8a8 100644
--- a/libguile/gdbint.c
+++ b/libguile/gdbint.c
@@ -50,6 +50,7 @@
#include "libguile/_scm.h"
#include <stdio.h>
+#include <string.h>
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
diff --git a/libguile/gh_data.c b/libguile/gh_data.c
index 6e7eab19c..21510c4e9 100644
--- a/libguile/gh_data.c
+++ b/libguile/gh_data.c
@@ -41,8 +41,6 @@
/* data initialization and C<->Scheme data conversion */
-#include <stdio.h>
-
#include "libguile/gh.h"
#ifdef HAVE_STRING_H
#include <string.h>
diff --git a/libguile/gh_eval.c b/libguile/gh_eval.c
index 46f6f97ac..71c8f9350 100644
--- a/libguile/gh_eval.c
+++ b/libguile/gh_eval.c
@@ -42,8 +42,6 @@
/* routines to evaluate Scheme code */
-#include <stdio.h>
-
#include "libguile/gh.h"
typedef SCM (*gh_eval_t) (void *data, SCM jmpbuf);
diff --git a/libguile/gh_funcs.c b/libguile/gh_funcs.c
index 5374a0143..6f43cf734 100644
--- a/libguile/gh_funcs.c
+++ b/libguile/gh_funcs.c
@@ -43,8 +43,6 @@
/* Defining Scheme functions implemented by C functions --- subrs. */
-#include <stdio.h>
-
#include "libguile/gh.h"
/* allows you to define new scheme primitives written in C */
diff --git a/libguile/gh_io.c b/libguile/gh_io.c
index c60032ee2..41ca3a724 100644
--- a/libguile/gh_io.c
+++ b/libguile/gh_io.c
@@ -40,8 +40,6 @@
* If you do not wish that, delete this exception notice. */
-#include <stdio.h>
-
#include "libguile/gh.h"
void
diff --git a/libguile/gh_list.c b/libguile/gh_list.c
index 4054dc5d9..7bdd9440d 100644
--- a/libguile/gh_list.c
+++ b/libguile/gh_list.c
@@ -42,8 +42,6 @@
/* list manipulation */
-#include <stdio.h>
-
#include "libguile/gh.h"
/* returns the length of a list */
diff --git a/libguile/gh_predicates.c b/libguile/gh_predicates.c
index fe5fc140a..1bd234b50 100644
--- a/libguile/gh_predicates.c
+++ b/libguile/gh_predicates.c
@@ -42,8 +42,6 @@
/* type predicates and equality predicates */
-#include <stdio.h>
-
#include "libguile/gh.h"
/* type predicates: tell you if an SCM object has a given type */
diff --git a/libguile/hash.c b/libguile/hash.c
index 8f8dfbb7a..f2bb819ec 100644
--- a/libguile/hash.c
+++ b/libguile/hash.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/chars.h"
#include "libguile/ports.h"
diff --git a/libguile/hashtab.c b/libguile/hashtab.c
index 1f001f236..23fba77fe 100644
--- a/libguile/hashtab.c
+++ b/libguile/hashtab.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/alist.h"
#include "libguile/hash.h"
diff --git a/libguile/iselect.c b/libguile/iselect.c
index d18213c4c..d7bda8812 100644
--- a/libguile/iselect.c
+++ b/libguile/iselect.c
@@ -39,7 +39,6 @@
* whether to permit this exception to apply to your modifications.
* If you do not wish that, delete this exception notice. */
-#include <stdio.h>
#include <limits.h>
#include <string.h>
diff --git a/libguile/keywords.c b/libguile/keywords.c
index 8af562ec5..84d942dfa 100644
--- a/libguile/keywords.c
+++ b/libguile/keywords.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include <string.h>
#include "libguile/_scm.h"
diff --git a/libguile/list.c b/libguile/list.c
index 6493df8de..141d48a99 100644
--- a/libguile/list.c
+++ b/libguile/list.c
@@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/eq.h"
diff --git a/libguile/load.c b/libguile/load.c
index 8be776db7..496f2b8a5 100644
--- a/libguile/load.c
+++ b/libguile/load.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include <string.h>
#include "libguile/_scm.h"
diff --git a/libguile/mallocs.c b/libguile/mallocs.c
index f0f9606c6..035539f9b 100644
--- a/libguile/mallocs.c
+++ b/libguile/mallocs.c
@@ -22,7 +22,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/ports.h"
#include "libguile/smob.h"
diff --git a/libguile/net_db.c b/libguile/net_db.c
index 408400f58..ba9599671 100644
--- a/libguile/net_db.c
+++ b/libguile/net_db.c
@@ -51,7 +51,6 @@
*/
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/feature.h"
#include "libguile/strings.h"
diff --git a/libguile/numbers.c b/libguile/numbers.c
index 2b2cedbff..8841dbd50 100644
--- a/libguile/numbers.c
+++ b/libguile/numbers.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include <math.h>
#include "libguile/_scm.h"
#include "libguile/feature.h"
diff --git a/libguile/objprop.c b/libguile/objprop.c
index 04b3106d8..17f935e94 100644
--- a/libguile/objprop.c
+++ b/libguile/objprop.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/hashtab.h"
#include "libguile/alist.h"
diff --git a/libguile/objprop.h b/libguile/objprop.h
index 4d94bbcd2..376991017 100644
--- a/libguile/objprop.h
+++ b/libguile/objprop.h
@@ -44,7 +44,6 @@
* If you do not wish that, delete this exception notice. */
-#include <stdio.h>
#include "libguile/__scm.h"
diff --git a/libguile/options.c b/libguile/options.c
index 5bd622d30..c5260e669 100644
--- a/libguile/options.c
+++ b/libguile/options.c
@@ -47,7 +47,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/strings.h"
diff --git a/libguile/pairs.c b/libguile/pairs.c
index 26ab6330f..070d08da2 100644
--- a/libguile/pairs.c
+++ b/libguile/pairs.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/validate.h"
diff --git a/libguile/print.c b/libguile/print.c
index 1e86d854d..0d822c58b 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/chars.h"
#include "libguile/continuations.h"
diff --git a/libguile/procprop.c b/libguile/procprop.c
index f0ec8dd2e..791dce74b 100644
--- a/libguile/procprop.c
+++ b/libguile/procprop.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/alist.h"
diff --git a/libguile/procs.c b/libguile/procs.c
index 44a869bfb..0e59df8ad 100644
--- a/libguile/procs.c
+++ b/libguile/procs.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/objects.h"
@@ -95,6 +94,7 @@ scm_make_subr_opt (const char *name, int type, SCM (*fcn) (), int set)
}
else
{
+ symcell = SCM_BOOL_F; /* to avoid warning */
symbol = scm_str2symbol (name);
}
diff --git a/libguile/properties.c b/libguile/properties.c
index 5da889138..b33343862 100644
--- a/libguile/properties.c
+++ b/libguile/properties.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/hashtab.h"
#include "libguile/alist.h"
diff --git a/libguile/ramap.c b/libguile/ramap.c
index 92aa19681..21e222c5b 100644
--- a/libguile/ramap.c
+++ b/libguile/ramap.c
@@ -51,7 +51,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/strings.h"
#include "libguile/unif.h"
diff --git a/libguile/regex-posix.c b/libguile/regex-posix.c
index da18e9119..5fafba687 100644
--- a/libguile/regex-posix.c
+++ b/libguile/regex-posix.c
@@ -53,7 +53,6 @@
libraries which do not agree with the Spencer implementation may
produce varying behavior. Sigh. */
-#include <stdio.h>
#include <sys/types.h>
#include "libguile/_scm.h"
diff --git a/libguile/root.c b/libguile/root.c
index 88ae8b0ca..6779f6779 100644
--- a/libguile/root.c
+++ b/libguile/root.c
@@ -44,7 +44,7 @@
-#include <stdio.h>
+#include <string.h>
#include "libguile/_scm.h"
#include "libguile/stackchk.h"
#include "libguile/dynwind.h"
diff --git a/libguile/scmsigs.c b/libguile/scmsigs.c
index 415169915..baa597e31 100644
--- a/libguile/scmsigs.c
+++ b/libguile/scmsigs.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include <signal.h>
#include "libguile/_scm.h"
diff --git a/libguile/simpos.c b/libguile/simpos.c
index 041fe70d1..db0c04beb 100644
--- a/libguile/simpos.c
+++ b/libguile/simpos.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/scmsigs.h"
diff --git a/libguile/socket.c b/libguile/socket.c
index a637aa7ea..52e0fff57 100644
--- a/libguile/socket.c
+++ b/libguile/socket.c
@@ -44,8 +44,6 @@
-#include <stdio.h>
-
#include "libguile/_scm.h"
#include "libguile/unif.h"
#include "libguile/feature.h"
diff --git a/libguile/sort.c b/libguile/sort.c
index 659c901bd..2d3ca3c1f 100644
--- a/libguile/sort.c
+++ b/libguile/sort.c
@@ -78,6 +78,7 @@ char *alloca ();
# endif
#endif
+#include <string.h>
#include "libguile/_scm.h"
#include "libguile/eval.h"
diff --git a/libguile/srcprop.c b/libguile/srcprop.c
index 341c9a670..41cd36cc2 100644
--- a/libguile/srcprop.c
+++ b/libguile/srcprop.c
@@ -47,7 +47,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/smob.h"
#include "libguile/alist.h"
diff --git a/libguile/stackchk.c b/libguile/stackchk.c
index 3b31ff263..bede70e86 100644
--- a/libguile/stackchk.c
+++ b/libguile/stackchk.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/ports.h"
#include "libguile/root.h"
diff --git a/libguile/stacks.c b/libguile/stacks.c
index e223d4ff1..92873a469 100644
--- a/libguile/stacks.c
+++ b/libguile/stacks.c
@@ -48,7 +48,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/eval.h"
#include "libguile/debug.h"
diff --git a/libguile/strings.c b/libguile/strings.c
index 3874b4a05..e2277fe39 100644
--- a/libguile/strings.c
+++ b/libguile/strings.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include <string.h>
#include "libguile/_scm.h"
diff --git a/libguile/strop.c b/libguile/strop.c
index 1ad572283..01665dd97 100644
--- a/libguile/strop.c
+++ b/libguile/strop.c
@@ -23,7 +23,6 @@ Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/chars.h"
#include "libguile/strings.h"
diff --git a/libguile/strorder.c b/libguile/strorder.c
index 22f60db49..2dee2b800 100644
--- a/libguile/strorder.c
+++ b/libguile/strorder.c
@@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/chars.h"
#include "libguile/strings.h"
diff --git a/libguile/struct.c b/libguile/struct.c
index 52af06f2e..3c15deb53 100644
--- a/libguile/struct.c
+++ b/libguile/struct.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/chars.h"
#include "libguile/eval.h"
diff --git a/libguile/symbols.c b/libguile/symbols.c
index 76e15cb8a..2d6d081ea 100644
--- a/libguile/symbols.c
+++ b/libguile/symbols.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/chars.h"
#include "libguile/eval.h"
diff --git a/libguile/tag.c b/libguile/tag.c
index db385905f..095572d1a 100644
--- a/libguile/tag.c
+++ b/libguile/tag.c
@@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/chars.h"
#include "libguile/struct.h"
diff --git a/libguile/threads.c b/libguile/threads.c
index 85f38ca96..2bf5180f6 100644
--- a/libguile/threads.c
+++ b/libguile/threads.c
@@ -62,7 +62,6 @@
* second #inclusion
*/
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/dynwind.h"
#include "libguile/smob.h"
diff --git a/libguile/unif.c b/libguile/unif.c
index 1a801317b..7e4e1a8bc 100644
--- a/libguile/unif.c
+++ b/libguile/unif.c
@@ -52,6 +52,7 @@
#include <stdio.h>
+#include <string.h>
#include "libguile/_scm.h"
#include "libguile/chars.h"
#include "libguile/eval.h"
diff --git a/libguile/variable.c b/libguile/variable.c
index a088be209..4ce7d6110 100644
--- a/libguile/variable.c
+++ b/libguile/variable.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/eq.h"
#include "libguile/ports.h"
diff --git a/libguile/vectors.c b/libguile/vectors.c
index 25c7c8a36..bd1b7ba85 100644
--- a/libguile/vectors.c
+++ b/libguile/vectors.c
@@ -44,7 +44,6 @@
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/eq.h"
#include "libguile/root.h"
diff --git a/libguile/weaks.c b/libguile/weaks.c
index f340922fe..91167d230 100644
--- a/libguile/weaks.c
+++ b/libguile/weaks.c
@@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
-#include <stdio.h>
#include "libguile/_scm.h"
#include "libguile/vectors.h"