diff --git a/extra/builder/util/util.factor b/extra/builder/util/util.factor index 0e68cdbc0e..3d699d4ba8 100644 --- a/extra/builder/util/util.factor +++ b/extra/builder/util/util.factor @@ -98,4 +98,10 @@ USING: bootstrap.image bootstrap.image.download io.streams.null ; : cat-n ( file n -- ) [ file-lines ] [ ] bi* maybe-tail* - [ print ] each ; \ No newline at end of file + [ print ] each ; + +! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! + +USE: prettyprint + +: to-file ( object file -- ) [ . ] with-file-writer ; \ No newline at end of file