loader.rc revision 47195 
147195Sdcs\ Example of the file which is automatically loaded by /boot/loader
247195Sdcs\ on startup.
347195Sdcs\ $Id: boot.4th,v 1.1 1998/12/22 12:15:45 abial Exp $
447195Sdcs
547195Sdcscr .( Loading Forth extensions:)
647195Sdcs
747195Sdcs\ Load configuration file words
847195Sdcs
947195Sdcscr .( - loader.4th...)
1047195Sdcs
1147195Sdcsinclude /boot/loader.4th
1247195Sdcs
1347195Sdcs\ Load the screen manipulation words
1447195Sdcs
1547195Sdcscr .( - screen.4th...)
1647195Sdcss" /boot/screen.4th" fopen dup fload fclose
1747195Sdcs
1847195Sdcs\ Load frame support
1947195Sdcscr .( - frames.4th...)
2047195Sdcss" /boot/frames.4th" fopen dup fload fclose
2147195Sdcs
2247195Sdcs\ Load our little menu
2347195Sdcscr .( - menuconf.4th...)
2447195Sdcss" /boot/menuconf.4th" fopen dup fload fclose
2547195Sdcs
2647195Sdcs\ Initialize loader.4th stuff
2747195Sdcs
2847195Sdcscr cr .( Initializing loader.4th...)
2947195Sdcsinitialize
3047195Sdcs
3147195Sdcs\ Show the menu
3247195Sdcscr
3347195Sdcsmain_menu
3447195Sdcs
35