[openfirmware] [commit] r2072 - cpu/x86/pc/olpc

[repository service]

Author: wmb
Date: Wed Dec  8 22:30:16 2010
New Revision: 2072
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2072

Log:
OLPC trac #10521 - close audio device after playing startup sound so subsequent test /audio works right (resets the sample rate).

Modified:
   cpu/x86/pc/olpc/sound.fth

Modified: cpu/x86/pc/olpc/sound.fth
==============================================================================
--- cpu/x86/pc/olpc/sound.fth	Wed Dec  8 22:28:37 2010	(r2071)
+++ cpu/x86/pc/olpc/sound.fth	Wed Dec  8 22:30:16 2010	(r2072)
@@ -37,13 +37,21 @@
    r> to load-started
    r> to playback-volume
 ;
+: close-audio  ( -- )
+   audio-ih  if
+      audio-ih close-dev
+      0 to audio-ih
+   then
+;
 : sound-end  ( -- )
    " wait-sound" ['] $call-audio catch  if  2drop  then
    free-wav
+   close-audio
 ;
 : stop-sound  ( -- )
    " stop-sound" ['] $call-audio catch  if  2drop  then
    free-wav
+   close-audio
 ;
 
 \ LICENSE_BEGIN