close-dir chainperform close-dir
close-dir
* close-dir ( wdirid -- wior ) gforth close_dir

will vanish without warning. see gforth documentation.

gforth' gforth ordinary primitive