Author: wmb Date: Wed Jul 6 21:16:03 2011 New Revision: 2336 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2336
Log: OLPC XO-1.75 - fixed broken first try at OLS LED selftest.
Modified: cpu/arm/olpc/1.75/leds.fth
Modified: cpu/arm/olpc/1.75/leds.fth ============================================================================== --- cpu/arm/olpc/1.75/leds.fth Wed Jul 6 08:33:31 2011 (r2335) +++ cpu/arm/olpc/1.75/leds.fth Wed Jul 6 21:16:03 2011 (r2336) @@ -8,13 +8,18 @@ : close ( -- ) ; : hdd-led-on ( -- ) d# 10 gpio-set ; : hdd-led-off ( -- ) d# 10 gpio-clr ; -: ols-led-on ( -- ) d# 57 ec-cmd ; -: ols-led-off ( -- ) d# 58 ec-cmd ; +: ols-led-on ( -- ) h# 57 ec-cmd ; +: ols-led-off ( -- ) h# 58 ec-cmd ; +: ols-assy-mode-on ( -- ) h# 59 ec-cmd ; +: ols-assy-mode-off ( -- ) h# 5a ec-cmd ; +: ols-led-ec-control ( -- ) h# 5b ec-cmd ; + : selftest ( -- ) ." Flashing LEDs" cr " /wlan" test-dev " /wlan" test-dev \ Twice for longer flashing d# 20 0 do hdd-led-on d# 100 ms hdd-led-off d# 100 ms loop d# 20 0 do ols-led-on d# 100 ms ols-led-off d# 100 ms loop + ols-led-ec-control confirm-selftest? ;