Kernel 0.93

This commit is contained in:
Rémy GIBERT 2019-06-11 07:52:24 +02:00
parent 6b65d47c25
commit 71a87f9f52
8 changed files with 12 additions and 19 deletions

Binary file not shown.

View File

@ -499,12 +499,12 @@ SKT.GetDataFromSktIn
.80 jsr SKT.StoreTCB .80 jsr SKT.StoreTCB
* lda #S.TCP.OPTIONS.ACK lda #S.TCP.OPTIONS.ACK
* jsr TCP.OUT.SendOptA jsr TCP.OUT.SendOptA
jsr TCP.SetSocketTCPO.ACK * jsr TCP.SetSocketTCPO.ACK
jsr TCP.OUT.I SKT.GetTCB already called * jsr TCP.OUT.I SKT.GetTCB already called
>LDYA ZPDataInLen >LDYA ZPDataInLen
clc clc

View File

@ -432,11 +432,8 @@ TCP.SENDCLOSE ldx #0
plx plx
phx phx
lda SKT.TABLE,x lda SKT.TABLE,x
>SYSCALL2 freemem
plx
phx
stz SKT.TABLE,x stz SKT.TABLE,x
>SYSCALL2 freemem
.8 plx .8 plx
inx inx

View File

@ -9,7 +9,7 @@ NEW
.INB INC/A2OSX.I .INB INC/A2OSX.I
.INB INC/NET.TELNET.I .INB INC/NET.TELNET.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 20 2 sec. TIMEOUT.MAX .EQ 40 4 sec.
IAC.BUF.MAX .EQ 32 IAC.BUF.MAX .EQ 32
*-------------------------------------- *--------------------------------------
.DUMMY .DUMMY

View File

@ -179,8 +179,8 @@ S.DCB.TTY.bG1ALT .EQ 15
S.DCB.TTY.OUTTAIL .EQ 16 S.DCB.TTY.OUTTAIL .EQ 16
S.DCB.TTY.OUTHEAD .EQ 17 S.DCB.TTY.OUTHEAD .EQ 17
S.DCB.TTY.INBUFFER .EQ 18 S.DCB.TTY.INBUFFER .EQ 18
S.DCB.TTY.INBUFFER.MAX .EQ 39 S.DCB.TTY.INBUFFER.MAX .EQ 31
S.DCB.TTY.OUTBUFFER .EQ 40 S.DCB.TTY.OUTBUFFER .EQ 32
S.DCB.TTY.OUTBUFFER.MAX .EQ 64 S.DCB.TTY.OUTBUFFER.MAX .EQ 64
* *
S.DCB.TTY .EQ 64 S.DCB.TTY .EQ 64

View File

@ -268,10 +268,7 @@ IO.CLOSE.SSOCK
lda IO.hFD lda IO.hFD
.1 jsr $FFFF SELF MODIFIED .1 jmp $FFFF SELF MODIFIED
lda IO.hFD
jmp K.FreeMem
*-------------------------------------- *--------------------------------------
IO.CLOSE.PIPE ldy #S.FD.PIPE.S IO.CLOSE.PIPE ldy #S.FD.PIPE.S

View File

@ -90,7 +90,6 @@ PWD.GetPWName lda PWD.hDB
.8 iny .8 iny
jsr PWD.NextString skip PASSWORD jsr PWD.NextString skip PASSWORD
iny
jmp PWD.GetByte get UID jmp PWD.GetByte get UID
*-------------------------------------- *--------------------------------------
* ZPPtr2 : pPW (Input) * ZPPtr2 : pPW (Input)
@ -430,7 +429,7 @@ PWD.GetByte stz ZPPtr4
bra .1 bra .1
.8 lda ZPPtr4 .8 lda ZPPtr4
* clc clc
rts rts
*-------------------------------------- *--------------------------------------
PWD.StoreRecord sec PWD.StoreRecord sec