Return to blocks.fs CVS log | Up to [gforth] / gforth |
version 1.53, 2007/12/31 18:40:23 | version 1.54, 2008/05/18 19:30:48 |
---|---|
Line 124 Defer flush-blocks ( -- ) \ gforth | Line 124 Defer flush-blocks ( -- ) \ gforth |
rdrop ; | rdrop ; |
: empty-buffer ( buffer -- ) \ gforth | : empty-buffer ( buffer -- ) \ gforth |
buffer-block off ; | dup buffer-block on buffer-dirty off ; |
: save-buffers ( -- ) \ block | : save-buffers ( -- ) \ block |
\G Transfer the contents of each @code{update}d block buffer to | \G Transfer the contents of each @code{update}d block buffer to |