mirror of
https://gitlab.com/qemu-project/openbios.git
synced 2024-02-13 08:34:06 +08:00
git-svn-id: svn://coreboot.org/openbios/openbios-devel@1 f158a5a8-5612-0410-a976-696ce0be7e32
14 lines
106 B
Forth
14 lines
106 B
Forth
|
|
: test-screen
|
|
10 10 pci-l@
|
|
f0 0 do
|
|
dup d# 1280 i * +
|
|
500 i fill
|
|
loop
|
|
;
|
|
|
|
test-screen
|
|
|
|
|
|
|