(import-os-error-syscall %set-cloexec (fd val) "set_cloexec")

(import-os-error-syscall %fcntl-read (fd command) "fcntl_read")
(import-os-error-syscall %fcntl-write (fd command val) "fcntl_write")

(import-os-error-syscall %close-fdes (fd) "scsh_close")

(import-os-error-syscall %dup (fd) "scsh_dup")

(import-os-error-syscall %dup2 (fd-from fd-to) "scsh_dup2")

(import-os-error-syscall %fd-seek (fd offset whence) "scsh_lseek")

(import-os-error-syscall %char-ready-fdes? (fd) "char_ready_fdes")

(import-os-error-syscall %open (path flags mode) "scsh_open")

(import-os-error-syscall %pipe-fdes () "scheme_pipe")

(import-os-error-syscall %truncate-file (path length) "scsh_truncate")

(import-os-error-syscall %truncate-fdes (path length) "scsh_ftruncate")

(import-os-error-syscall %create-symlink (old-name new-name) "scsh_symlink")
  
(import-os-error-syscall %read-symlink (path) "scsh_readlink")

(import-os-error-syscall %rename-file (old-name new-name) "scsh_rename")

(import-os-error-syscall %delete-directory (path) "scsh_rmdir")

(import-os-error-syscall %%create-directory (path mode) "scsh_mkdir")

(import-os-error-syscall %create-hard-link (original-name new-name) 
  "scsh_link")

(import-os-error-syscall %create-fifo (path mode) "scsh_mkfifo")

(import-os-error-syscall %set-file-mode (path mode) "scsh_chmod")

(import-os-error-syscall %set-fdes-mode (path mode) "scsh_fchmod")

(import-os-error-syscall %set-file-uid&gid (path uid gid) "scsh_chown")

(import-os-error-syscall %set-fdes-uid&gid (fd uid gid) "scsh_fchown")

(import-os-error-syscall %utime (path ac m) "scm_utime") 

(import-os-error-syscall %utime-now (path) "scm_utime_now")

(import-os-error-syscall %stat-file (path data chase?) "scheme_stat")

(import-os-error-syscall %stat-fdes (fd data) "scheme_fstat")

(import-os-error-syscall %delete-file (path) "scsh_unlink")

(import-os-error-syscall %sync-file (fd) "scsh_fsync")

;;; Amazingly bogus syscall -- doesn't *actually* sync the filesys.
(import-os-error-syscall %sync-file-system () "scsh_sync")

(import-os-error-syscall %open-dir (dir-name) "directory_files")