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

io.files: quot effects in change-file-lines and change-file-contents.

master
John Benediktsson 2020-01-06 13:26:19 -08:00
parent b2dc630bd0
commit 1eb7dbe6d2
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/io/files/files.factor
View File

@ -56,14 +56,14 @@ HOOK: (file-appender) io-backend ( path -- stream )
: set-file-lines ( seq path encoding -- )
[ [ print ] each ] with-file-writer ;
: change-file-lines ( path encoding quot -- )
: change-file-lines ( ..a path encoding quot: ( ..a seq -- ..b seq' ) -- ..b )
[ [ file-lines ] dip call ]
[ drop set-file-lines ] 3bi ; inline
: set-file-contents ( seq path encoding -- )
[ write ] with-file-writer ;
: change-file-contents ( path encoding quot -- )
: change-file-contents ( ..a path encoding quot: ( ..a seq -- ..b seq' ) -- ..b )
[ [ file-contents ] dip call ]
[ drop set-file-contents ] 3bi ; inline