[OpenBIOS] r361 - cpu/x86/pc/olpc

[svn at openbios.org]

Author: wmb
Date: 2007-05-04 12:16:02 +0200 (Fri, 04 May 2007)
New Revision: 361

Modified:
   cpu/x86/pc/olpc/disptest.fth
Log:
OLPC display selftest - consume the key that stopped the test early so it is not pending for some other test.


Modified: cpu/x86/pc/olpc/disptest.fth
===================================================================
--- cpu/x86/pc/olpc/disptest.fth	2007-05-04 10:02:39 UTC (rev 360)
+++ cpu/x86/pc/olpc/disptest.fth	2007-05-04 10:16:02 UTC (rev 361)
@@ -61,9 +61,9 @@
    get-msecs burnin-time +    ( limit )
    begin
       get-msecs over u<       ( limit reached? )
-      key? 0= and             ( limit end? )
    while                      ( limit )
       .random-rect            ( limit )
+      key?  if  key 2drop exit  then
    repeat                     ( limit )
    drop
 ;
@@ -74,7 +74,7 @@
    d# 2000 ms
    .vertical-bars16
    d# 2000 ms
-   ." Press a key to abort." cr
+   ." Press a key to stop early." cr
    d# 1000 ms
    random-selftest
    false