From: Helmut Eller <eller.helmut@gmail.com>
Date: Mon, 2 Jan 2017 07:47:34 +0000 (+0100)
Subject: Implement FLUSH-FILE
X-Git-Url: https://git.subgeniuskitty.com/pforth/.git/commitdiff_plain/8bf2fe25c2d6ed80c3d41cc664d13da865d6be6c?hp=8bf2fe25c2d6ed80c3d41cc664d13da865d6be6c

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.
---