1 \ Example of the file which is automatically loaded by /boot/loader
3 \ $FreeBSD: src/share/examples/bootforth/loader.rc,v 1.3 1999/08/28 00:19:09 peter Exp $
4 \ $DragonFly: src/share/examples/bootforth/loader.rc,v 1.2 2003/06/17 04:36:57 dillon Exp $
6 cr .( Loading Forth extensions:)
8 \ Load configuration file words
10 cr .( - loader.4th...)
12 include /boot/loader.4th
14 \ Load the screen manipulation words
16 cr .( - screen.4th...)
17 s" /boot/screen.4th" fopen dup fload fclose
20 cr .( - frames.4th...)
21 s" /boot/frames.4th" fopen dup fload fclose
23 \ Load our little menu
24 cr .( - menuconf.4th...)
25 s" /boot/menuconf.4th" fopen dup fload fclose
27 \ Initialize loader.4th stuff
29 cr cr .( Initializing loader.4th...)