r359 - dev/geode/ac97

Author: wmb
Date: 2007-05-04 11:53:10 +0200 (Fri, 04 May 2007)
New Revision: 359

Modified:
   dev/geode/ac97/selftest.fth
Log:
OLPC audio selftest - fixed a stack depth bug that was killing test-all.
















Modified: dev/geode/ac97/selftest.fth
===================================================================
--- dev/geode/ac97/selftest.fth	2007-05-04 09:52:31 UTC (rev 358)
+++ dev/geode/ac97/selftest.fth	2007-05-04 09:53:10 UTC (rev 359)
@@ -108,7 +108,7 @@
 : selftest-args  ( -- arg$ )  my-args ascii : left-parse-string 2drop  ;
 
 : ?play-wav-file  ( -- )
-   selftest-args dup 0=  if  drop exit  then
+   selftest-args dup 0=  if  2drop exit  then
 
    \ Read the .wav file
    2dup ." Play " type cr