3 \ ** File Access words for ficl
4 \ ** submitted by Larry Hastings, larry@hastings.org
7 \ $FreeBSD: src/sys/boot/ficl/softwords/fileaccess.fr,v 1.1 2002/04/09 17:45:27 dcs Exp $
8 \ $DragonFly: src/sys/boot/ficl/softwords/fileaccess.fr,v 1.1 2003/11/10 06:08:34 dillon Exp $
16 r/o bin open-file 0= if
17 locals| f | end-locals
25 : include parse-word included ; immediate