r371 - dev/olpc/kb3700

Author: wmb
Date: 2007-05-12 03:14:39 +0200 (Sat, 12 May 2007)
New Revision: 371

Modified:
   dev/olpc/kb3700/ecio.fth
Log:
OLPC EC - Added an additional interlock to the EC Port 6c command protocol,
as recommended by David Lin at Quanta.

Modified: dev/olpc/kb3700/ecio.fth
===================================================================
--- dev/olpc/kb3700/ecio.fth	2007-05-12 01:13:43 UTC (rev 370)
+++ dev/olpc/kb3700/ecio.fth	2007-05-12 01:14:39 UTC (rev 371)
@@ -73,7 +73,7 @@
 : ec-cmd!  ( b -- )  ec-wait-wr  h# 6c pc!  ec-wait-wr  ;

: ec-dat@  ( -- b )  ec-wait-rd  h# 68 pc@  ;
-: ec-dat!  ( b -- )  ec-wait-wr  h# 68 pc!  ;
+: ec-dat!  ( b -- )  ec-wait-wr  h# 68 pc!  ec-wait-wr  ;

: ec-rb    ( -- b )  0 ec-dat!  ec-dat@  ;
 : ec-rw    ( -- w )  ec-rb ec-rb swap bwjoin  ;