diff options
Diffstat (limited to 'usr/src/boot/forth/loader.4th')
-rw-r--r-- | usr/src/boot/forth/loader.4th | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/usr/src/boot/forth/loader.4th b/usr/src/boot/forth/loader.4th index d010b72a33..9bd01644e0 100644 --- a/usr/src/boot/forth/loader.4th +++ b/usr/src/boot/forth/loader.4th @@ -606,6 +606,24 @@ only forth definitions also support-functions then ; +create pathname 1024 chars allot + +: set-platform ( c-addr u -- ) + 2dup + pathname place + s" /platform/i86pc/kernel/amd64/unix" pathname append + pathname count s" bootfile" setenv + pathname count erase + 2dup + pathname place + s" /platform/i86pc/amd64/boot_archive" pathname append + pathname count s" boot_archive" set-module-path + pathname count erase + pathname place + s" /platform/i86pc/amd64/boot_archive.hash" pathname append + pathname count s" boot_archive.hash" set-module-path +; + \ Words to be used inside configuration files : retry false ; \ For use in load error commands |