* OPEN-BLOCKFILE ( "filename" -- ) w32for w32for-implementation: close-blockfile parse-word r/w open-file abort" failed to open block-file" set-blockfile empty-buffers
OPEN-BLOCKFILE
( "filename" -- )
w32for
w32for-implementation: close-blockfile parse-word r/w open-file abort" failed to open block-file" set-blockfile empty-buffers
FORTH/FORTH block_misc ordinary primitive