6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-12-22 12:30:41 +00:00
Code Issues Projects Releases Wiki Activity

Moved initcgetc to initcputc

Browse Source
This commit is contained in:
Stefan 2018-01-23 13:02:47 +01:00
parent 98e2b79ef4
commit caa40866c3
2 changed files with 11 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
libsrc/atmos/cgetc.s
View File

@ -6,7 +6,6 @@
; ;
.export _cgetc .export _cgetc
.constructor initcgetc
.import cursor .import cursor
.forceimport disable_caps .forceimport disable_caps
@ -53,14 +52,3 @@
@L3: rts @L3: rts
.endproc .endproc
; ------------------------------------------------------------------------
; Switch the cursor off. Code goes into the ONCE segment,
; which will be reused after it is run.
.segment "ONCE"
initcgetc:
lsr STATUS
asl STATUS ; Clear bit zero
rts

11
libsrc/atmos/cputc.s
View File

@ -8,6 +8,7 @@
.export _cputcxy, _cputc .export _cputcxy, _cputc
.export setscrptr, putchar .export setscrptr, putchar
.constructor initcputc
.import rvs .import rvs
.import popax .import popax
.importzp ptr2 .importzp ptr2
@ -95,3 +96,13 @@ ScrTabHi:
.byte >(SCREEN + Line * SCREEN_XSIZE) .byte >(SCREEN + Line * SCREEN_XSIZE)
.endrep .endrep
; ------------------------------------------------------------------------
; Switch the cursor off. Code goes into the ONCE segment,
; which will be reused after it is run.
.segment "ONCE"
initcputc:
lsr STATUS
asl STATUS ; Clear bit zero
rts