Author: wmb Date: Sat Jan 30 04:29:00 2010 New Revision: 1724 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/1724
Log: OLPC XO-1.5 factory support - lengthened audio test in case mode for better noise immunity in final test, and shortened the initial preparation pass so the total test time doesn't get too long.
Modified: dev/hdaudio/noiseburst.fth dev/hdaudio/test.fth
Modified: dev/hdaudio/noiseburst.fth ============================================================================== --- dev/hdaudio/noiseburst.fth Sat Jan 30 04:23:25 2010 (r1723) +++ dev/hdaudio/noiseburst.fth Sat Jan 30 04:29:00 2010 (r1724) @@ -359,13 +359,13 @@ left-range d# 200 d# 140 sm-covar-abs-sum nip ( sum1.high ) left-range d# 540 d# 400 sm-covar-abs-sum nip ( sum1.high sum2.high ) >ratio - d# 30 < + d# 25 < ; : case-ratio-right ( -- error? ) right-range d# 330 d# 140 sm-covar-abs-sum nip ( sum1.high ) right-range d# 590 d# 400 sm-covar-abs-sum nip ( sum1.high sum2.high ) >ratio - d# 15 < + d# 14 < ;
\ This compares the total energy within the impulse response band to the @@ -439,8 +439,7 @@ ['] -mono-wmean to fix-dc ; : setup-case ( -- ) -\ xxx - this needs to use the internal speakers and mic even though the loopback cable is attached - h# 40000 to /pb \ Long burst for better S/N on far away speaker + h# 80000 to /pb \ Long burst for better S/N on far away speaker /pb 2/ h# 1000 + to /rb \ Mono reception (internal mic) ['] case-ratio-left to analyze-left ['] case-ratio-right to analyze-right
Modified: dev/hdaudio/test.fth ============================================================================== --- dev/hdaudio/test.fth Sat Jan 30 04:23:25 2010 (r1723) +++ dev/hdaudio/test.fth Sat Jan 30 04:29:00 2010 (r1724) @@ -90,8 +90,8 @@ : test-common ( setup$ -- error? ) $call-analyzer ( ) " prepare-signal" $call-analyzer ( pb /pb rb /rb ) - \ First time lets the input channel settle - 2over 2over out-in ( pb /pb rb /rb ) + \ First shorter run lets the input channel settle + 2over 4 / 2over 4 / out-in ( pb /pb rb /rb ) out-in ( ) " analyze-signal" $call-analyzer ( okay? ) ; @@ -116,7 +116,6 @@ output-common-settings d# -23 set-volume \ -23 prevents obvious visible clipping " setup-fixture" test-common false to force-speakers? false to force-internal-mic? - ; : test-with-loopback ( -- error? ) input-common-settings stereo