[openfirmware] [commit] r2872 - cpu/x86/pc/olpc/via

[repository service]

Author: quozl
Date: Thu Feb 23 02:39:46 2012
New Revision: 2872
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2872

Log:
OLPC fs-update - rethrow exception after cleanup to allow caller to see it, and avoid changing the vocabulary for definitions

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

Modified: cpu/x86/pc/olpc/via/fsupdate.fth
==============================================================================
--- cpu/x86/pc/olpc/via/fsupdate.fth	Thu Feb 23 01:58:13 2012	(r2871)
+++ cpu/x86/pc/olpc/via/fsupdate.fth	Thu Feb 23 02:39:46 2012	(r2872)
@@ -229,15 +229,14 @@

t-hms(                              ( fd )
    also nand-commands                  ( fd )
-   ['] include-file catch  ?dup  if    ( x error )
-      nip .error
-   then                                ( )
-   previous definitions
+   ['] include-file catch              ( 0 | x error# )
+   previous

show-done
    ?all-written
    close-nand-ihs
    )t-hms
+   throw                               ( )
 ;

: fs-update  ( "devspec" -- )