From 3cafa94801b223ab544e3c5e1ad6930aa7f080b9 Mon Sep 17 00:00:00 2001 From: WarGrey Gyoudmon Ju Date: Sat, 7 Jan 2017 00:27:42 +0800 Subject: [PATCH] Add type annotation for (make-parent-directory*) (#483) --- typed-racket-lib/typed-racket/base-env/base-env.rkt | 1 + 1 file changed, 1 insertion(+) diff --git a/typed-racket-lib/typed-racket/base-env/base-env.rkt b/typed-racket-lib/typed-racket/base-env/base-env.rkt index ea9f7580..f7630daf 100644 --- a/typed-racket-lib/typed-racket/base-env/base-env.rkt +++ b/typed-racket-lib/typed-racket/base-env/base-env.rkt @@ -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)]