Kernel 0.94

This commit is contained in:
Rémy GIBERT 2020-09-09 08:11:45 +02:00
parent f15171bb5e
commit c4d9de2cf3
3 changed files with 4 additions and 3 deletions

Binary file not shown.

View File

@ -530,6 +530,7 @@ CS.RUN.RESPONSE jsr Init.TimeOut
>PUSHBI 8 >PUSHBI 8
>SYSCALL PrintF >SYSCALL PrintF
bcs .9
jmp CS.RUN.RESPONSE jmp CS.RUN.RESPONSE
@ -702,7 +703,7 @@ MSG.CONNECTED .AZ "Connected."
MSG.SKTERR .AZ "Socket Error : $%h\r\n" MSG.SKTERR .AZ "Socket Error : $%h\r\n"
MSG.IOERR .AZ "I/O Error : $%h\r\n" MSG.IOERR .AZ "I/O Error : $%h\r\n"
MSG.FileLength .AZ "File Length : %u Bytes\r\n" MSG.FileLength .AZ "File Length : %u Bytes\r\n"
MSG.Progress .AZ "Received %u/%u\r\n" MSG.Progress .AZ "\rReceived : %10u/%u"
*-------------------------------------- *--------------------------------------
SA.LOCAL .DA #AF.INET S.SOCKADDR.AF SA.LOCAL .DA #AF.INET S.SOCKADDR.AF
.BS 1 .BS 1

View File

@ -841,13 +841,13 @@ SKT.Recv clc
jsr SKT.CheckTCP jsr SKT.CheckTCP
bcs .91 bcs .91
lda #E.NODATA .90 lda #E.NODATA
plp plp
sec sec
rts rts
.10 jsr SKT.GetFromQueue .10 jsr SKT.GetFromQueue
bcs .91 bcs .90
.1 plp if CS, RecvFrom .1 plp if CS, RecvFrom
bcc .9 CC, Recv : Exit with CC and A=hFrame bcc .9 CC, Recv : Exit with CC and A=hFrame