mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-25 20:33:13 +00:00
Kernel 0.94
This commit is contained in:
parent
f15171bb5e
commit
c4d9de2cf3
Binary file not shown.
@ -530,6 +530,7 @@ CS.RUN.RESPONSE jsr Init.TimeOut
|
||||
>PUSHBI 8
|
||||
|
||||
>SYSCALL PrintF
|
||||
bcs .9
|
||||
|
||||
jmp CS.RUN.RESPONSE
|
||||
|
||||
@ -702,7 +703,7 @@ MSG.CONNECTED .AZ "Connected."
|
||||
MSG.SKTERR .AZ "Socket Error : $%h\r\n"
|
||||
MSG.IOERR .AZ "I/O Error : $%h\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
|
||||
.BS 1
|
||||
|
@ -841,13 +841,13 @@ SKT.Recv clc
|
||||
jsr SKT.CheckTCP
|
||||
bcs .91
|
||||
|
||||
lda #E.NODATA
|
||||
.90 lda #E.NODATA
|
||||
plp
|
||||
sec
|
||||
rts
|
||||
|
||||
.10 jsr SKT.GetFromQueue
|
||||
bcs .91
|
||||
bcs .90
|
||||
|
||||
.1 plp if CS, RecvFrom
|
||||
bcc .9 CC, Recv : Exit with CC and A=hFrame
|
||||
|
Loading…
Reference in New Issue
Block a user