loader.rc revision 47199 
1127043Sjhb\ Example of the file which is automatically loaded by /boot/loader
2127043Sjhb\ on startup.
3127043Sjhb\ $Id: loader.rc,v 1.1 1999/05/14 18:06:27 dcs Exp $
4127043Sjhb
5127043Sjhbcr .( Loading Forth extensions:)
6127043Sjhb
7127043Sjhb\ Load configuration file words
8127043Sjhb
9127043Sjhbcr .( - loader.4th...)
10127043Sjhb
11127043Sjhbinclude /boot/loader.4th
12127043Sjhb
13127043Sjhb\ Load the screen manipulation words
14127043Sjhb
15127043Sjhbcr .( - screen.4th...)
16127043Sjhbs" /boot/screen.4th" fopen dup fload fclose
17127043Sjhb
18127043Sjhb\ Load frame support
19127043Sjhbcr .( - frames.4th...)
20127043Sjhbs" /boot/frames.4th" fopen dup fload fclose
21127043Sjhb
22127043Sjhb\ Load our little menu
23127043Sjhbcr .( - menuconf.4th...)
24127043Sjhbs" /boot/menuconf.4th" fopen dup fload fclose
25127043Sjhb
26127043Sjhb\ Initialize loader.4th stuff
27127043Sjhb
28127043Sjhbcr cr .( Initializing loader.4th...)
29127043Sjhbinitialize drop
30127043Sjhb
31127043Sjhb\ Show the menu
32136224Smtmcr
33127043Sjhbmain_menu
34127043Sjhb
35127043Sjhb