[openfirmware] [commit] r3107 - cpu/arm/marvell
repository service
svn at openfirmware.info
Wed Aug 1 06:39:11 CEST 2012
Author: wmb
Date: Wed Aug 1 06:39:11 2012
New Revision: 3107
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3107
Log:
## Lines starting with '## ' will be removed from the log message.
## File(s) to commit recursively:
## cpu/arm/marvell/tim.fth
Marvell TIM compiler - fixed misleading name.
Modified:
cpu/arm/marvell/tim.fth
Modified: cpu/arm/marvell/tim.fth
==============================================================================
--- cpu/arm/marvell/tim.fth Wed Aug 1 06:34:49 2012 (r3106)
+++ cpu/arm/marvell/tim.fth Wed Aug 1 06:39:11 2012 (r3107)
@@ -1,7 +1,7 @@
: >hex ( n -- n' ) d# 10 /mod h# 10 * + ;
0 value tim-version
-: tim-v3? ( -- flag ) tim-version h# 00ffff00 and h# 00030400 = ;
+: tim-v4? ( -- flag ) tim-version h# 00ffff00 and h# 00030400 = ;
: today>hex ( -- n )
today ( day month year )
@@ -10,7 +10,7 @@
rot >hex >r ( yr century r: hex-month hex-day )
>hex >r ( yr r: hex-month hex-day hex-century )
>hex r> r> r>
- tim-v3? if 2swap then
+ tim-v4? if 2swap then
bljoin ( n )
;
@@ -129,10 +129,10 @@
over <> abort" Read failed" ( size )
ifd @ fclose ( size )
\ Older BOOTROMs seem to want the size to be strongly aligned
- tim-v3? if 4 else h# 800 then round-up ( size' )
+ tim-v4? if 4 else h# 800 then round-up ( size' )
;
: place-hash \ XXX need to implement non-null hash info
- tim-v3? if
+ tim-v4? if
0 l, \ Size to hash (should be -1 but 0 is in the examples)
d# 20 l, \ HashAlgorithmID - SHA-160
d# 16 0 do 0 l, loop \ Hash
More information about the openfirmware
mailing list