[openfirmware] r841 - dev/olpc/cafenand
svn at openfirmware.info
svn at openfirmware.info
Tue Jul 1 02:55:02 CEST 2008
Author: wmb
Date: 2008-07-01 02:55:01 +0200 (Tue, 01 Jul 2008)
New Revision: 841
Modified:
dev/olpc/cafenand/selftest.fth
Log:
OLPC trac #7399 - fixed "test /nandflash::fixbbt" command.
Modified: dev/olpc/cafenand/selftest.fth
===================================================================
--- dev/olpc/cafenand/selftest.fth 2008-06-27 21:28:06 UTC (rev 840)
+++ dev/olpc/cafenand/selftest.fth 2008-07-01 00:55:01 UTC (rev 841)
@@ -137,7 +137,7 @@
\ Destroy content of flash. Argument is hex byte pattern value.
: .skip-bad ( page# -- ) (cr ." Skip bad block" .page-byte cr ;
-: fill ( subarg$ -- )
+: pfill ( subarg$ -- )
$number if 0 else 0 max h# ff min then
." Fill nandflash with h# " dup u. cr
@@ -222,7 +222,7 @@
i save-eblock 0= if ( stride )
i h# 55 test-eblock record-err ( stride )
i h# aa test-eblock record-err ( stride )
- restore-eblock ( stride )
+ i restore-eblock ( stride )
then ( stride )
then ( stride )
dup +loop drop ( )
@@ -235,6 +235,7 @@
true to fixbbt?
full
#fixbbt if save-bbt then
+ false to selftest-err? \ Don't say "failed" if asked to fix the table
;
: none ( subarg$ -- ) 2drop exit ;
@@ -250,7 +251,7 @@
." none to do nothing" cr
." help to get this usage guide" cr
." erase! to erase the flash (destructive)" cr
- ." fill[,<data>] to fill the flash with hex byte pattern <data> (destructive)" cr
+ ." pfill[,<data>] to fill the flash with hex byte pattern <data> (destructive)" cr
." Default <data> is 00" cr
." fast[,<#blk>] to non-destructively test the specified <#blk> of flash" cr
." Default <#blk> is decimal 10" cr
More information about the openfirmware
mailing list