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

Fix failing unit test

db4
Slava Pestov 2008-04-04 07:39:00 -05:00
parent 26dca5d77a
commit 9c31dc1164
2 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1,7 +1,7 @@
IN: io.files.tests
USING: tools.test io.files io threads kernel continuations
io.encodings.ascii io.files.unique sequences strings accessors
io.encodings.utf8 ;
USING: tools.test io.files io.files.private io threads kernel
continuations io.encodings.ascii io.files.unique sequences
strings accessors io.encodings.utf8 ;
[ ] [ "blahblah" temp-file dup exists? [ delete-directory ] [ drop ] if ] unit-test
[ ] [ "blahblah" temp-file make-directory ] unit-test

6
core/io/streams/nested/nested.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2006, 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays generic assocs kernel namespaces strings
quotations io continuations accessors ;
quotations io continuations accessors sequences ;
IN: io.streams.nested
TUPLE: filter-writer stream ;
@ -66,3 +66,7 @@ M: style-stream make-block-stream
M: style-stream make-cell-stream
[ do-nested-style make-cell-stream ] [ style>> ] bi
<style-stream> ;
M: style-stream stream-write-table
[ [ [ stream>> ] map ] map ] [ ] [ stream>> ] tri*
stream-write-table ;