mirror of
https://github.com/A2osX/A2osX.git
synced 2024-10-01 22:57:43 +00:00
Kernel 0.9.2
This commit is contained in:
parent
6c8a40e170
commit
545cd148d0
Binary file not shown.
Binary file not shown.
@ -34,7 +34,7 @@ L.NODE .DA NODE
|
||||
*--------------------------------------
|
||||
Dev.Detect >LDYA L.MSG.DETECT
|
||||
>SYSCALL printf
|
||||
|
||||
|
||||
>PUSHW L.INSDRV+4
|
||||
>PUSHW L.INSDRV+2
|
||||
>LDYA L.INSDRV
|
||||
|
@ -43,9 +43,9 @@ CS.INIT ldy #S.PS.ARGC
|
||||
bne .90
|
||||
|
||||
lda #1
|
||||
>SYSCALL GetArg.A
|
||||
>SYSCALL GetArg
|
||||
|
||||
>SYSCALL MkNod.YA
|
||||
>SYSCALL MkNod
|
||||
bcs .9
|
||||
|
||||
ldy #S.PS.hStdIn
|
||||
@ -58,10 +58,10 @@ CS.INIT ldy #S.PS.ARGC
|
||||
>STA.G hNode
|
||||
|
||||
lda #2
|
||||
>SYSCALL GetArg.A
|
||||
>SYSCALL GetArg
|
||||
bcs .9
|
||||
|
||||
>SYSCALL ExpandStr.YA
|
||||
>SYSCALL ExpandStr
|
||||
bcs .9
|
||||
|
||||
txa
|
||||
@ -97,7 +97,7 @@ CS.RUN >SLEEP
|
||||
|
||||
.1 lda MSG.TELNETOPT,y
|
||||
phy
|
||||
>SYSCALL PutChar.A
|
||||
>SYSCALL PutChar
|
||||
ply
|
||||
iny
|
||||
cpy #MSG.TELNETOPT.LEN
|
||||
@ -122,8 +122,8 @@ CS.RUN.LOOP
|
||||
bcs .8 unable to send greetings...reset..
|
||||
|
||||
>LDA.G hBinName
|
||||
>SYSCALL GetMemPtr.A
|
||||
>SYSCALL ExecPS.YA
|
||||
>SYSCALL GetMemPtr
|
||||
>SYSCALL ExecPS
|
||||
|
||||
.9 rts
|
||||
|
||||
@ -218,13 +218,13 @@ CS.DOEVENT lda (pEvent)
|
||||
*--------------------------------------
|
||||
CS.QUIT >LDA.G hBinName
|
||||
beq .1
|
||||
>SYSCALL FreeMem.A
|
||||
>SYSCALL FreeMem
|
||||
|
||||
.1 >LDA.G hNode
|
||||
beq .8
|
||||
|
||||
>PUSHA
|
||||
>PUSHBI DEVMGR.CLOSE
|
||||
>PUSHBI IOCTL.CLOSE
|
||||
>PUSHBI 0
|
||||
|
||||
>SYSCALL IOCTL
|
||||
|
@ -335,9 +335,12 @@ K.InsDrv >STYA BIN.R.CS.Start
|
||||
lda DevMgr.Free+1
|
||||
sbc BIN.R.CS.Start+1
|
||||
sta BIN.R.Offset+1
|
||||
|
||||
|
||||
jsr BIN.Move
|
||||
|
||||
>LDYA BIN.R.CS.Start
|
||||
>STYA ZPPtr1
|
||||
|
||||
jsr BIN.RelDrv
|
||||
|
||||
>LDYA BIN.R.End
|
||||
@ -450,10 +453,10 @@ BIN.RelExe ldy #H.BIN.T+1
|
||||
*--------------------------------------
|
||||
BIN.RelDrv ldy #H.BIN.DRV.REL.TABLE
|
||||
|
||||
.1 lda (ZPPtr1),y Start Relocate JMP table
|
||||
.1 lda (ZPPtr1),y Start Relocate JMP table
|
||||
tax LO in X
|
||||
iny
|
||||
ora (ZPPtr1),y ORA with HI
|
||||
ora (ZPPtr1),y ORA with HI
|
||||
beq .2 $0000 = end of table
|
||||
|
||||
dey
|
||||
|
Loading…
Reference in New Issue
Block a user