Changeset 3107


Ignore:
Timestamp:
Aug 1, 2012, 6:39:11 AM (21 months ago)
Author:
wmb
Message:

## 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.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpu/arm/marvell/tim.fth

    r3106 r3107  
    22 
    330 value tim-version 
    4 : tim-v3?  ( -- flag )  tim-version h# 00ffff00 and h# 00030400 =  ; 
     4: tim-v4?  ( -- flag )  tim-version h# 00ffff00 and h# 00030400 =  ; 
    55 
    66: today>hex  ( -- n ) 
     
    1111   >hex >r      ( yr r: hex-month hex-day hex-century ) 
    1212   >hex r> r> r>  
    13    tim-v3?  if  2swap  then 
     13   tim-v4?  if  2swap  then 
    1414   bljoin  ( n ) 
    1515; 
     
    130130   ifd @ fclose                ( size ) 
    131131   \ Older BOOTROMs seem to want the size to be strongly aligned 
    132    tim-v3?  if  4  else  h# 800  then  round-up  ( size' ) 
     132   tim-v4?  if  4  else  h# 800  then  round-up  ( size' ) 
    133133; 
    134134: place-hash  \ XXX need to implement non-null hash info 
    135    tim-v3?  if 
     135   tim-v4?  if 
    136136      0 l,  \ Size to hash  (should be -1 but 0 is in the examples) 
    137137      d# 20 l,  \ HashAlgorithmID - SHA-160 
Note: See TracChangeset for help on using the changeset viewer.