From 8c471bb2a3d56628396070eae07902877e648ed7 Mon Sep 17 00:00:00 2001 From: Alexis King Date: Wed, 28 Jan 2015 20:24:22 -0800 Subject: [PATCH] Add tests for directory-list #:build? argument Closes #18. --- typed-racket-test/unit-tests/typecheck-tests.rkt | 2 ++ 1 file changed, 2 insertions(+) diff --git a/typed-racket-test/unit-tests/typecheck-tests.rkt b/typed-racket-test/unit-tests/typecheck-tests.rkt index 2d300b48..2f72f53e 100644 --- a/typed-racket-test/unit-tests/typecheck-tests.rkt +++ b/typed-racket-test/unit-tests/typecheck-tests.rkt @@ -1551,6 +1551,8 @@ (tc-e (directory-list) (-lst -Path)) (tc-e (directory-list "tmp") (-lst -Path)) + (tc-e (directory-list #:build? #f) (-lst -Path)) + (tc-e (directory-list "tmp" #:build? "yes") (-lst -Path)) (tc-e (filesystem-root-list) (-lst -Path))