Mercurial > hg > Members > kono > nitros9-code

changeset 2177:342db2db851a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Removed more Close Open code. Now Copy and Verification loops indeed start at LSN1, not LSN0.
author robertgault
date Sat, 15 Nov 2008 16:27:56 +0000
parents a33c34f7f897
children ab8593f90f03
files level1/cmds/backup.asm
diffstat 1 files changed, 6 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/level1/cmds/backup.asm	Sat Nov 15 04:52:35 2008 +0000
+++ b/level1/cmds/backup.asm	Sat Nov 15 16:27:56 2008 +0000
@@ -32,7 +32,7 @@
 
 DOHELP   set   1
 * Default 0 means do not save destination disk ID. 1 means save it. RG
-SAVEID    set   0
+SAVEID    set   1
 
 tylg     set   Prgrm+Objct   
 atrv     set   ReEnt+rev
@@ -360,17 +360,13 @@
 * Verification code
          leay  >vfypass,pcr
          lbsr  L0456
-         lda   <srcpath
-         os9   I$Close        close source path
-         bcs   L03AF
          lda   <dstpath
-         os9   I$Close        close destination path
-         bcs   L03AF
-         leax  <dstdev,u
-         lda   #READ.
-         os9   I$Open         open source path in READ mode
-         bcs   L03AF
          sta   <srcpath       save newly acquired path number
+         pshs  u
+         ldx   #$0000
+         leau  1,x
+         os9   I$Seek       seek to LSN0
+         puls  u
          clr   <curlsn
          clr   <curlsn+1
          clr   <curlsn+2