Re: [OpenBIOS] r571 - in trunk/openbios-devel: arch/ppc/qemu forth/admin

svn@openbios.org wrote:
The MacOS bootloader (BootX) is also loaded automatically but forth script is too complex to be executed correctly.
Where does it fail? Can you dump the script? Stefan

Le samedi 29 août 2009 à 17:53 +0200, Stefan Reinauer a écrit :
svn@openbios.org wrote:
The MacOS bootloader (BootX) is also loaded automatically but forth script is too complex to be executed correctly.
Where does it fail?
./ppc-softmmu/qemu-system-ppc -serial stdio -net nic,vlan=0 -net user,vlan=0 -L ./pc-bios -boot d -cdrom /dev/cdrom
============================================================= OpenBIOS 1.0 [Aug 16 2009 18:47] Configuration device id QEMU version 1 machine id 2 CPUs: 1 Memory: 128M UUID: 00000000-0000-0000-0000-000000000000 CPU type PowerPC,750 *** Boot failure! No secondary bootloader specified *** laurent@Quad:~/Projects/qemu$ ./ppc-softmmu/qemu-system-ppc -serial stdio -net nic,vlan=0 -net user,vlan=0 -L ./pc-bios -boot d -cdrom /dev/cdrom -nographic
============================================================= OpenBIOS 1.0 [Aug 16 2009 18:47] Configuration device id QEMU version 1 machine id 2 CPUs: 1 Memory: 128M UUID: 00000000-0000-0000-0000-000000000000 CPU type PowerPC,750 Welcome to OpenBIOS v1.0 built on Aug 16 2009 18:47
$=:>> *** Boot failure! No secondary bootloader specified *** 0 >
Can you dump the script?
load-base begin dup 6 " </CHRP" $= if 6 + dup 6 " -BOOT>" $= if 8 + true else false then else 1+ false then until ( xcoff-base ) load-size over load-base - - ( xcoff-base xcoff-size ) load-base swap move init-program go The issue seems with "$=". I think "init-program" and "go" are also missing. "go" like "load" is needed by openSUSE script too. There is also a "bug" in the try_chrp_script() procedure which loads the script into the stack instead of at "load-base". I'll work on these issues, but I'm not a Forth expert (I learn) ... Regards, Laurent -- --------------------- laurent@vivier.eu ---------------------- "Tout ce qui est impossible reste à accomplir" Jules Verne "Things are only impossible until they're not" Jean-Luc Picard
participants (2)
-
Laurent Vivier
-
Stefan Reinauer