# HG changeset patch # User Michael Pavone # Date 1406301879 25200 # Node ID c0561cb06ee3898617463f4f8ba5bad63be21300 # Parent 647f7a2d253b2debca9638732e6fc8b44aa38bd8 Add readAll method to file objects diff -r 647f7a2d253b -r c0561cb06ee3 modules/file.tp --- a/modules/file.tp Thu Jul 24 23:55:59 2014 -0700 +++ b/modules/file.tp Fri Jul 25 08:24:39 2014 -0700 @@ -109,6 +109,12 @@ _buffers <- nextBuffers pieces join: "" } + readAll <- { + while: { not: _eof? } do: { + _addBuffer: + } + read: _buffered + } write <- :data { //TODO: write buffering for small writes os write: _fd data