[openfirmware] [commit] r1754 - dev/geode/ac97

[repository service]

Author: wmb
Date: Thu Feb 18 19:36:21 2010
New Revision: 1754
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/1754

Log:
OLPC trac 10025 - sound-recording plays back in doubletime.

Modified:
   dev/geode/ac97/ac97.fth
   dev/geode/ac97/selftest.fth

Modified: dev/geode/ac97/ac97.fth
==============================================================================
--- dev/geode/ac97/ac97.fth	Thu Feb 18 06:14:22 2010	(r1753)
+++ dev/geode/ac97/ac97.fth	Thu Feb 18 19:36:21 2010	(r1754)
@@ -209,6 +209,10 @@
 d# 48000 instance value sample-rate
 0 instance value s/ms
 
+\ Some audio interfaces let you choose the output format; this one doesn't
+: mono  ( -- )  ;
+: stereo  ( -- )  ;
+
 : set-sample-rate  ( hz -- )  to sample-rate  ;
 
 : amp-default-on?  ( -- flag )  " gx?" eval  ;

Modified: dev/geode/ac97/selftest.fth
==============================================================================
--- dev/geode/ac97/selftest.fth	Thu Feb 18 06:14:22 2010	(r1753)
+++ dev/geode/ac97/selftest.fth	Thu Feb 18 19:36:21 2010	(r1754)
@@ -131,14 +131,14 @@
 : sweep-test  ( -- )
    ." Playing sweep" cr
    make-sweep
-   d# -9 set-volume  play
+   d# -9 set-volume  stereo play
 ;
 
 : mic-test  ( -- )
    ." Recording ..." cr
-   record
+   mono record
    ." Playing ..." cr
-   d# -3 set-volume  play
+   d# -3 set-volume  mono play
 ;
 
 : selftest  ( -- error? )