Changeset 3668


Ignore:
Timestamp:
Jun 6, 2013, 4:06:14 AM (19 months ago)
Author:
quozl
Message:

OLPC - save-mfg-data, simplify SN processing code following #12695 review. No functional change.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • dev/olpc/spiflash/spiui.fth

    r3663 r3668  
    121121: make-sn-name  ( -- filename$ ) 
    122122   " SN" find-tag 0=  abort" No serial number in mfg data"  ( sn$ ) 
    123    dup  if                   ( sn$ ) 
    124       2dup + 1- c@ 0=  if    ( sn$ ) 
    125          1-                  ( sn$' )    \ Remove Null 
    126       then                   ( sn$ ) 
    127    then                      ( sn$ ) 
     123   ?-null                    ( sn$' )    \ Remove Null 
    128124   d# 11 over -  dup 0>  if  ( sn$' #excess ) 
    129125      /string                ( sn$' )  \ Keep last 11 characters 
Note: See TracChangeset for help on using the changeset viewer.