diff options
Diffstat (limited to 'share/examples/bootforth/loader.rc')
| -rw-r--r-- | share/examples/bootforth/loader.rc | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/share/examples/bootforth/loader.rc b/share/examples/bootforth/loader.rc new file mode 100644 index 000000000000..e8aa549f5905 --- /dev/null +++ b/share/examples/bootforth/loader.rc @@ -0,0 +1,33 @@ +\ Example of the file which is automatically loaded by /boot/loader +\ on startup. + +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 + |