Add type annotation for (make-parent-directory*) (#483)

This commit is contained in:
WarGrey Gyoudmon Ju 2017-01-07 00:27:42 +08:00 committed by Sam Tobin-Hochstadt
parent 3e2d020a19
commit 3cafa94801

View File

@ -2708,6 +2708,7 @@
((Un funarg funarg*) a [(-opt -Pathlike) Univ]. ->opt . a)))]
[make-directory* (-> -Pathlike -Void)]
[make-parent-directory* (-> -Pathlike -Void)]
#;[make-temporary-file (->opt [-String (Un -Pathlike (-val 'directory) (-val #f)) (-opt -Pathlike)] -Path)]
[put-preferences (->opt (-lst -Symbol) (-lst Univ) [(-> -Path Univ) (-opt -Pathlike)] -Void)]