diff options
author | Jim Blandy <jimb@red-bean.com> | 1999-06-09 12:17:53 +0000 |
---|---|---|
committer | Jim Blandy <jimb@red-bean.com> | 1999-06-09 12:17:53 +0000 |
commit | 322bb835b0bfca73206a4466fed9c9e1ea886d81 (patch) | |
tree | 987eb0355c13a36b75526edec75f2bd095e42570 /libguile/filesys.h | |
parent | 77a76b643dc52431f18ca6d0e1e5c740ad3a9f1d (diff) | |
download | guile-322bb835b0bfca73206a4466fed9c9e1ea886d81.tar.gz |
* * ports.c (scm_drain_input): new procedure.
ports.h: prototype.
* fports.c (FPORT_READ_SAFE, FPORT_WRITE_SAFE, FPORT_ALL_OKAY,
pre_read, pre_write): removed.
(local_fputc, local_fputs, local_ffwrite): use write, not stdio.
(scm_standard_stream_to_port): change first arg from FILE * to
int fdes.
(local_fflush): flush fdes, not FILE *.
* fports.h (SCM_NOFTELL): removed.
* genio.c, ports.c: don't include filesys.h.
* genio.c (scm_getc): don't use scm_internal_select if FPORT.
do it in fports.c:local_fgetc.
* genio.c: don't use SCM_SYSCALL when calling ptob procedures.
do it where it's needed in the port smobs.
* filesys.c (scm_input_waiting_p): moved to fports.c, stdio
buffer support removed. take SCM arg, not FILE *.
* filesys.h: prototype moved too.
* fports.c (scm_fdes_to_port): new procedure.
(local_fgetc): use read not fgetc.
(local_fclose): use close, not fclose.
(local_fgets): use read, not fgets
* fports.h: prototype for scm_fdes_to_port.
* fports.h (scm_fport): new struct.
* fports.c (scm_open_file): use open, not fopen.
#include fcntl.h
* ports.h (struct scm_port_table): change stream from SCM to void *.
* ports.c (scm_add_to_port_table): check for memory allocation error.
(scm_prinport): remove MSDOS hair.
(scm_void_port): set stream to 0 instead of SCM_BOOL_F.
(scm_close_port): don't throw errors: do it in fports.c.
Diffstat (limited to 'libguile/filesys.h')
-rw-r--r-- | libguile/filesys.h | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/libguile/filesys.h b/libguile/filesys.h index 12f8a3b01..cf0803e3c 100644 --- a/libguile/filesys.h +++ b/libguile/filesys.h @@ -74,7 +74,6 @@ extern SCM scm_closedir SCM_P ((SCM port)); extern SCM scm_chdir SCM_P ((SCM str)); extern SCM scm_getcwd SCM_P ((void)); extern SCM scm_select SCM_P ((SCM reads, SCM writes, SCM excepts, SCM secs, SCM msecs)); -extern int scm_input_waiting_p SCM_P ((FILE *file, const char *caller)); extern SCM scm_fcntl (SCM object, SCM cmd, SCM value); extern SCM scm_fsync (SCM object); extern SCM scm_symlink SCM_P ((SCM oldpath, SCM newpath)); |