Kernel version 0.8 : Fixed bug in LoadDRV

This commit is contained in:
Rémy GIBERT 2016-10-04 08:28:43 +02:00
parent 00f9fe267e
commit 6fe1beb1ae
8 changed files with 12 additions and 12 deletions

Binary file not shown.

Binary file not shown.

View File

@ -20,12 +20,12 @@ INSDRV UTHERNET.DRV 000E3A123456
#INSDRV UTHERNET2.DRV 0008DC123456 #INSDRV UTHERNET2.DRV 0008DC123456
#INSDRV UTHER2.AI.DRV 0008DC123456 #INSDRV UTHER2.AI.DRV 0008DC123456
#INSDRV LANCEGS.DRV #INSDRV LANCEGS.DRV
STARTPROC TCPIP #STARTPROC TCPIP
STARTPROC DHCPCLNT #STARTPROC DHCPCLNT
#STARTPROC HTTPD #STARTPROC HTTPD
#TELNETD #TELNETD
#MOUNT TFTP 192.168.1.5:/A2OSX /MNT/A2OSX #NFSMOUNT 192.168.1.5:/A2OSX /MNT/A2OSX
#MOUNT CIFS 192.168.1.5:/MSSHARE /MNT/MSSHARE #CIFSMOUNT 192.168.1.5:/MSSHARE /MNT/MSSHARE
# End Network Section # End Network Section
# GUI Section # GUI Section
#INSDRV DHGR.DRV #INSDRV DHGR.DRV

View File

@ -36,7 +36,9 @@ CS.START cld
L.MSG.DETECT .DA MSG.DETECT L.MSG.DETECT .DA MSG.DETECT
.DA 0 End Of Reloc Table .DA 0 End Of Reloc Table
*-------------------------------------- *--------------------------------------
Dev.Detect >LDYA L.MSG.DETECT Dev.Detect >DEBUG
>LDYA L.MSG.DETECT
>SYSCALL SYS.PStrOutYA >SYSCALL SYS.PStrOutYA
clc clc

View File

@ -60,9 +60,7 @@ J.INTCMDS .DA Cmd.Exec.CD
.DA Cmd.Exec.TYPE .DA Cmd.Exec.TYPE
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
CS.INIT >DEBUG CS.INIT >SYSCALL SYS.GetArgC
>SYSCALL SYS.GetArgC
cmp #1 cmp #1
beq CS.INIT.INTERACTIVE no arg, continue starting interactive beq CS.INIT.INTERACTIVE no arg, continue starting interactive

View File

@ -14,7 +14,7 @@ AUTO 6
K.LoadDrvYA >STYA K.LoadDrv.CmdArray K.LoadDrvYA >STYA K.LoadDrv.CmdArray
>LDYAI ENV.DRV push ENVNAME=DRV >LDYAI ENV.DRV push ENVNAME=DRV
jsr K.GetEnvYA get value for ENV=DRV >SYSCALL SYS.GetEnvYA get value for ENV=DRV
bcs .99 bcs .99
>PUSHYA Push $DRV value >PUSHYA Push $DRV value

View File

@ -13,7 +13,8 @@ AUTO 6
* Y,A = PSTR to FilePath (PSTRING) * Y,A = PSTR to FilePath (PSTRING)
* X = hMem to FilePath * X = hMem to FilePath
*-------------------------------------- *--------------------------------------
K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA K.FileSearch >DEBUG
>PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA
>PULLYA Get Search list >PULLYA Get Search list
>SYSCALL SYS.ExpandPStrYA Expand it (SYSCALL to BNK1) >SYSCALL SYS.ExpandPStrYA Expand it (SYSCALL to BNK1)
bcs .99 bcs .99
@ -65,7 +66,6 @@ K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA
jsr K.FreeMemA jsr K.FreeMemA
>LDYAI KrnBuf256 >LDYAI KrnBuf256
>SYSCALL SYS.NewPStrYA >SYSCALL SYS.NewPStrYA
clc
rts rts
.98 lda K.FileSearch.hSrch Discard Expanded hSrch list .98 lda K.FileSearch.hSrch Discard Expanded hSrch list

View File

@ -13,7 +13,7 @@ AUTO 6
*-------------------------------------- *--------------------------------------
K.LoadLibYA >STYA K.LoadLib.Name save libname for K.FileSearch K.LoadLibYA >STYA K.LoadLib.Name save libname for K.FileSearch
>LDYAI ENV.LIB push ENVNAME=LIB >LDYAI ENV.LIB push ENVNAME=LIB
jsr K.GetEnvYA get value for ENV=LIB >SYSCALL SYS.GetEnvYA get value for ENV=LIB
bcs .99 bcs .99
>PUSHYA Push $LIB value >PUSHYA Push $LIB value