changeset 10003:f07f995d4507

6856026 bootblk hsfs reader doesn't update file offset on partial reads
author John Johnson <John.Johnson@Sun.COM>
date Tue, 30 Jun 2009 11:47:15 -0700
parents 2a588c9bb482
children 474324f166a9
files usr/src/psm/stand/bootblks/hsfs/common/hsfs.fth
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/usr/src/psm/stand/bootblks/hsfs/common/hsfs.fth	Tue Jun 30 09:46:41 2009 -0600
+++ b/usr/src/psm/stand/bootblks/hsfs/common/hsfs.fth	Tue Jun 30 11:47:15 2009 -0700
@@ -534,6 +534,7 @@
       tuck                                   ( len adr len )
       file-block0@ /block * file-offset@ +   ( len adr len off )
       dev-ih read-disk                       ( #read )
+      dup file-offset@ +  file-offset!
    ;
 
    : seek-file  ( off fd -- error? )