ref: 7393a9a5e8453bbc7c8b767a6af41b463a9ca34a
dir: /softcore/fileaccess.fr/
S" FICL_WANT_FILE" ENVIRONMENT? drop [if] \ ** \ ** File Access words for ficl \ ** submitted by Larry Hastings, larry@hastings.org \ ** : r/o 1 ; : r/w 3 ; : w/o 2 ; : bin 8 or ; : included r/o bin open-file 0= if include-file else drop endif ; : include parse-word included ; [endif]