mirror of
https://github.com/cc65/cc65.git
synced 2024-06-02 19:42:23 +00:00
Removed .import for std kernal entries. Added .include "cbm.inc"
This commit is contained in:
parent
032a3877e0
commit
f7636fe8f2
|
@ -4,8 +4,8 @@
|
||||||
; unsigned char cbm_k_acptr (void);
|
; unsigned char cbm_k_acptr (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_acptr
|
.export _cbm_k_acptr
|
||||||
.import ACPTR
|
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_acptr:
|
_cbm_k_acptr:
|
||||||
|
|
|
@ -4,8 +4,8 @@
|
||||||
; unsigned char cbm_k_basin (void);
|
; unsigned char cbm_k_basin (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_basin
|
.export _cbm_k_basin
|
||||||
.import BASIN
|
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_basin:
|
_cbm_k_basin:
|
||||||
|
|
|
@ -4,7 +4,7 @@
|
||||||
; void __fastcall__ cbm_k_bsout (unsigned char C);
|
; void __fastcall__ cbm_k_bsout (unsigned char C);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_bsout
|
.export _cbm_k_bsout
|
||||||
.import BSOUT
|
|
||||||
|
|
||||||
_cbm_k_bsout = BSOUT
|
_cbm_k_bsout = BSOUT
|
||||||
|
|
|
@ -4,8 +4,9 @@
|
||||||
; unsigned char __fastcall__ cbm_k_chkin (unsigned char FN);
|
; unsigned char __fastcall__ cbm_k_chkin (unsigned char FN);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_chkin
|
.export _cbm_k_chkin
|
||||||
.import CHKIN
|
|
||||||
|
|
||||||
_cbm_k_chkin:
|
_cbm_k_chkin:
|
||||||
tax
|
tax
|
||||||
|
|
|
@ -4,7 +4,6 @@
|
||||||
; void __fastcall__ cbm_k_ciout (unsigned char C);
|
; void __fastcall__ cbm_k_ciout (unsigned char C);
|
||||||
;
|
;
|
||||||
|
|
||||||
.import CIOUT
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_ciout := CIOUT
|
.export _cbm_k_ciout := CIOUT
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -4,8 +4,8 @@
|
||||||
; unsigned char __fastcall__ cbm_k_ckout (unsigned char FN);
|
; unsigned char __fastcall__ cbm_k_ckout (unsigned char FN);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_ckout
|
.export _cbm_k_ckout
|
||||||
.import CKOUT
|
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_ckout:
|
_cbm_k_ckout:
|
||||||
|
|
|
@ -4,5 +4,5 @@
|
||||||
; void cbm_k_clall (void);
|
; void cbm_k_clall (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
.import CLALL
|
.include "cbm.inc"
|
||||||
.export _cbm_k_clall := CLALL
|
.export _cbm_k_clall := CLALL
|
||||||
|
|
|
@ -4,11 +4,9 @@
|
||||||
; void __fastcall__ cbm_k_close (unsigned char FN);
|
; void __fastcall__ cbm_k_close (unsigned char FN);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_close
|
.export _cbm_k_close
|
||||||
.import CLOSE
|
|
||||||
|
|
||||||
_cbm_k_close:
|
_cbm_k_close:
|
||||||
clc
|
clc
|
||||||
jmp CLOSE
|
jmp CLOSE
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -4,7 +4,7 @@
|
||||||
; void cbm_k_clrch (void);
|
; void cbm_k_clrch (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_clrch
|
.export _cbm_k_clrch
|
||||||
.import CLRCH
|
|
||||||
|
|
||||||
_cbm_k_clrch = CLRCH
|
_cbm_k_clrch = CLRCH
|
||||||
|
|
|
@ -4,8 +4,8 @@
|
||||||
; unsigned char cbm_k_getin (void);
|
; unsigned char cbm_k_getin (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_getin
|
.export _cbm_k_getin
|
||||||
.import GETIN
|
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_getin:
|
_cbm_k_getin:
|
||||||
|
|
|
@ -4,10 +4,10 @@
|
||||||
; unsigned cbm_k_iobase (void);
|
; unsigned cbm_k_iobase (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_iobase
|
.export _cbm_k_iobase
|
||||||
.import IOBASE
|
|
||||||
|
|
||||||
_cbm_k_iobase:
|
_cbm_k_iobase:
|
||||||
jsr IOBASE
|
jsr IOBASE
|
||||||
txa
|
txa
|
||||||
pha
|
pha
|
||||||
|
|
|
@ -4,10 +4,5 @@
|
||||||
; void __fastcall__ cbm_k_listen (unsigned char dev);
|
; void __fastcall__ cbm_k_listen (unsigned char dev);
|
||||||
;
|
;
|
||||||
|
|
||||||
.import LISTEN
|
.include "cbm.inc"
|
||||||
.export _cbm_k_listen := LISTEN
|
.export _cbm_k_listen := LISTEN
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -4,8 +4,8 @@
|
||||||
; unsigned int __fastcall__ cbm_k_load (unsigned char flag, unsigned addr);
|
; unsigned int __fastcall__ cbm_k_load (unsigned char flag, unsigned addr);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_load
|
.export _cbm_k_load
|
||||||
.import LOAD
|
|
||||||
.import __oserror
|
.import __oserror
|
||||||
.import popa
|
.import popa
|
||||||
.importzp ptr1
|
.importzp ptr1
|
||||||
|
@ -27,4 +27,3 @@ _cbm_k_load:
|
||||||
tax
|
tax
|
||||||
pla
|
pla
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
|
|
@ -4,8 +4,8 @@
|
||||||
; unsigned char cbm_k_open (void);
|
; unsigned char cbm_k_open (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_open
|
.export _cbm_k_open
|
||||||
.import OPEN
|
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_open:
|
_cbm_k_open:
|
||||||
|
|
|
@ -4,8 +4,8 @@
|
||||||
; unsigned char cbm_k_readst (void);
|
; unsigned char cbm_k_readst (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_readst
|
.export _cbm_k_readst
|
||||||
.import READST
|
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_readst:
|
_cbm_k_readst:
|
||||||
|
|
|
@ -4,8 +4,8 @@
|
||||||
; unsigned char __fastcall__ cbm_k_save(unsigned int start, unsigned int end);
|
; unsigned char __fastcall__ cbm_k_save(unsigned int start, unsigned int end);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_save
|
.export _cbm_k_save
|
||||||
.import SAVE
|
|
||||||
.import popptr1
|
.import popptr1
|
||||||
.importzp ptr1, tmp1
|
.importzp ptr1, tmp1
|
||||||
|
|
||||||
|
|
|
@ -4,5 +4,5 @@
|
||||||
; void cbm_k_scnkey (void);
|
; void cbm_k_scnkey (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
.import SCNKEY
|
.include "cbm.inc"
|
||||||
.export _cbm_k_scnkey := SCNKEY
|
.export _cbm_k_scnkey := SCNKEY
|
||||||
|
|
|
@ -4,9 +4,7 @@
|
||||||
; void __fastcall__ cbm_k_second (unsigned char addr)
|
; void __fastcall__ cbm_k_second (unsigned char addr)
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.import SECOND
|
.export _cbm_k_second
|
||||||
.export _cbm_k_second
|
|
||||||
|
|
||||||
_cbm_k_second = SECOND
|
_cbm_k_second = SECOND
|
||||||
|
|
||||||
|
|
|
@ -6,11 +6,11 @@
|
||||||
; unsigned char SA);
|
; unsigned char SA);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_setlfs
|
.export _cbm_k_setlfs
|
||||||
.import SETLFS
|
|
||||||
.import popa
|
.import popa
|
||||||
.importzp tmp1
|
.importzp tmp1
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_setlfs:
|
_cbm_k_setlfs:
|
||||||
sta tmp1 ; Save SA
|
sta tmp1 ; Save SA
|
||||||
|
@ -19,5 +19,3 @@ _cbm_k_setlfs:
|
||||||
jsr popa ; Get LFN
|
jsr popa ; Get LFN
|
||||||
ldy tmp1 ; Get SA
|
ldy tmp1 ; Get SA
|
||||||
jmp SETLFS
|
jmp SETLFS
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -4,10 +4,10 @@
|
||||||
; void __fastcall__ cbm_k_setnam (const char* Name);
|
; void __fastcall__ cbm_k_setnam (const char* Name);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_setnam
|
.export _cbm_k_setnam
|
||||||
.import SETNAM
|
|
||||||
.importzp ptr1
|
.importzp ptr1
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_setnam:
|
_cbm_k_setnam:
|
||||||
sta ptr1 ; Store pointer to file name
|
sta ptr1 ; Store pointer to file name
|
||||||
|
@ -21,4 +21,3 @@ _cbm_k_setnam:
|
||||||
ldx ptr1
|
ldx ptr1
|
||||||
ldy ptr1+1
|
ldy ptr1+1
|
||||||
jmp SETNAM
|
jmp SETNAM
|
||||||
|
|
||||||
|
|
|
@ -4,12 +4,5 @@
|
||||||
; void __fastcall__ cbm_k_talk (unsigned char dev);
|
; void __fastcall__ cbm_k_talk (unsigned char dev);
|
||||||
;
|
;
|
||||||
|
|
||||||
.import TALK
|
.include "cbm.inc"
|
||||||
.export _cbm_k_talk := TALK
|
.export _cbm_k_talk := TALK
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -4,9 +4,7 @@
|
||||||
; void __fastcall__ cbm_k_tksa (unsigned char addr)
|
; void __fastcall__ cbm_k_tksa (unsigned char addr)
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.import TKSA
|
.export _cbm_k_tksa
|
||||||
.export _cbm_k_tksa
|
|
||||||
|
|
||||||
_cbm_k_tksa = TKSA
|
_cbm_k_tksa = TKSA
|
||||||
|
|
||||||
|
|
|
@ -4,5 +4,5 @@
|
||||||
; void cbm_k_udtim (void);
|
; void cbm_k_udtim (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
.import UDTIM
|
.include "cbm.inc"
|
||||||
.export _cbm_k_udtim := UDTIM
|
.export _cbm_k_udtim := UDTIM
|
||||||
|
|
|
@ -4,5 +4,5 @@
|
||||||
; void cbm_k_unlsn (void);
|
; void cbm_k_unlsn (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
.import UNLSN
|
.include "cbm.inc"
|
||||||
.export _cbm_k_unlsn := UNLSN
|
.export _cbm_k_unlsn := UNLSN
|
||||||
|
|
|
@ -4,8 +4,7 @@
|
||||||
; void cbm_k_untlk (void);
|
; void cbm_k_untlk (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _cbm_k_untlk
|
.export _cbm_k_untlk
|
||||||
.import UNTLK
|
|
||||||
|
|
||||||
|
|
||||||
_cbm_k_untlk = UNTLK
|
_cbm_k_untlk = UNTLK
|
||||||
|
|
|
@ -39,7 +39,6 @@
|
||||||
.include "cbm.inc"
|
.include "cbm.inc"
|
||||||
|
|
||||||
.export _cbm_read
|
.export _cbm_read
|
||||||
.import CHKIN, READST, BASIN, CLRCH
|
|
||||||
.importzp ptr1, ptr2, ptr3, tmp1
|
.importzp ptr1, ptr2, ptr3, tmp1
|
||||||
.import popax, popa
|
.import popax, popa
|
||||||
.import __oserror
|
.import __oserror
|
||||||
|
|
|
@ -31,11 +31,10 @@
|
||||||
.include "cbm.inc"
|
.include "cbm.inc"
|
||||||
|
|
||||||
.export _cbm_write
|
.export _cbm_write
|
||||||
.import CKOUT, READST, BSOUT, CLRCH
|
|
||||||
.importzp ptr1, ptr2, ptr3
|
.importzp ptr1, ptr2, ptr3
|
||||||
.import popax, popa
|
.import popax, popa
|
||||||
.import __oserror
|
.import __oserror
|
||||||
|
|
||||||
|
|
||||||
_cbm_write:
|
_cbm_write:
|
||||||
sta ptr3
|
sta ptr3
|
||||||
|
|
|
@ -4,12 +4,11 @@
|
||||||
; clock_t clock (void);
|
; clock_t clock (void);
|
||||||
;
|
;
|
||||||
|
|
||||||
|
.include "cbm.inc"
|
||||||
.export _clock
|
.export _clock
|
||||||
.import RDTIM
|
|
||||||
.importzp sreg
|
.importzp sreg
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
.proc _clock
|
.proc _clock
|
||||||
|
|
||||||
lda #0 ; Byte 3 is always zero
|
lda #0 ; Byte 3 is always zero
|
||||||
|
@ -19,4 +18,3 @@
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.endproc
|
.endproc
|
||||||
|
|
||||||
|
|
|
@ -6,7 +6,6 @@
|
||||||
|
|
||||||
.export _close
|
.export _close
|
||||||
|
|
||||||
.import CLOSE
|
|
||||||
.import readdiskerror, closecmdchannel
|
.import readdiskerror, closecmdchannel
|
||||||
.importzp tmp2
|
.importzp tmp2
|
||||||
|
|
||||||
|
@ -17,7 +16,7 @@
|
||||||
|
|
||||||
;--------------------------------------------------------------------------
|
;--------------------------------------------------------------------------
|
||||||
; _close
|
; _close
|
||||||
|
|
||||||
.proc _close
|
.proc _close
|
||||||
|
|
||||||
; Check if we have a valid handle
|
; Check if we have a valid handle
|
||||||
|
@ -64,7 +63,3 @@ invalidfd:
|
||||||
jmp __directerrno ; Set _errno, clear _oserror, return -1
|
jmp __directerrno ; Set _errno, clear _oserror, return -1
|
||||||
|
|
||||||
.endproc
|
.endproc
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -11,8 +11,6 @@
|
||||||
.export writediskcmd
|
.export writediskcmd
|
||||||
.export writefndiskcmd
|
.export writefndiskcmd
|
||||||
|
|
||||||
.import SETLFS, SETNAM, OPEN, CLOSE, BSOUT, BASIN
|
|
||||||
.import CHKIN, CKOUT, CLRCH
|
|
||||||
.import fncmd, fnlen, fnunit
|
.import fncmd, fnlen, fnunit
|
||||||
.importzp tmp1, ptr1
|
.importzp tmp1, ptr1
|
||||||
|
|
||||||
|
|
|
@ -8,11 +8,11 @@
|
||||||
.export fnadd, fnaddmode, fncomplete, fndefunit
|
.export fnadd, fnaddmode, fncomplete, fndefunit
|
||||||
.export fnunit, fnlen, fnisfile, fncmd, fnbuf
|
.export fnunit, fnlen, fnisfile, fncmd, fnbuf
|
||||||
|
|
||||||
.import SETNAM
|
|
||||||
.import curunit, __filetype
|
.import curunit, __filetype
|
||||||
.importzp ptr1, tmp1
|
.importzp ptr1, tmp1
|
||||||
|
|
||||||
.include "ctype.inc"
|
.include "ctype.inc"
|
||||||
|
.include "cbm.inc"
|
||||||
|
|
||||||
|
|
||||||
;------------------------------------------------------------------------------
|
;------------------------------------------------------------------------------
|
||||||
|
|
|
@ -7,7 +7,6 @@
|
||||||
.export _open
|
.export _open
|
||||||
.destructor closeallfiles, 5
|
.destructor closeallfiles, 5
|
||||||
|
|
||||||
.import SETLFS, OPEN, CLOSE
|
|
||||||
.import addysp, popax
|
.import addysp, popax
|
||||||
.import scratch, fnparse, fnaddmode, fncomplete, fnset
|
.import scratch, fnparse, fnaddmode, fncomplete, fnset
|
||||||
.import opencmdchannel, closecmdchannel, readdiskerror
|
.import opencmdchannel, closecmdchannel, readdiskerror
|
||||||
|
@ -18,6 +17,7 @@
|
||||||
.include "errno.inc"
|
.include "errno.inc"
|
||||||
.include "fcntl.inc"
|
.include "fcntl.inc"
|
||||||
.include "filedes.inc"
|
.include "filedes.inc"
|
||||||
|
.include "cbm.inc"
|
||||||
|
|
||||||
|
|
||||||
;--------------------------------------------------------------------------
|
;--------------------------------------------------------------------------
|
||||||
|
|
|
@ -8,7 +8,6 @@
|
||||||
.export _read
|
.export _read
|
||||||
.constructor initstdin
|
.constructor initstdin
|
||||||
|
|
||||||
.import SETLFS, OPEN, CHKIN, BASIN, CLRCH, BSOUT, READST
|
|
||||||
.import rwcommon
|
.import rwcommon
|
||||||
.import popax
|
.import popax
|
||||||
.importzp ptr1, ptr2, ptr3, tmp1, tmp2, tmp3
|
.importzp ptr1, ptr2, ptr3, tmp1, tmp2, tmp3
|
||||||
|
|
|
@ -7,7 +7,6 @@
|
||||||
.export _write
|
.export _write
|
||||||
.constructor initstdout
|
.constructor initstdout
|
||||||
|
|
||||||
.import SETLFS, OPEN, CKOUT, BSOUT, READST, CLRCH
|
|
||||||
.import rwcommon
|
.import rwcommon
|
||||||
.importzp sp, ptr1, ptr2, ptr3
|
.importzp sp, ptr1, ptr2, ptr3
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user