mirror of https://github.com/gungwald/copy.git
34 lines
623 B
ArmAsm
34 lines
623 B
ArmAsm
.export _get_file_info
|
|
|
|
|
|
|
|
MLI = $bf00
|
|
GET_FILE_INFO = $c4
|
|
|
|
|
|
|
|
.bss
|
|
|
|
_file_info_addr: .word $00
|
|
|
|
|
|
|
|
.code
|
|
|
|
; This function is defined as "fastcall" which puts the right-most
|
|
; parameter into A/X and the return value in A/X.
|
|
|
|
_get_file_info:
|
|
sta _file_info_addr
|
|
stx _file_info_addr+1
|
|
|
|
jsr MLI
|
|
.byte GET_FILE_INFO
|
|
.word _file_info_addr
|
|
|
|
; The system call leaves the error status in the Accumulator.
|
|
; The "fastcall" calling convention returns the A register,
|
|
; which is what we want.
|
|
rts
|
|
|