[openfirmware] [commit] r2544 - cpu/arm/mmp2

[repository service]

Author: wmb
Date: Wed Sep 28 03:06:17 2011
New Revision: 2544
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2544

Log:
OLPC XO-1.75 - suspend/resume test4 improvements - slightly longer cycle time to ensure at least one whole clock tick, display power info.

Modified:
   cpu/arm/mmp2/rtc.fth

Modified: cpu/arm/mmp2/rtc.fth
==============================================================================
--- cpu/arm/mmp2/rtc.fth	Wed Sep 28 03:04:52 2011	(r2543)
+++ cpu/arm/mmp2/rtc.fth	Wed Sep 28 03:06:17 2011	(r2544)
@@ -48,7 +48,7 @@
    
    int5-mask@ 1 invert and int5-mask!  \ Unmask alarm
    enable-rtc-wakeup
-   0 soc-rtc@  d# 1 +  4 soc-rtc!      \ Set alarm for 3 seconds from now
+   0 soc-rtc@  d# 2 +  4 soc-rtc!      \ Set alarm for 2 seconds from now
    7 8 soc-rtc!                        \ Ack old interrupts and enable new ones
    ['] cancel-alarm 5 interrupt-handler!
    5 enable-interrupt
@@ -91,15 +91,15 @@
    key? until
 ;
 : test4
-   begin
-      0 d# 13 at-xy
+   d# 1000000 0 do
+      0 d# 13 at-xy  i .d
       5 0  do
-         wake1  str
          cr i .
+         wake1  strp
          d# 500 ms
-         key? if unloop exit  then
+         key? if unloop unloop exit  then
       loop
-   again
+   5 +loop
 ;
 
 \ test3