Kernel 0.92 : PFT fix,PING fix

This commit is contained in:
Rémy GIBERT 2018-11-16 23:43:12 +01:00
parent dce5b027b7
commit b94642a262
8 changed files with 14 additions and 13 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -75,6 +75,7 @@ ICMP.IN.ECHOREP jsr FRM.GetTargetSKT.RAW
bcc .8
.9 lda hFrameIn Q full, discard...
stz hFrameIn
>SYSCALL FreeMem
.8 rts
*--------------------------------------

View File

@ -31,7 +31,6 @@ K.LoadTxtFile pha
*\--------------------------------------
K.LoadFile clc
ror FIO.bTXT
>DEBUG
jsr K.FOpen
bcc .12
rts

View File

@ -147,20 +147,20 @@ Kernel.Init3 sta SETALTZP
bne .1
>PUSHBI 0
>LDYAI MSG.MMode
>LDYAI MSG.CTRLD
>SYSCALL printf
>PUSHBI 0 PS Flags
>LDYAI STARTUP.SHELL
>LDYAI CTRLD.SHELL
bra .8
.1 >PUSHWI STARTUP.CMDLINE
.1 >PUSHWI ETCINIT.CMDLINE
>PUSHBI 2
>LDYAI MSG.Startup
>LDYAI MSG.EtcInit
>SYSCALL printf
>PUSHBI 0 PS Flags
>LDYAI STARTUP.CMDLINE
>LDYAI ETCINIT.CMDLINE
.8 >SYSCALL ExecL
@ -1036,8 +1036,8 @@ MSG.EVT .AZ "Event Manager..."
MSG.FLT .AZ "Path Filter..."
MSG.TSK .AZ "Task Manager..."
MSG.Prefix .AZ "Root:%s\r\n"
MSG.MMode .AZ "Ctrl-D Pressed, entering Maintenance mode..."
MSG.Startup .AZ "Executing Startup Script:%s "
MSG.CTRLD .AZ "Ctrl-D Pressed, entering Maintenance mode..."
MSG.ETCINIT .AZ "Executing ETC/INIT Script:%s "
MSG.StartupErr .AZ "Failed : [$%h]\r\n"
MSG.Init3.OK .AZ "OK\r\nA2osX[Stage3]:Complete.\r\n"
*--------------------------------------
@ -1061,8 +1061,8 @@ I.ENV.A2osX .AZ "A2OSX"
I.ENV.PATH .AZ "PATH=${A2OSX}SBIN/;${A2OSX}BIN/"
I.ENV.LIB .AZ "LIB=${A2OSX}LIB/"
I.ENV.DRV .AZ "DRV=${A2OSX}DRV/"
STARTUP.SHELL .AZ "${A2OSX}SBIN/SHELL"
STARTUP.CMDLINE .AZ "${A2OSX}SBIN/SHELL ${A2OSX}A2osX.STARTUP"
CTRLD.SHELL .AZ "${A2OSX}SBIN/SHELL"
ETCINIT.CMDLINE .AZ "${A2OSX}SBIN/SHELL ${A2OSX}ETC/INIT"
*--------------------------------------
MLIOPEN00 .DA #3
.DA A2OSXCONF

View File

@ -31,7 +31,7 @@ PFT.CheckPathYA stx .71+1 Save SYSCALL #
>STYA ZPPtr1
.1 lda (ZPPtr1) Get Filter char....
beq PFT.YAToMLIPATH
beq .80
ldy #0
@ -69,7 +69,8 @@ PFT.CheckPathYA stx .71+1 Save SYSCALL #
adc #S.PFT
sta ZPPtr1
bcc .1
>LDYAI K.Buf256
.80 >LDYAI K.Buf256
*--------------------------------------
PFT.YAToMLIPATH >STYA .1+1

View File

@ -64,7 +64,7 @@ PS.Exec jsr PS.CreateChild Child S.PS at ZPPtr3
>LDYA PS.ArgV
jsr PS.DupArgs
bcs .9
ldy #S.PS.hARGV
sta (ZPPtr3),y
pha