FLUSH FLUSH-FILE FM/MOD
FLUSH
* FLUSH ( -- )

call >SAVE-BUFFERS and then unassign all
block buffers with >EMPTY-BUFFERS

block ordinary primitive