Apple-2gs-SW/minix.fst
1
0
Fork 0
mirror of https://github.com/ksherlock/minix.fst.git synced 2024-06-07 04:29:31 +00:00
Code Issues Projects Releases Wiki Activity

loop backwards to save an instruction or two...

Browse Source
This commit is contained in:
Kelvin Sherlock 2015-08-12 11:25:40 -04:00
parent 735ef4ee16
commit af15da065a
1 changed files with 12 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
get_file_info.aii
View File

@ -88,17 +88,16 @@ ok
sta ptr+2 sta ptr+2
; copy to dp ; copy to dp
ldy #0 ldy #v1_inode.sizeof-2
ldx #0 ldx #v1_inode.sizeof-2
@loop @loop
lda [ptr],y lda [ptr],y
sta disk_inode,x sta disk_inode,x
inx dey
inx dey
iny dex
iny dex
cpy #v1_inode.sizeof bpl @loop
blt @loop
;pha ; space ;pha ; space
@ -109,7 +108,6 @@ ok
lda <call_class lda <call_class
beq class0 beq class0
class1 class1
lda [param_blk_ptr] ; pcount lda [param_blk_ptr] ; pcount
dec a dec a
@ -122,7 +120,7 @@ class1
rtl rtl
class0 class0
ldx #(8-1)*4 ldx #file_info_dcb_0_size-4
dispatch file_info_dcb_0 dispatch file_info_dcb_0
lda tool_error lda tool_error
cmp #0 cmp #0
@ -146,6 +144,7 @@ file_info_dcb_0
dc.w $0e, do_create_date_time_0 dc.w $0e, do_create_date_time_0
dc.w $12, do_mod_date_time_0 dc.w $12, do_mod_date_time_0
dc.w $16, do_blocks dc.w $16, do_blocks
file_info_dcb_0_size equ *-file_info_dcb_0
file_info_dcb_1 file_info_dcb_1
;dc.w $00, do_ignore ; pCount ;dc.w $00, do_ignore ; pCount
@ -251,6 +250,9 @@ do_blocks proc
with dp,fst_parms with dp,fst_parms
with v1 with v1
; not sure if minix supports sparse blocks. could just estimate
; based on file size.
phx ; save phx ; save
phy ; save phy ; save