[openfirmware] [commit] r3475 - dev
repository service
svn at openfirmware.info
Thu Dec 6 22:15:34 CET 2012
Author: wmb
Date: Thu Dec 6 22:15:34 2012
New Revision: 3475
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3475
Log:
EDID decoder - (a) Fixed crash due to typo of " for ." (b) Fixed spurious + in audio decoding.
Modified:
dev/edid.fth
Modified: dev/edid.fth
==============================================================================
--- dev/edid.fth Thu Dec 6 08:03:54 2012 (r3474)
+++ dev/edid.fth Thu Dec 6 22:15:34 2012 (r3475)
@@ -141,21 +141,21 @@
\ Audio sample rates
: .cea-freqs ( n -- )
- peel-bit if ." 32" then ?.+
- peel-bit if ." 44" then ?.+
- peel-bit if ." 48" then ?.+
- peel-bit if ." 88" then ?.+
- peel-bit if ." 96" then ?.+
- peel-bit if ." 176" then ?.+
- peel-bit if ." 192" then drop
- ." kHz"
+ peel-bit if ." 32" ?.+ then
+ peel-bit if ." 44" ?.+ then
+ peel-bit if ." 48" ?.+ then
+ peel-bit if ." 88" ?.+ then
+ peel-bit if ." 96" ?.+ then
+ peel-bit if ." 176" ?.+ then
+ peel-bit if ." 192" then
+ ." kHz" drop
;
\ Audio sample widths
: .cea-bits ( n -- )
- peel-bit if ." 16" then ?.+
- peel-bit if ." 20" then ?.+
- peel-bit if ." 24" then drop
- ." bits"
+ peel-bit if ." 16" ?.+ then
+ peel-bit if ." 20" ?.+ then
+ peel-bit if ." 24" then
+ ." bits" drop
;
string-array format-names
@@ -284,13 +284,13 @@
\ rest is history.
: .cea-speaker ( offset size -- )
drop cea@
- peel-bit if " Front_L+R " then \ Stereo
- peel-bit if " LFE " then \ Subwoofer makes 2.1
- peel-bit if " Front_Center " then \ Center fill makes 3.1
- peel-bit if " Rear_L+R " then \ Ambience makes 5.1
- peel-bit if " Rear_Center " then \ 7.1 ...
- peel-bit if " Front_Center_L+R " then \ How many speakers do they want to sell you?
- peel-bit if " Rear_Center_L+R " then \ How can you live without twelve speakers?
+ peel-bit if ." Front_L+R " then \ Stereo
+ peel-bit if ." LFE " then \ Subwoofer makes 2.1
+ peel-bit if ." Front_Center " then \ Center fill makes 3.1
+ peel-bit if ." Rear_L+R " then \ Ambience makes 5.1
+ peel-bit if ." Rear_Center " then \ 7.1 ...
+ peel-bit if ." Front_Center_L+R " then \ How many speakers do they want to sell you?
+ peel-bit if ." Rear_Center_L+R " then \ How can you live without twelve speakers?
drop
;
More information about the openfirmware
mailing list