diff options
| author | John Baldwin <jhb@FreeBSD.org> | 2001-12-11 00:49:34 +0000 |
|---|---|---|
| committer | John Baldwin <jhb@FreeBSD.org> | 2001-12-11 00:49:34 +0000 |
| commit | 0889b9be414989d292712d60a1e2fcd837eaf504 (patch) | |
| tree | 3d16cb8ac2303ccc50640d839778a81b153c89ec /share/examples/bootforth | |
| parent | 4fd13c1ba2d20a846614cf518dbb13ccaca604cb (diff) | |
Notes
Diffstat (limited to 'share/examples/bootforth')
| -rw-r--r-- | share/examples/bootforth/boot.4th | 6 | ||||
| -rw-r--r-- | share/examples/bootforth/loader.rc | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/share/examples/bootforth/boot.4th b/share/examples/bootforth/boot.4th index 631775b304f7..8f26e0d0a38d 100644 --- a/share/examples/bootforth/boot.4th +++ b/share/examples/bootforth/boot.4th @@ -7,15 +7,15 @@ cr .( Loading Forth extensions:) cr .( - screen.4th...) -s" /boot/screen.4th" fopen dup fload fclose +s" /boot/screen.4th" O_RDONLY fopen dup fload fclose \ Load frame support cr .( - frames.4th...) -s" /boot/frames.4th" fopen dup fload fclose +s" /boot/frames.4th" O_RDONLY fopen dup fload fclose \ Load our little menu cr .( - menu.4th...) -s" /boot/menu.4th" fopen dup fload fclose +s" /boot/menu.4th" O_RDONLY fopen dup fload fclose \ Show it cr diff --git a/share/examples/bootforth/loader.rc b/share/examples/bootforth/loader.rc index d216a460416f..617bc3db4104 100644 --- a/share/examples/bootforth/loader.rc +++ b/share/examples/bootforth/loader.rc @@ -13,15 +13,15 @@ include /boot/loader.4th \ Load the screen manipulation words cr .( - screen.4th...) -s" /boot/screen.4th" fopen dup fload fclose +s" /boot/screen.4th" O_RDONLY fopen dup fload fclose \ Load frame support cr .( - frames.4th...) -s" /boot/frames.4th" fopen dup fload fclose +s" /boot/frames.4th" O_RDONLY fopen dup fload fclose \ Load our little menu cr .( - menuconf.4th...) -s" /boot/menuconf.4th" fopen dup fload fclose +s" /boot/menuconf.4th" O_RDONLY fopen dup fload fclose \ Initialize loader.4th stuff |