diff options
author | Gary Houston <ghouston@arglist.com> | 1997-07-20 05:49:39 +0000 |
---|---|---|
committer | Gary Houston <ghouston@arglist.com> | 1997-07-20 05:49:39 +0000 |
commit | eadd48de2b7b916a29da6d36e650c84a76b1a3f4 (patch) | |
tree | eb293bc3a550059f807e340592417f09b74dcde4 /libguile/filesys.h | |
parent | 9c29ac668ff5444ab9e61d357062d090af2c1850 (diff) | |
download | guile-eadd48de2b7b916a29da6d36e650c84a76b1a3f4.tar.gz |
* fluids.c (next_fluid_num): don't do
SCM_THREAD_CRITICAL_SECTION_START/END unless USE_THREADS is defined.
* ports.h: prototypes too.
* ports.c (scm_mode_bits, scm_port_mode): moved from fports.c.
* fports.h: prototype too.
* fports.c (scm_evict_ports): moved from ioext.c.
* ports.c (scm_close_port): return a boolean instead of unspecified.
throw an error if an error other than EBADF occurs.
* filesys.h: scm_close prototype.
* filesys.c (scm_close): new procedure, can close file descriptors
and ports (scsh compatible).
* ports.c (scm_flush_all_ports): SCM_PROC incorrectly allowed an
optional argument.
Diffstat (limited to 'libguile/filesys.h')
-rw-r--r-- | libguile/filesys.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/filesys.h b/libguile/filesys.h index e8e3fe773..3c251919b 100644 --- a/libguile/filesys.h +++ b/libguile/filesys.h @@ -58,6 +58,7 @@ extern SCM scm_chown SCM_P ((SCM path, SCM owner, SCM group)); extern SCM scm_chmod SCM_P ((SCM port_or_path, SCM mode)); extern SCM scm_umask SCM_P ((SCM mode)); extern SCM scm_open SCM_P ((SCM path, SCM flags, SCM mode)); +extern SCM scm_close (SCM fd_or_port); extern SCM scm_stat SCM_P ((SCM fd_or_path)); extern SCM scm_link SCM_P ((SCM oldpath, SCM newpath)); extern SCM scm_rename SCM_P ((SCM oldname, SCM newname)); |