the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'cc65:master' into master

Browse Source
This commit is contained in:
polluks2
2021-12-31 17:21:20 +01:00
committed by GitHub
parent 1bcf93d010 6ac4aa4e20
commit 06725c166e
1 changed files with 4 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
libsrc/cbm/cbm_open.s
View File

@@ -1,5 +1,6 @@
; ;
; Ullrich von Bassewitz, 22.06.2002 ; 2002-06-22, Ullrich von Bassewitz
; 2021-12-23, Greg King
; ;
; Original C code by Marc 'BlackJack' Rintsch, 18.03.2001 ; Original C code by Marc 'BlackJack' Rintsch, 18.03.2001
; ;
@@ -19,26 +20,17 @@
; ;
.export _cbm_open .export _cbm_open
.import popa .import popa
.import _cbm_k_setlfs, _cbm_k_setnam, _cbm_k_open .import _cbm_k_setlfs, _cbm_k_setnam, _cbm_k_open
.import __oserror .import __oserror
_cbm_open: _cbm_open:
pha jsr _cbm_k_setnam
txa
pha ; Save name
jsr popa ; Get sec_addr jsr popa ; Get sec_addr
jsr _cbm_k_setlfs ; Call SETLFS, pop all args jsr _cbm_k_setlfs ; Call SETLFS, pop all args
pla
tax
pla ; Get name
jsr _cbm_k_setnam
jsr _cbm_k_open jsr _cbm_k_open
sta __oserror sta __oserror
rts rts