[openfirmware] [commit] r1753 - ofw/fs/ext2fs

repository service svn at openfirmware.info
Thu Feb 18 06:14:23 CET 2010


Author: wmb
Date: Thu Feb 18 06:14:22 2010
New Revision: 1753
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/1753

Log:
OLPC trac 10028 - OFW reprompts on glob copy.

Modified:
   ofw/fs/ext2fs/blocks.fth
   ofw/fs/ext2fs/dir.fth
   ofw/fs/ext2fs/methods.fth

Modified: ofw/fs/ext2fs/blocks.fth
==============================================================================
--- ofw/fs/ext2fs/blocks.fth	Tue Feb 16 23:17:57 2010	(r1752)
+++ ofw/fs/ext2fs/blocks.fth	Thu Feb 18 06:14:22 2010	(r1753)
@@ -17,7 +17,7 @@
    \ /n field >device
    0 field >data
 constant /buf-hdr
-0 value /buffer
+0 instance value /buffer
 
 : >bufadr   ( n -- a )   /buffer * block-bufs +  ;
 : >buffer   ( n -- adr )      >bufadr >data  ;

Modified: ofw/fs/ext2fs/dir.fth
==============================================================================
--- ofw/fs/ext2fs/dir.fth	Tue Feb 16 23:17:57 2010	(r1752)
+++ ofw/fs/ext2fs/dir.fth	Thu Feb 18 06:14:22 2010	(r1753)
@@ -7,8 +7,8 @@
 0 instance value dir-block#
 0 instance value lblk#
 
-variable diroff
-variable totoff
+instance variable diroff
+instance variable totoff
 
 \ Information that we need about the working file/directory
 \ The working file changes at each level of a path search

Modified: ofw/fs/ext2fs/methods.fth
==============================================================================
--- ofw/fs/ext2fs/methods.fth	Tue Feb 16 23:17:57 2010	(r1752)
+++ ofw/fs/ext2fs/methods.fth	Thu Feb 18 06:14:22 2010	(r1753)
@@ -28,7 +28,7 @@
    diroff off
 ;
 
-0 value renaming?
+0 instance value renaming?
 : $delete   ( name$ -- error? )
    $find-file  if  true exit  then		( )
 



More information about the openfirmware mailing list