[openfirmware] [commit] r2064 - cpu/arm/olpc/1.75

repository service svn at openfirmware.info
Fri Dec 3 07:55:13 CET 2010


Author: wmb
Date: Fri Dec  3 07:55:12 2010
New Revision: 2064
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2064

Log:
XO-1.75 - compile NANDblaster support into Forth dictionary (but NB object code is not yet in the build).

Modified:
   cpu/arm/olpc/1.75/devices.fth
   cpu/arm/olpc/1.75/fw.bth

Modified: cpu/arm/olpc/1.75/devices.fth
==============================================================================
--- cpu/arm/olpc/1.75/devices.fth	Fri Dec  3 07:37:40 2010	(r2063)
+++ cpu/arm/olpc/1.75/devices.fth	Fri Dec  3 07:55:12 2010	(r2064)
@@ -245,6 +245,8 @@
 
 end-package
    
+: wlan-reset  ( -- )  d# 58 gpio-clr  d# 20 ms  d# 58 gpio-set  ;
+
 \ : usb-power-on  ( -- )  1 gpio-set  ; 
 : usb-power-on  ( -- )  ;  \ The EC controls the USB power
 : reset-usb-hub  ( -- )  d# 146 gpio-set  d# 10 ms  d# 146 gpio-set  ;

Modified: cpu/arm/olpc/1.75/fw.bth
==============================================================================
--- cpu/arm/olpc/1.75/fw.bth	Fri Dec  3 07:37:40 2010	(r2063)
+++ cpu/arm/olpc/1.75/fw.bth	Fri Dec  3 07:55:12 2010	(r2064)
@@ -193,18 +193,15 @@
 ;
 ' pre-setup-for-linux to linux-pre-hook
 
-[ifdef] notyet
+: show-temperature  ( -- )  ;
+: boot-as-call(  ( -- )  ." Implement boot-as-call" cr  ;
+: )boot-as-call  ( -- )  ;
+\ fload ${BP}/cpu/x86/bootascall.fth
 create use-thinmac
-fload ${BP}/cpu/x86/bootascall.fth
 fload ${BP}/cpu/x86/pc/olpc/wifichannel.fth
 fload ${BP}/cpu/x86/pc/olpc/via/nbtx.fth
 fload ${BP}/cpu/x86/pc/olpc/via/nbrx.fth
 fload ${BP}/cpu/x86/pc/olpc/via/blockfifo.fth
-[else]
-0 value nb-zd-#sectors
-: nandblaster  true abort" No nandblaster yet"  ;
-: show-temperature  ;
-[then]
 
 : hdd-led-off     ( -- )  d# 10 gpio-clr  ;
 : hdd-led-on      ( -- )  d# 10 gpio-set  ;



More information about the openfirmware mailing list