From ebf7e3f6daaf183fea3a3188c64bb23d103b177b Mon Sep 17 00:00:00 2001 From: Laurent Vivier Date: Sun, 20 Sep 2009 04:20:48 +0000 Subject: [PATCH] According to IEEE Std 1275-1994, "CORE REQUIREMENTS AND PRACTICES", 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 git-svn-id: svn://coreboot.org/openbios/trunk/openbios-devel@582 f158a5a8-5612-0410-a976-696ce0be7e32 --- forth/admin/devices.fs | 4 ++++ forth/device/pathres.fs | 4 ++++ 2 files changed, 8 insertions(+) diff --git a/forth/admin/devices.fs b/forth/admin/devices.fs index 4a5d0d4..e24c6da 100644 --- a/forth/admin/devices.fs +++ b/forth/admin/devices.fs @@ -45,6 +45,10 @@ : device-end ( -- ) 0 active-package! ; + +: unselect-dev ( -- ) + device-end +; : ?active-package ( -- phandle ) active-package dup 0= abort" no active device" diff --git a/forth/device/pathres.fs b/forth/device/pathres.fs index 39cd690..4184d07 100644 --- a/forth/device/pathres.fs +++ b/forth/device/pathres.fs @@ -471,6 +471,10 @@ constant sinfo.size ( ihandle ) ; +: select-dev ( dev-str dev-len -- ihandle | 0 ) + open-dev +; + : execute-device-method ( ... dev-str dev-len met-str met-len -- ... false | ?? true ) 2swap