1
0
mirror of https://github.com/cc65/cc65.git synced 2024-06-17 00:29:31 +00:00

Merge pull request #577 from polluks/master

Moved initcgetc to initcputc
This commit is contained in:
Oliver Schmidt 2018-01-25 12:35:21 +00:00 committed by GitHub
commit 374c7e815c
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 11 additions and 12 deletions

View File

@ -6,7 +6,6 @@
;
.export _cgetc
.constructor initcgetc
.import cursor
.forceimport disable_caps
@ -53,14 +52,3 @@
@L3: rts
.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

View File

@ -8,6 +8,7 @@
.export _cputcxy, _cputc
.export setscrptr, putchar
.constructor initcputc
.import rvs
.import popax
.importzp ptr2
@ -95,3 +96,13 @@ ScrTabHi:
.byte >(SCREEN + Line * SCREEN_XSIZE)
.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