[SLOF] [PATCH 4/5] boot: Remove legacy Forth words for network loading

Thomas Huth thuth at redhat.com
Fri Apr 29 17:01:19 AEST 2016


These words were required in the very early days of SLOF when
"boot net" / "load net" was not working yet. Nowadays, they
are pretty useless and thus can be removed.

Signed-off-by: Thomas Huth <thuth at redhat.com>
---
 slof/fs/boot.fs | 20 --------------------
 1 file changed, 20 deletions(-)

diff --git a/slof/fs/boot.fs b/slof/fs/boot.fs
index e0b6281..e99a164 100644
--- a/slof/fs/boot.fs
+++ b/slof/fs/boot.fs
@@ -274,23 +274,3 @@ read-bootlist
 ;
 
 : load load 0= IF -65 boot-exception-handler THEN ;
-
-\ \\\\ Temporary hacks for backwards compatibility
-: yaboot ." Use 'boot disk' instead " ;
-
-: netboot ( -- rc ) ." Use 'boot net' instead " ;
-
-: netboot-arg ( arg-string -- rc )
-   s" boot net " 2swap $cat (parse-line) $cat
-   evaluate
-;
-
-: netload ( -- rc ) (parse-line)
-   load-base-override >r flash-load-base to load-base-override
-   s" load net:" strdup 2swap $cat strdup evaluate
-   r> to load-base-override
-   load-size
-;
-
-: neteval ( -- ) FLASH-LOAD-BASE netload evaluate ;
-
-- 
1.8.3.1



More information about the SLOF mailing list