diff options
Diffstat (limited to 'slof/fs/boot.fs')
-rw-r--r-- | slof/fs/boot.fs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/slof/fs/boot.fs b/slof/fs/boot.fs index 6d16c54..a6dfdf3 100644 --- a/slof/fs/boot.fs +++ b/slof/fs/boot.fs @@ -112,6 +112,12 @@ defer go ( -- ) claim-list elf-release 0 to claim-list ; +: go-direct ( -- ) + 0 ciregs >r3 ! 0 ciregs >r4 ! 0 ciregs >r2 ! + msr@ 7fffffffffffffff and 2000 or ciregs >srr1 ! + go-args 2@ go-entry call-client +; + : set-le ( -- ) 1 ciregs >r13 ! ; |