Changeset 3480


Ignore:
Timestamp:
Dec 7, 2012, 6:09:54 AM (20 months ago)
Author:
quozl
Message:

OLPC - libertas, add unused eeprom dump helper

File:
1 edited

Legend:

Unmodified
Added
Removed
  • dev/libertas.fth

    r3452 r3480  
    830830   ACTION_GET +xw 
    831831   ( idx ) +xw 
    832    4 +xw 
     832   4 +xw \ maximum h# 10 
    833833   outbuf-wait  if  0 exit  then 
    834834   respbuf >fw-data 6 + le-l@ 
    835835; 
     836 
     837[ifdef] notdef 
     838   : eeprom-dump 
     839      400 0 do 
     840         i 8 .r ." :  " 
     841         a 59 ( CMD_EEPROM_ACCESS ) prepare-cmd 
     842         ACTION_GET +xw \ Action 
     843         i +xw \ Offset 
     844         10 +xw \ Byte Count 
     845         outbuf-wait  if  unloop exit  then 
     846         respbuf >fw-data 6 + 
     847         dup 8 cdump space 8 + 8 cdump cr 
     848      10 +loop 
     849   ; 
     850[then] 
    836851 
    837852\ ========================================================================= 
Note: See TracChangeset for help on using the changeset viewer.