Author: wmb Date: Thu Jul 15 19:41:34 2010 New Revision: 1873 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/1873
Log: OLPC XO-1.5 fs-update - commented out some dead code that was trying to implement a possible optimization. The code was never executed due to a programming error, and probably was not a good idea anyway.
Modified: cpu/x86/pc/olpc/via/fsupdate.fth
Modified: cpu/x86/pc/olpc/via/fsupdate.fth ============================================================================== --- cpu/x86/pc/olpc/via/fsupdate.fth Wed Jul 14 23:01:11 2010 (r1872) +++ cpu/x86/pc/olpc/via/fsupdate.fth Thu Jul 15 19:41:34 2010 (r1873) @@ -185,10 +185,10 @@
?get-crc ( eblock# hashname$ hash$ r: comprlen )
- 2over " fa43239bcee7b97ca62f007cc68487560a39e19f74f3dde7486db3f98df8e471" $= if ( eblock# hashname$ hash$ r: comprlen) - r> skip-zdata ( eblock# hashname$ hash$ ) - 2drop 2drop ( eblock# ) - else ( eblock# hashname$ hash$ ) +\ 2dup " fa43239bcee7b97ca62f007cc68487560a39e19f74f3dde7486db3f98df8e471" $= if ( eblock# hashname$ hash$ r: comprlen) +\ r> skip-zdata ( eblock# hashname$ hash$ ) +\ 2drop 2drop ( eblock# ) +\ else ( eblock# hashname$ hash$ ) r> get-zdata ( eblock# hashname$ hash$ ) ?check-crc ( eblock# hashname$ hash$ )
@@ -204,7 +204,7 @@ \ data-buffer over nand-pages/block * nand-pages/block " write-blocks" $call-nand ( eblock# #written ) \ nand-pages/block <> " Write error" ?nand-abort ( eblock# ) swap-buffers ( eblock# ) - then +\ then
dup to last-eblock# ( eblock# ) show-written ( )