Add tests for directory-list #:build? argument

Closes #18.
2015-01-28 20:24:22 -08:00 · 2015-01-28 20:24:22 -08:00 · 8c471bb2a3
commit 8c471bb2a3
parent 9bad7f0128
1 changed files with 2 additions and 0 deletions
--- 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))