summaryrefslogtreecommitdiff
path: root/share/examples/bootforth/loader.rc
diff options
context:
space:
mode:
authorDaniel C. Sobral <dcs@FreeBSD.org>1999-05-14 18:06:27 +0000
committerDaniel C. Sobral <dcs@FreeBSD.org>1999-05-14 18:06:27 +0000
commit3a91f98cb81a57e669303638b1abfd27782818f6 (patch)
tree967b489d0ebd31237e6304acbe2ba514bed4ba9c /share/examples/bootforth/loader.rc
parent600829cdfcd2ebb76d2cf809f6e090c0f3fc949c (diff)
Notes
Diffstat (limited to 'share/examples/bootforth/loader.rc')
-rw-r--r--share/examples/bootforth/loader.rc34
1 files changed, 34 insertions, 0 deletions
diff --git a/share/examples/bootforth/loader.rc b/share/examples/bootforth/loader.rc
new file mode 100644
index 000000000000..b0fd9ca3035e
--- /dev/null
+++ b/share/examples/bootforth/loader.rc
@@ -0,0 +1,34 @@
+\ Example of the file which is automatically loaded by /boot/loader
+\ on startup.
+\ $Id: boot.4th,v 1.1 1998/12/22 12:15:45 abial Exp $
+
+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" fopen dup fload fclose
+
+\ Load frame support
+cr .( - frames.4th...)
+s" /boot/frames.4th" fopen dup fload fclose
+
+\ Load our little menu
+cr .( - menuconf.4th...)
+s" /boot/menuconf.4th" fopen dup fload fclose
+
+\ Initialize loader.4th stuff
+
+cr cr .( Initializing loader.4th...)
+initialize
+
+\ Show the menu
+cr
+main_menu
+