chibi-scheme/lib/scheme/file.sld at a1ab36c667716ca060cd90206c79c089cef0c4dd - Fcalva/chibi-scheme - Forgejo: Beyond coding. We Forge.

Fcalva/chibi-scheme

mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-19 21:59:17 +02:00

Alex Shinn 8b5eb68238 File descriptors maintain a reference count of ports open on them

They can be close()d explicitly with close-file-descriptor, and
will close() on gc, but only explicitly closing the last port on
them will close the fileno.  Notably needed for network sockets
where we open separate input and output ports on the same socket.

2014-02-20 22:32:50 +09:00

9 lines

317 B

Scheme

Raw Blame History

 (define-library (scheme file)
   (import (chibi) (only (chibi filesystem) delete-file file-exists?))
   (export
    call-with-input-file call-with-output-file
    delete-file file-exists?
    open-binary-input-file open-binary-output-file
    open-input-file open-output-file
    with-input-from-file with-output-to-file))