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

io.files: fix cd test on windows (needs normalize-path instead of absolute-path).

locals-and-roots
John Benediktsson 2016-04-09 10:25:10 -07:00
parent c6565e380d
commit 20224d6aaa
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
core/io/files/files-tests.factor
View File

@ -1,10 +1,10 @@
USING: alien alien.c-types alien.data arrays classes.struct USING: alien alien.c-types alien.data arrays classes.struct
compiler.units continuations destructors fry generic.single io compiler.units continuations destructors fry generic.single io
io.directories io.encodings.8-bit.latin1 io.encodings.ascii io.backend io.directories io.encodings io.encodings.8-bit.latin1
io.encodings.binary io.encodings.string io.encodings.utf16 io.encodings.ascii io.encodings.binary io.encodings.string
io.encodings.utf8 io.files io.files.private io.pathnames kernel io.encodings.utf16 io.encodings.utf8 io.files io.files.private
locals make math sequences specialized-arrays system threads io.pathnames kernel locals make math sequences
tools.test vocabs io.encodings ; specialized-arrays system threads tools.test vocabs ;
FROM: specialized-arrays.private => specialized-array-vocab ; FROM: specialized-arrays.private => specialized-array-vocab ;
IN: io.files.tests IN: io.files.tests
@ -272,7 +272,7 @@ CONSTANT: pt-array-1
{ f t t } [ { f t t } [
[ [
"resource:core" absolute-path "resource:core" normalize-path
[ cwd = ] [ cd ] [ cwd = ] tri [ cwd = ] [ cd ] [ cwd = ] tri
] cwd '[ _ dup cd cwd = ] [ ] cleanup ] cwd '[ _ dup cd cwd = ] [ ] cleanup
] unit-test ] unit-test