X-Git-Url: https://git.hcoop.net/bpt/guile.git/blobdiff_plain/1717856b4e8072b5aebab2324fcfba55bc504369..1cc91f1b2937a230a2dc80dd25cc6003b7b8f2b5:/libguile/genio.h diff --git a/libguile/genio.h b/libguile/genio.h index ef2fc6b50..78d17fac5 100644 --- a/libguile/genio.h +++ b/libguile/genio.h @@ -47,22 +47,13 @@ #include "libguile/__scm.h" -#ifdef __STDC__ -extern void scm_gen_putc (int c, SCM port); -extern void scm_gen_puts (enum scm_string_representation_type rep, - char *str_data, - SCM port); -extern void scm_gen_write (enum scm_string_representation_type rep, char *str_data, scm_sizet nitems, SCM port); -extern int scm_gen_getc (SCM port); -extern void scm_gen_ungetc (int c, SCM port); - -#else /* STDC */ -extern void scm_gen_putc (); -extern void scm_gen_puts (); -extern void scm_gen_write (); -extern int scm_gen_getc (); -extern void scm_gen_ungetc (); -#endif /* STDC */ +extern void scm_gen_putc SCM_P ((int c, SCM port)); +extern void scm_gen_puts SCM_P ((enum scm_string_representation_type rep, + char *str_data, + SCM port)); +extern void scm_gen_write SCM_P ((enum scm_string_representation_type rep, char *str_data, scm_sizet nitems, SCM port)); +extern int scm_gen_getc SCM_P ((SCM port)); +extern void scm_gen_ungetc SCM_P ((int c, SCM port)); #endif /* GENIOH */