diff options
author | Gary Houston <ghouston@arglist.com> | 1997-07-29 02:21:08 +0000 |
---|---|---|
committer | Gary Houston <ghouston@arglist.com> | 1997-07-29 02:21:08 +0000 |
commit | 7a6f1ffa105d5c02829a85d865df0e35b38e9b2b (patch) | |
tree | b09dd7b7c7e22307e33a1502bc45c08948b2259f /libguile/ioext.h | |
parent | a0cb6cb0eca93e3cf5e4249e86ae18d0ac7b362b (diff) | |
download | guile-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.h | 4 |
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)); |