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.2 2007/03/23 22:26:01 jkim Exp $
8 \ $DragonFly: src/sys/boot/ficl/softwords/fileaccess.fr,v 1.2 2008/03/29 23:31:07 swildner Exp $
16 r/o bin open-file 0= if
17 locals| f | end-locals
24 : include parse-word included ;