Update type for copy-directory/files
This commit is contained in:
parent
aae17a0bc0
commit
509f1aa20c
|
@ -2583,7 +2583,10 @@
|
|||
;; Section 15.2.4
|
||||
|
||||
;; Section 15.2.5 (racket/file)
|
||||
[copy-directory/files (->key -Pathlike -Pathlike #:keep-modify-seconds? Univ #f -Void)]
|
||||
[copy-directory/files (->key -Pathlike -Pathlike
|
||||
#:keep-modify-seconds? Univ #f
|
||||
#:preserve-links? Univ #f
|
||||
-Void)]
|
||||
[delete-directory/files (->key -Pathlike #:must-exist? Univ #f -Void)]
|
||||
|
||||
[find-files (->optkey (-> -Path Univ) [(-opt -Pathlike)] #:follow-links? Univ #f (-lst -Path))]
|
||||
|
|
|
@ -1612,6 +1612,7 @@
|
|||
|
||||
|
||||
(tc-e (copy-directory/files "tmp/src" "tmp/dest") -Void)
|
||||
(tc-e (copy-directory/files "tmp/src" "tmp/dest" #:preserve-links? #t) -Void)
|
||||
(tc-e (delete-directory/files "tmp/src") -Void)
|
||||
|
||||
(tc-e (find-files (lambda (p) #t)) (-lst -Path))
|
||||
|
|
Loading…
Reference in New Issue
Block a user