total blocks -- longword, not word.
This commit is contained in:
parent
f7bdc1df9b
commit
499e287ad2
10
volume.aii
10
volume.aii
|
@ -171,11 +171,18 @@ do_total_blocks proc
|
||||||
|
|
||||||
phy ; save
|
phy ; save
|
||||||
|
|
||||||
|
|
||||||
ldy #vcr.super.nzones
|
ldy #vcr.super.nzones
|
||||||
lda [my_vcr],y
|
lda [my_vcr],y
|
||||||
|
|
||||||
ply
|
ply
|
||||||
sta [param_blk_ptr],y
|
sta [param_blk_ptr],y
|
||||||
|
|
||||||
|
iny
|
||||||
|
iny
|
||||||
|
lda #0
|
||||||
|
sta [param_blk_ptr],y
|
||||||
|
|
||||||
rts
|
rts
|
||||||
|
|
||||||
endp
|
endp
|
||||||
|
@ -202,6 +209,7 @@ do_free_blocks proc
|
||||||
|
|
||||||
do_vol_name_0 proc
|
do_vol_name_0 proc
|
||||||
; store the volume name (class 0)
|
; store the volume name (class 0)
|
||||||
|
; todo -- error if name > 16 chars? see HFS.
|
||||||
|
|
||||||
with fst_parms
|
with fst_parms
|
||||||
with dp, my_dp
|
with dp, my_dp
|
||||||
|
@ -317,5 +325,7 @@ error
|
||||||
|
|
||||||
endp
|
endp
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
end
|
end
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue