steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

io.files.windows: Add a unit test to make sure shared flags stay on.

locals-and-roots
Doug Coleman 2016-05-30 12:24:17 -07:00
parent e302928510
commit 3494576ad8
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
basis/io/files/windows/windows-tests.factor
View File

@ -2,7 +2,8 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: combinators continuations io.backend io.directories io.files USING: combinators continuations io.backend io.directories io.files
io.files.temp io.files.windows io.pathnames kernel kernel.private libc io.files.temp io.files.windows io.pathnames kernel kernel.private libc
literals memory sequences splitting tools.test windows.kernel32 ; literals memory sequences splitting tools.test windows.kernel32
io.files.unique destructors ;
IN: io.files.windows.tests IN: io.files.windows.tests
[ f ] [ "\\foo" absolute-path? ] unit-test [ f ] [ "\\foo" absolute-path? ] unit-test
@ -78,3 +79,11 @@ IN: io.files.windows.tests
} cleave } cleave
] [ ] recover ] [ ] recover
] unit-test ] unit-test
! test that we can open a shared file
! https://github.com/factor/factor/pull/1636
{ } [
"open-file-" "-test.txt" [
[ open-write ] [ open-read ] bi [ dispose ] bi@
] cleanup-unique-file
] unit-test