mirror of
https://github.com/cc65/cc65.git
synced 2024-12-23 04:30:10 +00:00
Added library reference ser_libref to SER interface.
This commit is contained in:
parent
744abda24f
commit
ae409e4978
@ -39,16 +39,17 @@
|
||||
.struct SER_HDR
|
||||
ID .byte 3 ; Contains 0x73, 0x65, 0x72 ("ser")
|
||||
VERSION .byte 1 ; Interface version
|
||||
LIBREF .addr ; Library reference
|
||||
JUMPTAB .struct
|
||||
INSTALL .word ; INSTALL routine
|
||||
UNINSTALL .word ; UNINSTALL routine
|
||||
OPEN .word ; OPEN routine
|
||||
CLOSE .word ; CLOSE routine
|
||||
GET .word ; GET routine
|
||||
PUT .word ; PUT routine
|
||||
STATUS .word ; STATUS routine
|
||||
IOCTL .word ; IOCTL routine
|
||||
IRQ .word ; IRQ routine
|
||||
INSTALL .addr ; INSTALL routine
|
||||
UNINSTALL .addr ; UNINSTALL routine
|
||||
OPEN .addr ; OPEN routine
|
||||
CLOSE .addr ; CLOSE routine
|
||||
GET .addr ; GET routine
|
||||
PUT .addr ; PUT routine
|
||||
STATUS .addr ; STATUS routine
|
||||
IOCTL .addr ; IOCTL routine
|
||||
IRQ .addr ; IRQ routine
|
||||
.endstruct
|
||||
.endstruct
|
||||
|
||||
@ -56,7 +57,7 @@
|
||||
;------------------------------------------------------------------------------
|
||||
; The SER API version, stored SER_HDR::VERSION
|
||||
|
||||
SER_API_VERSION = $00
|
||||
SER_API_VERSION = $01
|
||||
|
||||
;------------------------------------------------------------------------------
|
||||
; ser_params
|
||||
|
@ -2,9 +2,10 @@
|
||||
; Oliver Schmidt, 2013-05-31
|
||||
;
|
||||
|
||||
.export em_libref, joy_libref, mouse_libref
|
||||
.export em_libref, joy_libref, mouse_libref, ser_libref
|
||||
.import _exit
|
||||
|
||||
em_libref := _exit
|
||||
joy_libref := _exit
|
||||
mouse_libref := _exit
|
||||
ser_libref := _exit
|
||||
|
@ -34,7 +34,10 @@
|
||||
.byte $73, $65, $72 ; "ser"
|
||||
.byte SER_API_VERSION ; Serial API version number
|
||||
|
||||
; Jump table.
|
||||
; Library reference
|
||||
.addr $0000
|
||||
|
||||
; Jump table
|
||||
.addr INSTALL
|
||||
.addr UNINSTALL
|
||||
.addr OPEN
|
||||
|
@ -2,7 +2,8 @@
|
||||
; Oliver Schmidt, 2013-05-31
|
||||
;
|
||||
|
||||
.export joy_libref
|
||||
.export joy_libref, ser_libref
|
||||
.import _exit
|
||||
|
||||
joy_libref := _exit
|
||||
ser_libref := _exit
|
||||
|
@ -35,7 +35,10 @@
|
||||
.byte $73, $65, $72 ; "ser"
|
||||
.byte SER_API_VERSION ; Serial API version number
|
||||
|
||||
; Jump table.
|
||||
; Library reference
|
||||
.addr $0000
|
||||
|
||||
; Jump table
|
||||
.addr INSTALL
|
||||
.addr UNINSTALL
|
||||
.addr OPEN
|
||||
|
@ -2,9 +2,10 @@
|
||||
; Oliver Schmidt, 2013-05-31
|
||||
;
|
||||
|
||||
.export em_libref, joy_libref, mouse_libref
|
||||
.export em_libref, joy_libref, mouse_libref, ser_libref
|
||||
.import _exit
|
||||
|
||||
em_libref := _exit
|
||||
joy_libref := _exit
|
||||
mouse_libref := _exit
|
||||
ser_libref := _exit
|
||||
|
@ -37,7 +37,11 @@
|
||||
.byte $73, $65, $72 ; "ser"
|
||||
.byte SER_API_VERSION ; Serial API version number
|
||||
|
||||
; Jump table.
|
||||
; Library reference
|
||||
|
||||
.addr $0000
|
||||
|
||||
; Jump table
|
||||
|
||||
.word INSTALL
|
||||
.word UNINSTALL
|
||||
|
@ -2,9 +2,10 @@
|
||||
; Oliver Schmidt, 2013-05-31
|
||||
;
|
||||
|
||||
.export em_libref, joy_libref, mouse_libref
|
||||
.export em_libref, joy_libref, mouse_libref, ser_libref
|
||||
.import _exit
|
||||
|
||||
em_libref := _exit
|
||||
joy_libref := _exit
|
||||
mouse_libref := _exit
|
||||
ser_libref := _exit
|
||||
|
@ -37,7 +37,11 @@
|
||||
.byte $73, $65, $72 ; "ser"
|
||||
.byte SER_API_VERSION ; Serial API version number
|
||||
|
||||
; Jump table.
|
||||
; Library reference
|
||||
|
||||
.addr $0000
|
||||
|
||||
; Jump table
|
||||
|
||||
.word INSTALL
|
||||
.word UNINSTALL
|
||||
|
@ -2,8 +2,9 @@
|
||||
; Oliver Schmidt, 2013-05-31
|
||||
;
|
||||
|
||||
.export em_libref, joy_libref
|
||||
.export em_libref, joy_libref, ser_libref
|
||||
.import _exit
|
||||
|
||||
em_libref := _exit
|
||||
joy_libref := _exit
|
||||
ser_libref := _exit
|
||||
|
@ -38,7 +38,11 @@
|
||||
.byte $73, $65, $72 ; "ser"
|
||||
.byte SER_API_VERSION ; Serial API version number
|
||||
|
||||
; Jump table.
|
||||
; Library reference
|
||||
|
||||
.addr $0000
|
||||
|
||||
; Jump table
|
||||
|
||||
.word INSTALL
|
||||
.word UNINSTALL
|
||||
|
@ -2,7 +2,8 @@
|
||||
; Oliver Schmidt, 2013-05-31
|
||||
;
|
||||
|
||||
.export em_libref
|
||||
.export em_libref, ser_libref
|
||||
.import _exit
|
||||
|
||||
em_libref := _exit
|
||||
ser_libref := _exit
|
||||
|
@ -38,7 +38,11 @@
|
||||
.byte $73, $65, $72 ; "ser"
|
||||
.byte SER_API_VERSION ; Serial API version number
|
||||
|
||||
; Jump table.
|
||||
; Library reference
|
||||
|
||||
.addr $0000
|
||||
|
||||
; Jump table
|
||||
|
||||
.word INSTALL
|
||||
.word UNINSTALL
|
||||
|
@ -2,7 +2,8 @@
|
||||
; Oliver Schmidt, 2013-05-31
|
||||
;
|
||||
|
||||
.export joy_libref
|
||||
.export joy_libref, ser_libref
|
||||
.import _exit
|
||||
|
||||
joy_libref := _exit
|
||||
ser_libref := _exit
|
||||
|
@ -18,7 +18,10 @@
|
||||
.byte $73, $65, $72 ; "ser"
|
||||
.byte SER_API_VERSION ; Serial API version number
|
||||
|
||||
; Jump table.
|
||||
; Library reference
|
||||
.addr $0000
|
||||
|
||||
; Jump table
|
||||
.addr INSTALL
|
||||
.addr UNINSTALL
|
||||
.addr OPEN
|
||||
|
@ -2,7 +2,8 @@
|
||||
; Oliver Schmidt, 2013-05-31
|
||||
;
|
||||
|
||||
.export joy_libref
|
||||
.export joy_libref, ser_libref
|
||||
.import _exit
|
||||
|
||||
joy_libref := _exit
|
||||
ser_libref := _exit
|
||||
|
@ -37,7 +37,11 @@
|
||||
.byte $73, $65, $72 ; "ser"
|
||||
.byte SER_API_VERSION ; Serial API version number
|
||||
|
||||
; Jump table.
|
||||
; Library reference
|
||||
|
||||
.addr $0000
|
||||
|
||||
; Jump table
|
||||
|
||||
.word INSTALL
|
||||
.word UNINSTALL
|
||||
|
@ -4,7 +4,7 @@
|
||||
; Common functions of the serial drivers
|
||||
;
|
||||
|
||||
.import return0
|
||||
.import return0, ser_libref
|
||||
.importzp ptr1
|
||||
.interruptor ser_irq, 29 ; Export as high priority IRQ handler
|
||||
|
||||
@ -58,6 +58,15 @@ _ser_install:
|
||||
dey
|
||||
bpl @L0
|
||||
|
||||
; Set the library reference
|
||||
|
||||
ldy #SER_HDR::LIBREF
|
||||
lda #<ser_libref
|
||||
sta (ptr1),y
|
||||
iny
|
||||
lda #>ser_libref
|
||||
sta (ptr1),y
|
||||
|
||||
; Copy the jump vectors
|
||||
|
||||
ldy #SER_HDR::JUMPTAB
|
||||
|
Loading…
Reference in New Issue
Block a user