r1156 - dev

Author: wmb
Date: 2009-04-23 10:16:16 +0200 (Thu, 23 Apr 2009)
New Revision: 1156

Modified:
   dev/pckbd.fth
Log:
OLPC Via - Use ordinary keyboard init on the demo board instead of
the abbreviated version for the OLPC keyboard.

Modified: dev/pckbd.fth
===================================================================
--- dev/pckbd.fth	2009-04-23 08:08:51 UTC (rev 1155)
+++ dev/pckbd.fth	2009-04-23 08:16:16 UTC (rev 1156)
@@ -221,6 +221,7 @@
 ;

[ifdef] olpc
+[ifndef] demo-board
 : ?olpc-keyboard  ( -- )
     " enable-intf" $call-parent
     begin  5 timed-read 0=  while
@@ -251,6 +252,7 @@

fload ${BP}/cpu/x86/pc/olpc/keymap.fth
 [then]
+[then]

: choose-type  ( -- )
    my-args  dup  if