[openfirmware] [commit] r3313 - cpu/arm/olpc
repository service
svn at openfirmware.info
Tue Sep 18 05:27:06 CEST 2012
Author: quozl
Date: Tue Sep 18 05:27:06 2012
New Revision: 3313
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3313
Log:
OLPC XO-4 - Neonode, do not process fixed signal strength response packets unless they are present, probably fixes a Data Abort when the controller ceases to respond.
Modified:
cpu/arm/olpc/nn-touchscreen.fth
Modified: cpu/arm/olpc/nn-touchscreen.fth
==============================================================================
--- cpu/arm/olpc/nn-touchscreen.fth Mon Sep 17 09:39:42 2012 (r3312)
+++ cpu/arm/olpc/nn-touchscreen.fth Tue Sep 18 05:27:06 2012 (r3313)
@@ -22,11 +22,10 @@
\ create nn-fss \ optional fixed signal strength test
\ create nn-ls \ optional low signals test
+\ create nn-fss-all \ fixed signal strength test, all power levels
\ create nn-components \ isolate test results to failed component identifier
-\ create nn-ir-pcb-rev-b \ support for revision b of the ir pcb assembly
-
d# 15 value xleds
d# 11 value yleds
@@ -455,10 +454,12 @@
: test-fss-axis-all ( axis power -- )
swap h# 0f h# 03 h# ee 5 bytes-out
h# 0f d# 20 anticipate
- pbuf 4 + c@ 0 do ( )
- pbuf 5 + i + c@
- .d
- loop cr
+ pbuf 2+ c@ h# 0f = if
+ pbuf 4 + c@ 0 do ( )
+ pbuf 5 + i + c@
+ .d
+ loop cr
+ then
;
: test-fss-all
@@ -480,14 +481,16 @@
h# 0f h# 03 h# ee 5 bytes-out ( r: power )
h# 0f d# 20 anticipate
r> ( power)
- pbuf 4 + c@ 0 do ( power )
- pbuf 5 + i + c@ ( power signal )
- over swap ( power x y )
- >scaled
-
- i 4 lshift >pseudo -rot 9 9 ( color x y w h )
- fill-rectangle-noff ( )
- loop ( power )
+ pbuf 2+ c@ h# 0f = if
+ pbuf 4 + c@ 0 do ( power )
+ pbuf 5 + i + c@ ( power signal )
+ over swap ( power x y )
+ >scaled
+
+ i 4 lshift >pseudo -rot 9 9 ( color x y w h )
+ fill-rectangle-noff ( )
+ loop ( power )
+ then ( power )
drop
;
@@ -693,11 +696,12 @@
dup to axis# ( axis# )
fs swap h# 0f h# 03 h# ee 5 bytes-out
h# 0f d# 200 anticipate
-
- pbuf 4 + c@ 0 do ( )
- i pbuf 5 + over + c@ ( signal# level )
- watch-fss-signal ( )
- loop
+ pbuf 2+ c@ h# 0f = if
+ pbuf 4 + c@ 0 do ( )
+ i pbuf 5 + over + c@ ( signal# level )
+ watch-fss-signal ( )
+ loop
+ then
;
: watch-fss
More information about the openfirmware
mailing list