Virtualization/openbios
1
0
Fork 0
mirror of https://gitlab.com/qemu-project/openbios.git synced 2024-02-13 08:34:06 +08:00
Code Issues Projects Releases Wiki Activity

According to IEEE Std 1275-1994, "CORE REQUIREMENTS AND PRACTICES",

Browse Source 
Annexe H.8, "User interface name changes", "select-dev" and
"unselect-dev" have been obsoleted and replaced by "open-dev" and 
"device-end".
But some scripts (like BootX) are using the obsoleted name, so we need 
to
define them.

Signed-off-by: Laurent Vivier <Laurent@vivier.eu>



git-svn-id: svn://coreboot.org/openbios/trunk/openbios-devel@582 f158a5a8-5612-0410-a976-696ce0be7e32
This commit is contained in:
Laurent Vivier
2009-09-20 04:20:48 +00:00
parent 9164a49dc8
commit ebf7e3f6da
2 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
forth/admin/devices.fs
View File

@@ -46,6 +46,10 @@
0 active-package! 0 active-package!
; ;
: unselect-dev ( -- )
device-end
;
: ?active-package ( -- phandle ) : ?active-package ( -- phandle )
active-package dup 0= abort" no active device" active-package dup 0= abort" no active device"
; ;

4
forth/device/pathres.fs
View File

@@ -471,6 +471,10 @@ constant sinfo.size
( ihandle ) ( ihandle )
; ;
: select-dev ( dev-str dev-len -- ihandle | 0 )
open-dev
;
: execute-device-method : execute-device-method
( ... dev-str dev-len met-str met-len -- ... false | ?? true ) ( ... dev-str dev-len met-str met-len -- ... false | ?? true )
2swap 2swap