summaryrefslogtreecommitdiff
path: root/libguile/ioext.h
diff options
context:
space:
mode:
authorGary Houston <ghouston@arglist.com>1997-07-29 02:21:08 +0000
committerGary Houston <ghouston@arglist.com>1997-07-29 02:21:08 +0000
commit7a6f1ffa105d5c02829a85d865df0e35b38e9b2b (patch)
treeb09dd7b7c7e22307e33a1502bc45c08948b2259f /libguile/ioext.h
parenta0cb6cb0eca93e3cf5e4249e86ae18d0ac7b362b (diff)
downloadguile-7a6f1ffa105d5c02829a85d865df0e35b38e9b2b.tar.gz
* ioext.h: fix up prototypes.
* ioext.c (scm_dup_to_fdes): renamed from scm_primitive_dup2. Scheme name is now dup->fdes. (scm_dup_to_fdes): make the second argument optional and fold in the functionality of scm_primitive_dup. (scm_primitive_dup): deleted. * fports.h (SCM_P): prototypes for scm_setvbuf, scm_setfileno. * fports.c (scm_setbuf0): don't disable the setbuf if MSDOS or ultrix are defined. Use setvbuf instead of setbuf. (scm_setvbuf): new procedure. (scm_init_fports): intern _IOFBF, _IOLBF, _IONBF. (scm_setfileno): moved from ioext.c. (scm_fgets): cast SCM_STREAM to (FILE *), remove unused lp variable. (top of file): Delete 25 lines of probably obsolete CPP hair for MSDOS. * boot-9.scm (move->fdes, dup->port): use dup->fdes, not primitive-dup. (dup->fdes): deleted, now done in C.
Diffstat (limited to 'libguile/ioext.h')
-rw-r--r--libguile/ioext.h4
1 files changed, 1 insertions, 3 deletions
diff --git a/libguile/ioext.h b/libguile/ioext.h
index ee5ed86cf..ef9f8d1da 100644
--- a/libguile/ioext.h
+++ b/libguile/ioext.h
@@ -54,13 +54,11 @@ extern SCM scm_ftell SCM_P ((SCM port));
extern SCM scm_fseek SCM_P ((SCM port, SCM offset, SCM whence));
extern SCM scm_freopen SCM_P ((SCM filename, SCM modes, SCM port));
extern SCM scm_redirect_port SCM_P ((SCM into_pt, SCM from_pt));
-extern SCM scm_primitive_dup (SCM fd_or_port);
-extern SCM scm_primitive_dup2 (SCM fd_or_port, SCM newfd);
+extern SCM scm_dup_to_fdes (SCM fd_or_port, SCM newfd);
extern SCM scm_fileno SCM_P ((SCM port));
extern SCM scm_isatty_p SCM_P ((SCM port));
extern SCM scm_fdopen SCM_P ((SCM fdes, SCM modes));
extern SCM scm_primitive_move_to_fdes SCM_P ((SCM port, SCM fd));
-extern void scm_setfileno SCM_P ((FILE *fs, int fd));
extern SCM scm_fdes_to_ports SCM_P ((SCM fd));
extern void scm_init_ioext SCM_P ((void));