[openfirmware] [commit] r3000 - cpu/arm/olpc

[repository service]

Author: quozl
Date: Wed Jun  6 12:03:10 2012
New Revision: 3000
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3000

Log:
OLPC XO-1.75 - warn on boot if TS tag is not SHIP, for boards such as spares that do not pass through final testing at factory, #11848

Modified:
   cpu/arm/olpc/banner.fth

Modified: cpu/arm/olpc/banner.fth
==============================================================================
--- cpu/arm/olpc/banner.fth	Mon Jun  4 10:53:17 2012	(r2999)
+++ cpu/arm/olpc/banner.fth	Wed Jun  6 12:03:10 2012	(r3000)
@@ -134,12 +134,21 @@
    .d  type ."  memory"                ( )
 ;
 
+: check-tags  ( -- )
+   " TS" find-tag  if  " SHIP" $=  if  exit  then
+      red-letters
+      ." WARNING!  TS tag is not SHIP"  cr
+      cancel
+   then
+;
+
 : (xbanner-basics)  ( -- )
    ?spaces  cpu-model type  ." , " .cpu-speed  ." , "   .memory-brief
    ." , " .storage
    ." , S/N "  " SN" find-tag  if  type  else  ." Unknown"  then  cr
    ?spaces  .rom  ."    " .ec  ."    " .clock
    check-internal-partitions
+   check-tags
 ;
 ' (xbanner-basics) to banner-basics