mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-18 21:29:19 +02:00
(chibi filesystem): add chown
This commit is contained in:
parent
e31e5ffbf3
commit
8ae99cff92
2 changed files with 5 additions and 1 deletions
|
@ -33,7 +33,7 @@
|
|||
open/append open/non-block
|
||||
file-lock file-truncate
|
||||
file-is-readable? file-is-writable? file-is-executable?
|
||||
chmod is-a-tty?)
|
||||
chmod chown is-a-tty?)
|
||||
(cond-expand
|
||||
(chibi
|
||||
(export lock/shared lock/exclusive lock/non-blocking lock/unlock)
|
||||
|
|
|
@ -267,6 +267,10 @@
|
|||
|
||||
(define-c int chmod (string int))
|
||||
|
||||
;;> Sets the file owner and group as in chown.
|
||||
|
||||
(define-c int chown (string uid_t gid_t))
|
||||
|
||||
;;> Returns \scheme{#t} if the given port of file descriptor
|
||||
;;> if backed by a TTY object, and \scheme{#f} otherwise.
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue