diff options
author | Thomas Huth <thuth@linux.vnet.ibm.com> | 2015-03-11 15:43:44 +0100 |
---|---|---|
committer | Alexey Kardashevskiy <aik@ozlabs.ru> | 2015-03-12 18:25:35 +1100 |
commit | 18b1f6097643c3792b39370846a434b10ccb27bb (patch) | |
tree | acd43c90f4fa2350dababed234bbc20b711b22f5 /board-js2x | |
parent | e6c14049aee8ecfc0c3d105c296a48a1b9d274b1 (diff) | |
download | SLOF-18b1f6097643c3792b39370846a434b10ccb27bb.zip SLOF-18b1f6097643c3792b39370846a434b10ccb27bb.tar.gz SLOF-18b1f6097643c3792b39370846a434b10ccb27bb.tar.bz2 |
Use device-type Forth word to set up the corresponding property
It's easier to use "device-type" instead of creating the
corresponding properties manually.
Signed-off-by: Thomas Huth <thuth@linux.vnet.ibm.com>
Signed-off-by: Alexey Kardashevskiy <aik@ozlabs.ru>
Diffstat (limited to 'board-js2x')
-rw-r--r-- | board-js2x/slof/pci-device_1002_515e.fs | 2 | ||||
-rw-r--r-- | board-js2x/slof/vga-display.fs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/board-js2x/slof/pci-device_1002_515e.fs b/board-js2x/slof/pci-device_1002_515e.fs index 9f7d8c2..39a02de 100644 --- a/board-js2x/slof/pci-device_1002_515e.fs +++ b/board-js2x/slof/pci-device_1002_515e.fs @@ -460,7 +460,7 @@ init2_array init2_length encode-array " ibm,init2" property pllinit_array pllinit_length encode-array " ibm,pllinit" property meminit_array meminit_length encode-array " ibm,meminit" property 0 0 encode-bytes " iso6429-1983-colors" property -" display" encode-string " device_type" property +s" display" device-type /scanline encode-int " width" property #scanlines encode-int " height" property 8 encode-int " depth" property diff --git a/board-js2x/slof/vga-display.fs b/board-js2x/slof/vga-display.fs index 0cc9bba..0295e88 100644 --- a/board-js2x/slof/vga-display.fs +++ b/board-js2x/slof/vga-display.fs @@ -20,7 +20,7 @@ value display_num ( str len ) s" ,Display-" $cat 41 display_num + char-cat \ add ", Display-A" or "-B" to name ( str len ) encode-string s" name" property \ store as name property -s" display" encode-string s" device_type" property \ add "device_type" propert +s" display" device-type \ screen-info is set by pci-class_03.fs contains output of get_vbe_info bios-snk call CASE screen-info c@ \ ( display-type ) |