| Current Path : /usr/share/examples/bootforth/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
| Current File : //usr/share/examples/bootforth/loader.rc |
\ Example of the file which is automatically loaded by /boot/loader \ on startup. \ $FreeBSD: release/9.1.0/share/examples/bootforth/loader.rc 87636 2001-12-11 00:49:34Z jhb $ cr .( Loading Forth extensions:) \ Load configuration file words cr .( - loader.4th...) include /boot/loader.4th \ Load the screen manipulation words cr .( - screen.4th...) s" /boot/screen.4th" O_RDONLY fopen dup fload fclose \ Load frame support cr .( - frames.4th...) s" /boot/frames.4th" O_RDONLY fopen dup fload fclose \ Load our little menu cr .( - menuconf.4th...) s" /boot/menuconf.4th" O_RDONLY fopen dup fload fclose \ Initialize loader.4th stuff cr cr .( Initializing loader.4th...) initialize drop \ Show the menu cr main_menu