Implement FLUSH-FILE
authorHelmut Eller <eller.helmut@gmail.com>
Mon, 2 Jan 2017 07:47:34 +0000 (08:47 +0100)
committerHelmut Eller <eller.helmut@gmail.com>
Mon, 2 Jan 2017 07:47:34 +0000 (08:47 +0100)
commit8bf2fe25c2d6ed80c3d41cc664d13da865d6be6c
tree26898fdc5de5b6dafafd794655b142e30878e9e6
parent4162242c136abe5707aeefbe3f884f561b73dd42
Implement FLUSH-FILE

* csrc/pf_guts.h (cforth_primitive_ids): Add ID_FILE_FLUSH, remove
ID_RESERVED13.
(THROW_FLUSH_FILE): New.

* csrc/pf_inner.c (pfCatch): Add case for ID_FILE_FLUSH.
* csrc/pfcompil.c (pfBuildDictionary): Add FLUSH-FILE.
* fth/t_file.fth (FLUSH-FILE): Remove stub definition.
csrc/pf_guts.h
csrc/pf_inner.c
csrc/pfcompil.c
fth/t_file.fth