X-Git-Url: http://git.hcoop.net/bpt/guile.git/blobdiff_plain/1146b6cda2b7b8dcfe30b7b4580f59126eaf5608..c2ca44933f8b2b43ec3efa541a6824537c45a560:/libguile/ioext.h diff --git a/libguile/ioext.h b/libguile/ioext.h index 3e994a568..a79b1a5b5 100644 --- a/libguile/ioext.h +++ b/libguile/ioext.h @@ -2,7 +2,7 @@ #ifndef IOEXTH #define IOEXTH -/* Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc. +/* Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -16,7 +16,8 @@ * * You should have received a copy of the GNU General Public License * along with this software; see the file COPYING. If not, write to - * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA * * As a special exception, the Free Software Foundation gives permission * for additional uses of the text contained in its release of GUILE. @@ -40,28 +41,39 @@ * * If you write modifications of your own for GUILE, it is your choice * 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 "libguile/__scm.h" -extern SCM scm_read_delimited_x SCM_P ((SCM delims, SCM buf, SCM gobble, SCM port, SCM offset, SCM length)); -extern SCM scm_write_line SCM_P ((SCM obj, SCM port)); -extern SCM scm_sys_ftell SCM_P ((SCM port)); -extern SCM scm_sys_fseek SCM_P ((SCM port, SCM offset, SCM whence)); -extern SCM scm_sys_freopen SCM_P ((SCM filename, SCM modes, SCM port)); -extern SCM scm_sys_duplicate_port SCM_P ((SCM oldpt, SCM modes)); -extern SCM scm_sys_redirect_port SCM_P ((SCM into_pt, SCM from_pt)); -extern SCM scm_sys_fileno SCM_P ((SCM port)); -extern SCM scm_sys_isatty_p SCM_P ((SCM port)); -extern SCM scm_sys_fdopen SCM_P ((SCM fdes, SCM modes)); -extern SCM scm_sys_primitive_move_to_fdes SCM_P ((SCM port, SCM fd)); -extern void scm_setfileno SCM_P ((FILE *fs, int fd)); -extern void scm_evict_ports SCM_P ((int fd)); -extern SCM scm_fdes_to_ports SCM_P ((SCM fd)); -extern void scm_init_ioext SCM_P ((void)); +extern SCM scm_read_delimited_x (SCM delims, SCM buf, SCM gobble, SCM port, SCM offset, SCM length); +extern SCM scm_read_line (SCM port); +extern SCM scm_write_line (SCM obj, SCM port); +extern SCM scm_ftell (SCM object); +extern SCM scm_redirect_port (SCM into_pt, SCM from_pt); +extern SCM scm_dup_to_fdes (SCM fd_or_port, SCM newfd); +extern SCM scm_dup2 (SCM oldfd, SCM newfd); +extern SCM scm_fileno (SCM port); +extern SCM scm_isatty_p (SCM port); +extern SCM scm_fdopen (SCM fdes, SCM modes); +extern SCM scm_primitive_move_to_fdes (SCM port, SCM fd); +extern SCM scm_fdes_to_ports (SCM fd); +extern void scm_init_ioext (void); + + + +#if (SCM_DEBUG_DEPRECATED == 0) + +extern SCM scm_fseek (SCM object, SCM offset, SCM whence); + +#endif /* SCM_DEBUG_DEPRECATED == 0 */ #endif /* IOEXTH */ + +/* + Local Variables: + c-file-style: "gnu" + End: +*/