Changeset 2868

Timestamp:

Feb 20, 2012 7:51:21 AM (15 months ago)

Author:

quozl

Message:

OLPC fs-update - split for use by factory scripts

File:

• cpu/x86/pc/olpc/via/fsupdate.fth (modified) (2 diffs)

cpu/x86/pc/olpc/via/fsupdate.fth

@@ -217 +217 @@
 previous definitions
 
-: fs-update  ( "devspec" -- )
+: $fs-update  ( file$ -- )
    load-crypto  abort" Can't load hash routines"
 
-   open-nand                           ( )
-
-   false to secure-fsupdate?           ( )
-   safe-parse-word r/o open-file       ( fd error? )
+   open-nand                           ( file$ )
+
+   false to secure-fsupdate?           ( file$ )
+   r/o open-file                       ( fd error? )
    " Can't open file" ?nand-abort      ( fd )
 
@@ -239 +239 @@
    close-nand-ihs
    )t-hms
+;
+
+: fs-update  ( "devspec" -- )
+   safe-parse-word $fs-update
 ;