Changeset 2589


Ignore:
Timestamp:
Oct 11, 2011, 8:19:10 PM (4 years ago)
Author:
wmb
Message:

OLPC - add some guards to load-from-list.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpu/x86/pc/olpc/security.fth

    r2586 r2589  
    12311231            2drop                           ( )
    12321232            ['] secure-load-ramdisk to load-ramdisk
    1233             " init-program" $find  if
    1234 \              set-cmdline
    1235                execute
    1236                sound-end
    1237                go
     1233            " init-program" $find  if       ( xt )
     1234\              set-cmdline                  ( xt )
     1235               catch  ?dup  if              ( error )
     1236                  .error                    ( )
     1237               else                         ( )
     1238                  sound-end                 ( )
     1239                  ['] go guarded            ( )
     1240               then
    12381241            then
    12391242            show-x
Note: See TracChangeset for help on using the changeset viewer.