Kernel 0.93

This commit is contained in:
Rémy GIBERT 2019-07-09 08:03:49 +02:00
parent 82ce3a9813
commit 1de28dea4b
5 changed files with 18 additions and 20 deletions

Binary file not shown.

View File

@ -1047,14 +1047,14 @@ SKT.CheckStream ldy #S.SOCKET.T
ldy #S.SOCKET.TCP.S
lda (ZPPtrSKT),y
cmp #S.SOCKET.TCP.S.ESTBLSH
bcc .8
cmp #S.SOCKET.TCP.S.CLWAIT
bne .91
bcc .8 ESTBLSH or less
bne .91 more than CLWAIT
.8 lda #0
clc
rts CC=ESTBLSH...or less
rts
.91 lda #MLI.E.IO
sec

View File

@ -92,7 +92,7 @@ TCP.IN.JMP.SYNSENT
jsr TCP.IN.ACKTheSYN
lda #S.TCP.OPTIONS.ACK
jsr TCP.OUT.SendOptA SYN.ACK recieved, Send, ACK
jsr TCP.OUT.SendOptA SYN.ACK received, Send, ACK
bcs .9
lda #S.SOCKET.TCP.S.ESTBLSH

View File

@ -6,7 +6,6 @@ NEW
.TF SBIN/NETWORKD
*--------------------------------------
LIB.MAX .EQ 4
FRM.MAX .EQ 4
*--------------------------------------
.INB INC/MACROS.I
.INB INC/A2OSX.I
@ -15,7 +14,6 @@ FRM.MAX .EQ 4
.INB INC/NIC.I
.INB INC/ETH.I
.INB INC/LIB.NET.I
.INB INC/LIBTCPIP.I
*--------------------------------------
* Zero Page Segment, up to 32 bytes
*--------------------------------------
@ -211,7 +209,7 @@ CS.INIT.CONF >LDYAI 64
.81 lda hLineBuf
>SYSCALL FreeMem
CS.INIT.CONF.8
clc
rts
*--------------------------------------
@ -222,29 +220,29 @@ CS.RUN >PUSHW L.IOCTL
bcs .8 No Frame
sta hFrameIn
.3 ldx #0 LIB index
.4 ldy hLIBs,x
beq .7
ldx #0
.1 ldy hLIBs,x
beq .2
>PUSHW L.IOCTL
phx Save LIB index
lda hFrameIn
phx
ldx #LIBNET.INCOMING
jsr A2osX.LIBCALL
plx
bcc .8
bcc CS.RUN
inx
bra .4
bra .1
.7 lda hFrameIn
.2 lda hFrameIn
>SYSCALL freemem
bra CS.RUN
.8 clc
rts
*--------------------------------------

View File

@ -275,7 +275,7 @@ K.FreeMem.ERR phx
jsr K.SYSCALL2.BANK
plx
lda #E.INVH
>DEBUG
* >DEBUG
sec
rts
*--------------------------------------