#lang scheme/base
(require (rename-in scheme/base
(file-or-directory-modify-seconds mtime)
(file-or-directory-permissions acl)
(rename-file-or-directory rename)
(make-file-or-directory-link symlink)
(make-directory mkdir)
(directory-list ls)
(delete-directory rmdir)
(open-input-file fopen/read)
(open-output-file fopen/write)
)
(rename-in scheme/file
(make-directory* mkdir*)
(copy-directory/files cp)
(delete-directory/files rm-rf)
)
scheme/file
)
(provide mtime
acl
rename
symlink
mkdir
ls
rmdir
mkdir*
cp
rm-rf
fopen/read
fopen/write
)
(provide (all-from-out scheme/file))