[OpenBIOS] r419 - cpu/x86/pc/olpc

[svn at openbios.org]

Author: wmb
Date: 2007-05-24 04:19:40 +0200 (Thu, 24 May 2007)
New Revision: 419

Modified:
   cpu/x86/pc/olpc/fw.bth
Log:
Freeze the screen upon entry to the kernel for the fast-boot case - OLPC Trac #1328 .



Modified: cpu/x86/pc/olpc/fw.bth
===================================================================
--- cpu/x86/pc/olpc/fw.bth	2007-05-24 02:16:29 UTC (rev 418)
+++ cpu/x86/pc/olpc/fw.bth	2007-05-24 02:19:40 UTC (rev 419)
@@ -516,6 +516,13 @@
    " keyboard" open-dev  ?dup  if  set-stdin  then
 ;
 
+: go-hook-freeze
+   [ ' go-hook behavior compile, ]
+   0 " set-source" $call-screen
+;
+: freeze    ( -- )  ['] go-hook-freeze to go-hook  ;
+: unfreeze  ( -- )  ['] usb-quiet      to go-hook  ;
+
 : startup  ( -- )
    standalone?  0=  if  exit  then
 
@@ -531,6 +538,7 @@
 [ifndef] lx-devel
       enable-power-button
 [then]
+      freeze
       auto-boot
       screen-ih stdout !
       open-keyboard