io.directories: Add unit test for #890.
parent
831ec24b14
commit
0fe5b2d90f
|
@ -1,7 +1,7 @@
|
||||||
USING: continuations destructors io io.directories
|
USING: continuations destructors io io.directories
|
||||||
io.directories.hierarchy io.encodings.ascii io.encodings.utf8
|
io.directories.hierarchy io.encodings.ascii io.encodings.utf8
|
||||||
io.files io.files.info io.files.temp io.pathnames kernel
|
io.files io.files.info io.files.temp io.launcher io.pathnames
|
||||||
sequences tools.test ;
|
kernel sequences tools.test ;
|
||||||
IN: io.directories.tests
|
IN: io.directories.tests
|
||||||
|
|
||||||
[ { "kernel" } ] [
|
[ { "kernel" } ] [
|
||||||
|
@ -189,4 +189,11 @@ IN: io.directories.tests
|
||||||
[ ] [ "copy-tree-test" temp-file delete-tree ] unit-test
|
[ ] [ "copy-tree-test" temp-file delete-tree ] unit-test
|
||||||
|
|
||||||
[ ] [ "resource:deleteme" touch-file ] unit-test
|
[ ] [ "resource:deleteme" touch-file ] unit-test
|
||||||
[ ] [ "resource:deleteme" delete-file ] unit-test
|
[ ] [ "resource:deleteme" delete-file ] unit-test
|
||||||
|
|
||||||
|
! Issue #890
|
||||||
|
|
||||||
|
{ } [
|
||||||
|
"foo" temp-file [ make-directories ] keep
|
||||||
|
[ "touch bar" try-output-process ] with-directory
|
||||||
|
] unit-test
|
Loading…
Reference in New Issue