r1130 - cpu/x86/pc/olpc

Author: wmb
Date: 2009-04-01 16:10:48 +0200 (Wed, 01 Apr 2009)
New Revision: 1130

Modified:
   cpu/x86/pc/olpc/fw.bth
Log:
Q2E38 redux - Missing TS tag treated as manufacturing mode too.

Modified: cpu/x86/pc/olpc/fw.bth
===================================================================
--- cpu/x86/pc/olpc/fw.bth	2009-04-01 13:22:54 UTC (rev 1129)
+++ cpu/x86/pc/olpc/fw.bth	2009-04-01 14:10:48 UTC (rev 1130)
@@ -518,12 +518,16 @@
 : ?factory-boot-sequence  ( -- flag )
    \ TS is the "test station" tag.  Its value is set to "DL" at the
    \ end of manufacturing test.
-   " TS" find-tag  if  ( adr len )
-      ?-null  " DL" $=  0=  if
-         " disk:\boot\olpc.fth nand:\boot\olpc.fth /xp sd:\boot\olpc.fth /prober /usb/ethernet /usb/wlan"
-         to boot-device
-      then
-   then
+   " TS" find-tag  if       ( adr len )
+      ?-null  " DL" $=  0=  ( in-factory? )
+   else                     ( )
+      \ Missing TS tag is treated as in factory
+      true                  ( in-factory? )
+   then                     ( in-factory? )
+   if                       ( )
+      " disk:\boot\olpc.fth nand:\boot\olpc.fth /xp sd:\boot\olpc.fth /prober /usb/ethernet /usb/wlan"
+      to boot-device
+   then                     ( )
 ;