[openfirmware] [commit] r3604 - cpu/arm/olpc
repository service
svn at openfirmware.info
Wed Mar 13 03:33:31 CET 2013
Author: quozl
Date: Wed Mar 13 03:33:30 2013
New Revision: 3604
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3604
Log:
OLPC XO-4 - touchscreen tests. FINAL test phase: remove the existing adjacent axes test, use the new nonlinearity test. SHIP test phase: restore scribble for general use by field.
Modified:
cpu/arm/olpc/nn-touchscreen.fth
Modified: cpu/arm/olpc/nn-touchscreen.fth
==============================================================================
--- cpu/arm/olpc/nn-touchscreen.fth Wed Mar 13 03:21:56 2013 (r3603)
+++ cpu/arm/olpc/nn-touchscreen.fth Wed Mar 13 03:33:30 2013 (r3604)
@@ -919,6 +919,10 @@
['] (.tsmsg) to .tsmsg
;
+: scribble
+ ev( ['] dot ev )ev
+;
+
\ Nonlinearity test
d# 2000 constant #pts-max
@@ -1147,7 +1151,7 @@
\ 2) Establish threshold for nonlinearity and fail if exceeded
\ 3) Perhaps integrate the nonlinearity test with the targets test?
-: scribble
+: test-nonlinearity
alloc-bufs
begin ev(
0 to #pts
@@ -1166,10 +1170,6 @@
free-bufs
;
-\ : scribble
-\ ev( ['] dot ev )ev
-\ ;
-
0 value dx
0 value dy
@@ -1332,6 +1332,14 @@
faults
;
+: mb-final ( -- error? )
+ open 0= if true exit then
+ d# 86400.000 to test-timeout
+ ['] test-nonlinearity catch ?dup if .error fault then
+ close
+ faults
+;
+
: selftest ( -- error? )
absent? if ." No touchscreen expected" cr false exit then
@@ -1340,7 +1348,7 @@
test-station case
h# 1 of mb-smt exit endof
h# 2 of mb-assy exit endof
- h# 4 of mb-assy exit endof
+ h# 4 of mb-final exit endof
h# 11 of ir-pcb-smt exit endof
h# 12 of ir-pcb-assy exit endof
h# 13 of lg-tooling exit endof
More information about the openfirmware
mailing list