selftest.cfg 463 B

123456789101112131415161718
  1. # SPDX-License-Identifier: GPL-2.0-or-later
  2. add_help_text selftest "run selftest using working ram <tmpfile> <address> <size>"
  3. proc selftest {tmpfile address size} {
  4. for {set i 0} {$i < $size } {set i [expr {$i+4}]} {
  5. mww [expr {$address+$i}] $i
  6. }
  7. for {set i 0} {$i < 10 } {set i [expr {$i+1}]} {
  8. echo "Test iteration $i"
  9. dump_image $tmpfile $address $size
  10. verify_image $tmpfile $address bin
  11. load_image $tmpfile $address bin
  12. }
  13. }