mirror of
https://gitlab.com/qemu-project/openbios.git
synced 2024-02-13 08:34:06 +08:00
Fix x86 build
git-svn-id: svn://coreboot.org/openbios/openbios-devel@382 f158a5a8-5612-0410-a976-696ce0be7e32
This commit is contained in:
@@ -74,66 +74,3 @@ finish-device
|
||||
:noname
|
||||
" keyboard" input
|
||||
; CONSOLE-IN-initializer
|
||||
|
||||
|
||||
dev /pci
|
||||
|
||||
\ simple isa bus node
|
||||
new-device
|
||||
" isa" device-name
|
||||
" isa" device-type
|
||||
2 encode-int " #address-cells" property
|
||||
1 encode-int " #size-cells" property
|
||||
|
||||
external
|
||||
: open true ;
|
||||
: close ;
|
||||
|
||||
finish-device
|
||||
|
||||
: ?devalias ( alias-str alias-len device-str device-len --
|
||||
\ alias-str alias-len false | true )
|
||||
active-package >r
|
||||
" /aliases" find-device
|
||||
\ 2dup ." Checking " type
|
||||
2dup find-dev if \ check if device exists
|
||||
drop
|
||||
2over find-dev if \ do we already have an alias?
|
||||
\ ." alias exists" cr
|
||||
drop 2drop false
|
||||
else
|
||||
\ ." device exists" cr
|
||||
encode-string
|
||||
2swap property
|
||||
true
|
||||
then
|
||||
else
|
||||
\ ." device doesn't exist" cr
|
||||
2drop false
|
||||
then
|
||||
r> active-package!
|
||||
;
|
||||
|
||||
:noname
|
||||
" hd"
|
||||
" /pci/isa/ide0/disk@0" ?devalias not if
|
||||
" /pci/isa/ide0/disk@1" ?devalias not if
|
||||
" /pci/isa/ide1/disk@0" ?devalias not if
|
||||
" /pci/isa/ide1/disk@1" ?devalias not if
|
||||
2drop ." No disk found." cr
|
||||
then
|
||||
then
|
||||
then
|
||||
then
|
||||
|
||||
" cdrom"
|
||||
" /pci/isa/ide0/cdrom@0" ?devalias not if
|
||||
" /pci/isa/ide0/cdrom@1" ?devalias not if
|
||||
" /pci/isa/ide1/cdrom@0" ?devalias not if
|
||||
" /pci/isa/ide1/cdrom@1" ?devalias not if
|
||||
2drop ." No cdrom found" cr
|
||||
then
|
||||
then
|
||||
then
|
||||
then
|
||||
; SYSTEM-initializer
|
||||
|
||||
Reference in New Issue
Block a user