[openfirmware] [commit] r2897 - in cpu/arm: mmp2 olpc

repository service svn at openfirmware.info
Sat Mar 17 02:51:04 CET 2012


Author: quozl
Date: Sat Mar 17 02:51:04 2012
New Revision: 2897
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2897

Log:
OLPC - stack effect comment fixes

Modified:
   cpu/arm/mmp2/hash.fth
   cpu/arm/olpc/rtc.fth

Modified: cpu/arm/mmp2/hash.fth
==============================================================================
--- cpu/arm/mmp2/hash.fth	Fri Mar 16 23:18:06 2012	(r2896)
+++ cpu/arm/mmp2/hash.fth	Sat Mar 17 02:51:04 2012	(r2897)
@@ -69,7 +69,7 @@
       0 to #hash-buf
    then
 ;
-: hash-update  ( adr len -- adr' len' )
+: hash-update  ( adr len -- )
    dup #hashed + to #hashed                ( adr len )
    begin  dup   while                      ( adr len )
       2dup  /hash-block #hash-buf -  min   ( adr len adr this )

Modified: cpu/arm/olpc/rtc.fth
==============================================================================
--- cpu/arm/olpc/rtc.fth	Fri Mar 16 23:18:06 2012	(r2896)
+++ cpu/arm/olpc/rtc.fth	Sat Mar 17 02:51:04 2012	(r2897)
@@ -77,7 +77,7 @@
    then
    get-time .date space .time cr
    get-time 2nip 2nip nip
-   d# 2011 < dup  if  ." Date in RTC is too early" cr  then
+   d# 2011 < dup  if  ." Date in RTC is too early" cr  then	( -- flag )
    close
 ;
 



More information about the openfirmware mailing list