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

use prefix correctly

db4
Doug Coleman 2009-04-14 22:54:28 -05:00
parent 8644c98549
commit 34e945fd28
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
extra/tar/tar.factor
View File

@ -71,8 +71,9 @@ ERROR: checksum-error ;
] if ; ] if ;
ERROR: unknown-typeflag ch ; ERROR: unknown-typeflag ch ;
M: unknown-typeflag summary ( obj -- str ) M: unknown-typeflag summary ( obj -- str )
ch>> "Unknown typeflag: " prefix ; ch>> [ "Unknown typeflag: " ] dip prefix ;
: read/write-blocks ( tar-header path -- ) : read/write-blocks ( tar-header path -- )
binary [ read-data-blocks ] with-file-writer ; binary [ read-data-blocks ] with-file-writer ;