1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-02 21:10:27 +02:00

Remove #include <stdio.h>. Add #include <string.h>.

This commit is contained in:
Keisuke Nishida 2001-03-09 23:33:41 +00:00
parent ffdeebc3a9
commit 783e777478
62 changed files with 23 additions and 64 deletions

View file

@ -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> 2001-03-09 Martin Grabmueller <mgrabmue@cs.tu-berlin.de>
* posix.c (scm_gethostname): Set initial name length to 256 for * posix.c (scm_gethostname): Set initial name length to 256 for

View file

@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eq.h" #include "libguile/eq.h"
#include "libguile/list.h" #include "libguile/list.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/ports.h" #include "libguile/ports.h"
#include "libguile/smob.h" #include "libguile/smob.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include <signal.h> #include <signal.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eval.h" #include "libguile/eval.h"

View file

@ -47,7 +47,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include <ctype.h> #include <ctype.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/validate.h" #include "libguile/validate.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include <ctype.h> #include <ctype.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/validate.h" #include "libguile/validate.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include <string.h> #include <string.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"

View file

@ -40,7 +40,6 @@
* If you do not wish that, delete this exception notice. */ * If you do not wish that, delete this exception notice. */
#include <string.h> #include <string.h>
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/alist.h" #include "libguile/alist.h"

View file

@ -47,7 +47,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eval.h" #include "libguile/eval.h"
#include "libguile/stackchk.h" #include "libguile/stackchk.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eval.h" #include "libguile/eval.h"
#include "libguile/alist.h" #include "libguile/alist.h"

View file

@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/ramap.h" #include "libguile/ramap.h"
#include "libguile/stackchk.h" #include "libguile/stackchk.h"

View file

@ -78,7 +78,6 @@ char *alloca ();
# endif # endif
#endif #endif
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/debug.h" #include "libguile/debug.h"
#include "libguile/dynwind.h" #include "libguile/dynwind.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#ifdef HAVE_STRING_H #ifdef HAVE_STRING_H
#include <string.h> #include <string.h>
#endif #endif

View file

@ -47,7 +47,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include "libguile/__scm.h" #include "libguile/__scm.h"

View file

@ -51,6 +51,7 @@
#include <stdio.h> #include <stdio.h>
#include <string.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eval.h" #include "libguile/eval.h"
#include "libguile/stime.h" #include "libguile/stime.h"

View file

@ -1419,7 +1419,6 @@ word x;
# endif # endif
# endif # endif
# include <stdio.h>
# include <signal.h> # include <signal.h>
/* Blatantly OS dependent routines, except for those that are related */ /* Blatantly OS dependent routines, except for those that are related */

View file

@ -50,6 +50,7 @@
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include <stdio.h> #include <stdio.h>
#include <string.h>
#ifdef HAVE_UNISTD_H #ifdef HAVE_UNISTD_H
#include <unistd.h> #include <unistd.h>
#endif #endif

View file

@ -41,8 +41,6 @@
/* data initialization and C<->Scheme data conversion */ /* data initialization and C<->Scheme data conversion */
#include <stdio.h>
#include "libguile/gh.h" #include "libguile/gh.h"
#ifdef HAVE_STRING_H #ifdef HAVE_STRING_H
#include <string.h> #include <string.h>

View file

@ -42,8 +42,6 @@
/* routines to evaluate Scheme code */ /* routines to evaluate Scheme code */
#include <stdio.h>
#include "libguile/gh.h" #include "libguile/gh.h"
typedef SCM (*gh_eval_t) (void *data, SCM jmpbuf); typedef SCM (*gh_eval_t) (void *data, SCM jmpbuf);

View file

@ -43,8 +43,6 @@
/* Defining Scheme functions implemented by C functions --- subrs. */ /* Defining Scheme functions implemented by C functions --- subrs. */
#include <stdio.h>
#include "libguile/gh.h" #include "libguile/gh.h"
/* allows you to define new scheme primitives written in C */ /* allows you to define new scheme primitives written in C */

View file

@ -40,8 +40,6 @@
* If you do not wish that, delete this exception notice. */ * If you do not wish that, delete this exception notice. */
#include <stdio.h>
#include "libguile/gh.h" #include "libguile/gh.h"
void void

View file

@ -42,8 +42,6 @@
/* list manipulation */ /* list manipulation */
#include <stdio.h>
#include "libguile/gh.h" #include "libguile/gh.h"
/* returns the length of a list */ /* returns the length of a list */

View file

@ -42,8 +42,6 @@
/* type predicates and equality predicates */ /* type predicates and equality predicates */
#include <stdio.h>
#include "libguile/gh.h" #include "libguile/gh.h"
/* type predicates: tell you if an SCM object has a given type */ /* type predicates: tell you if an SCM object has a given type */

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/chars.h" #include "libguile/chars.h"
#include "libguile/ports.h" #include "libguile/ports.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/alist.h" #include "libguile/alist.h"
#include "libguile/hash.h" #include "libguile/hash.h"

View file

@ -39,7 +39,6 @@
* whether to permit this exception to apply to your modifications. * whether to permit this exception to apply to your modifications.
* If you do not wish that, delete this exception notice. */ * If you do not wish that, delete this exception notice. */
#include <stdio.h>
#include <limits.h> #include <limits.h>
#include <string.h> #include <string.h>

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include <string.h> #include <string.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"

View file

@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eq.h" #include "libguile/eq.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include <string.h> #include <string.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"

View file

@ -22,7 +22,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/ports.h" #include "libguile/ports.h"
#include "libguile/smob.h" #include "libguile/smob.h"

View file

@ -51,7 +51,6 @@
*/ */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/feature.h" #include "libguile/feature.h"
#include "libguile/strings.h" #include "libguile/strings.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include <math.h> #include <math.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/feature.h" #include "libguile/feature.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/hashtab.h" #include "libguile/hashtab.h"
#include "libguile/alist.h" #include "libguile/alist.h"

View file

@ -44,7 +44,6 @@
* If you do not wish that, delete this exception notice. */ * If you do not wish that, delete this exception notice. */
#include <stdio.h>
#include "libguile/__scm.h" #include "libguile/__scm.h"

View file

@ -47,7 +47,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/strings.h" #include "libguile/strings.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/validate.h" #include "libguile/validate.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/chars.h" #include "libguile/chars.h"
#include "libguile/continuations.h" #include "libguile/continuations.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/alist.h" #include "libguile/alist.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/objects.h" #include "libguile/objects.h"
@ -95,6 +94,7 @@ scm_make_subr_opt (const char *name, int type, SCM (*fcn) (), int set)
} }
else else
{ {
symcell = SCM_BOOL_F; /* to avoid warning */
symbol = scm_str2symbol (name); symbol = scm_str2symbol (name);
} }

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/hashtab.h" #include "libguile/hashtab.h"
#include "libguile/alist.h" #include "libguile/alist.h"

View file

@ -51,7 +51,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/strings.h" #include "libguile/strings.h"
#include "libguile/unif.h" #include "libguile/unif.h"

View file

@ -53,7 +53,6 @@
libraries which do not agree with the Spencer implementation may libraries which do not agree with the Spencer implementation may
produce varying behavior. Sigh. */ produce varying behavior. Sigh. */
#include <stdio.h>
#include <sys/types.h> #include <sys/types.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"

View file

@ -44,7 +44,7 @@
#include <stdio.h> #include <string.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/stackchk.h" #include "libguile/stackchk.h"
#include "libguile/dynwind.h" #include "libguile/dynwind.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include <signal.h> #include <signal.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/scmsigs.h" #include "libguile/scmsigs.h"

View file

@ -44,8 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/unif.h" #include "libguile/unif.h"
#include "libguile/feature.h" #include "libguile/feature.h"

View file

@ -78,6 +78,7 @@ char *alloca ();
# endif # endif
#endif #endif
#include <string.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eval.h" #include "libguile/eval.h"

View file

@ -47,7 +47,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/smob.h" #include "libguile/smob.h"
#include "libguile/alist.h" #include "libguile/alist.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/ports.h" #include "libguile/ports.h"
#include "libguile/root.h" #include "libguile/root.h"

View file

@ -48,7 +48,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eval.h" #include "libguile/eval.h"
#include "libguile/debug.h" #include "libguile/debug.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include <string.h> #include <string.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"

View file

@ -23,7 +23,6 @@ Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/chars.h" #include "libguile/chars.h"
#include "libguile/strings.h" #include "libguile/strings.h"

View file

@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/chars.h" #include "libguile/chars.h"
#include "libguile/strings.h" #include "libguile/strings.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/chars.h" #include "libguile/chars.h"
#include "libguile/eval.h" #include "libguile/eval.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/chars.h" #include "libguile/chars.h"
#include "libguile/eval.h" #include "libguile/eval.h"

View file

@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/chars.h" #include "libguile/chars.h"
#include "libguile/struct.h" #include "libguile/struct.h"

View file

@ -62,7 +62,6 @@
* second #inclusion * second #inclusion
*/ */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/dynwind.h" #include "libguile/dynwind.h"
#include "libguile/smob.h" #include "libguile/smob.h"

View file

@ -52,6 +52,7 @@
#include <stdio.h> #include <stdio.h>
#include <string.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/chars.h" #include "libguile/chars.h"
#include "libguile/eval.h" #include "libguile/eval.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eq.h" #include "libguile/eq.h"
#include "libguile/ports.h" #include "libguile/ports.h"

View file

@ -44,7 +44,6 @@
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/eq.h" #include "libguile/eq.h"
#include "libguile/root.h" #include "libguile/root.h"

View file

@ -43,7 +43,6 @@
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
#include <stdio.h>
#include "libguile/_scm.h" #include "libguile/_scm.h"
#include "libguile/vectors.h" #include "libguile/vectors.h"