Kernel 0.93+

This commit is contained in:
Rémy GIBERT 2019-10-04 08:38:42 +02:00
parent b7925394e5
commit b9c6c178a9
2 changed files with 8 additions and 5 deletions

Binary file not shown.

View File

@ -181,16 +181,19 @@ SKT.connect.SEQPACKET
jsr SKT.NewTCB
bcs SKT.listen.RTS
lda #S.SOCKET.TCP.S.OPENED
jsr SKT.StoreTCB.S
* lda #S.SOCKET.TCP.S.OPENED
* jsr SKT.StoreTCB.S
lda #S.TCP.OPTIONS.SYN
jsr TCP.OUT.SendOptA Send SYN
bcs .8 failed ARP lookup....
bcs .9 failed ARP lookup....
lda #S.SOCKET.TCP.S.SYNSENT
jmp SKT.StoreTCB.S
.8 clc
rts
.9 lda #ERR.SKT.BAD
sec
clc
*/--------------------------------------
* # Listen
* Listen for connections on a socket