Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-09-09 00:54:29 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.93

Browse Source
This commit is contained in:
Rémy GIBERT 2019-07-15 22:31:25 +02:00
parent a9f8d4ee0c
commit b8dda73b1b
2 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

13
SYS/KERNEL.S.STDIO.txt
View File

@ -410,7 +410,7 @@ PrintF.LocalCleanUp.RTS
PrintF.LocalGetPtr PrintF.LocalGetPtr
jsr PrintF.LocalGetByte jsr PrintF.LocalGetByte
bcs PrintF.LocalCleanUp.RTS bcs PrintF.LocalCleanUp.RTS
tax tay
*-------------------------------------- *--------------------------------------
PrintF.LocalGetByte PrintF.LocalGetByte
lda #$FF SELF MODIFIED LStack Ptr lda #$FF SELF MODIFIED LStack Ptr
@ -591,16 +591,19 @@ PrintF.S ldy #$ff CSTR
.HS 2C bit abs .HS 2C bit abs
PrintF.SS ldy #$00 PSTR PrintF.SS ldy #$00 PSTR
sty .1+1
jsr PrintF.LocalGetPtr jsr PrintF.LocalGetPtr
bcs .9 bcs .9
stx ZPPtr1
sty ZPPtr1
sta ZPPtr1+1 sta ZPPtr1+1
lda (ZPPtr1) if CSTR:last char=0, if PSTR:len=0 lda (ZPPtr1) if CSTR:last char=0, if PSTR:len=0
beq .8 beq .8
sty .1+1 ldy .1+1
.1 lda #$ff Self Modified .1 lda #$ff Self Modified
bne .11 CSTR bne .11 CSTR
@ -910,7 +913,7 @@ K.SScanF jsr MEM.SPtr2PPtr1 ptr2=String to Scan,Ptr1=format
.4 jsr PrintF.LocalGetPtr .4 jsr PrintF.LocalGetPtr
bcs .9 bcs .9
stx ZPPtr3 sty ZPPtr3
sta ZPPtr3+1 sta ZPPtr3+1
jsr .5 jsr .5