Changeset 2475


Ignore:
Timestamp:
Aug 22, 2011, 12:20:17 PM (4 years ago)
Author:
quozl
Message:

OLPC XO-1.5 - autorun-mfg-tests was not starting, regression introduced in svn 2447, fixed by copying code from the alex target equivalent.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpu/x86/pc/olpc/via/mfgtest.fth

    r2359 r2475  
    103103
    104104d# 15 value #mfgtests
     105d# 5 value #mfgcols
    105106
    106107: mfg-test-autorunner  ( -- )  \ Unattended autorun of all tests
    107    5 #mfgtests +  5  ?do
     108   #mfgcols #mfgtests +  #mfgcols  ?do
    108109      i set-current-sq
    109110      refresh
     
    115116
    116117: play-item     ( -- )   \ Interactive autorun of all tests
    117    5 #mfgtests +  5  ?do
     118   #mfgcols #mfgtests +  #mfgcols  ?do
    118119      i set-current-sq
    119120      refresh
     
    125126   loop
    126127   all-tests-passed
    127 ;         
     128;
     129
    128130: quit-item     ( -- )  menu-done  ;
    129131: cpu-item      ( -- )  " /cpu"       mfg-test-dev  ;
     
    200202;
    201203
    202 : full-menu  ( -- )
     204: init-menu  ( -- )
    203205   d# 4 to rows
    204    d# 5 to cols
     206   #mfgcols to cols
    205207   d# 180 to sq-size
    206208   d# 128 to image-size
    207209   d# 128 to icon-size
    208 
     210   cursor-off
     211;
     212
     213: full-menu  ( -- )
     214   init-menu
    209215   olpc-menu-items
    210216
     
    220226
    221227: autorun-mfg-tests  ( -- )
     228   init-menu
     229   ['] run-menu behavior >r
    222230   ['] mfg-test-autorunner to run-menu   \ Run menu automatically
    223231   true to diag-switch?
    224232   ['] olpc-menu-items  ['] nest-menu catch  drop
     233   r> to run-menu
    225234   false to diag-switch?
    226235   restore-scroller
Note: See TracChangeset for help on using the changeset viewer.