Author: wmb Date: 2010-01-23 05:42:37 +0100 (Sat, 23 Jan 2010) New Revision: 1685
Modified: cpu/x86/pc/olpc/disptest.fth Log: OLPC display test - in final-test mode, wait for the operator to type a key to cycle from one test to the next.
Modified: cpu/x86/pc/olpc/disptest.fth =================================================================== --- cpu/x86/pc/olpc/disptest.fth 2010-01-22 08:25:04 UTC (rev 1684) +++ cpu/x86/pc/olpc/disptest.fth 2010-01-23 04:42:37 UTC (rev 1685) @@ -154,14 +154,27 @@ load-base whole-screen fill-rect ; : hold-time ( -- ) - smt-test? if d# 500 ms else d# 1000 ms then + smt-test? if + d# 500 ms + else + final-test? if d# 500 ms else d# 1000 ms then + then ; + +: hold-time2 ( -- ) + smt-test? if + d# 500 ms + else + final-test? if key drop then + d# 1000 ms + then +; : wait ( -- ) hold-time 0 set-source \ Freeze image hold-time 1 set-source \ Unfreeze image - hold-time + hold-time2 ;
warning @ warning off