mirror of
https://github.com/A2osX/A2osX.git
synced 2024-07-13 13:29:04 +00:00
Kernel 0.9.1 : KERNEL, bugfix in PS command.
This commit is contained in:
parent
5f215b75ad
commit
b974fded06
@ -53,7 +53,8 @@ CS.RUN >LDYA pData
|
|||||||
>LDA.G PS.Count
|
>LDA.G PS.Count
|
||||||
beq .8
|
beq .8
|
||||||
|
|
||||||
>INC.G PS.Index
|
lda #1
|
||||||
|
>STA.G PS.Index
|
||||||
|
|
||||||
.1 >INC.G PS.Index
|
.1 >INC.G PS.Index
|
||||||
tay
|
tay
|
||||||
@ -126,7 +127,7 @@ CS.QUIT clc
|
|||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.END
|
CS.END
|
||||||
MSG0 .AZ "ID CPU\% Flags UID PID Command Line\r\n"
|
MSG0 .AZ "ID CPU\% Flags UID PID Command Line\r\n"
|
||||||
MSGK .AZ "000 %03d\% -------- *KERNEL*\r\n"
|
MSGK .AZ "000 %03d\% -------- 000 --- *KERNEL*\r\n"
|
||||||
MSG1 .AZ "%03d %03d\% %s %03d %03d %s\r\n"
|
MSG1 .AZ "%03d %03d\% %s %03d %03d %s\r\n"
|
||||||
MSG.FLAGS .AS "IRQDHSed"
|
MSG.FLAGS .AS "IRQDHSed"
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
@ -40,7 +40,7 @@ A2osX.CPUSPEED .EQ $BEE6 WORD, (->255.99 Mhz)
|
|||||||
A2osX.Z80SLOT .EQ $BEE8
|
A2osX.Z80SLOT .EQ $BEE8
|
||||||
A2osX.Z80SPEED .EQ $BEE9 WORD
|
A2osX.Z80SPEED .EQ $BEE9 WORD
|
||||||
|
|
||||||
A2osX.InKernel .EQ $BEEB
|
* .EQ $BEEB
|
||||||
|
|
||||||
A2osX.TIMER16 .EQ $BEEC WORD
|
A2osX.TIMER16 .EQ $BEEC WORD
|
||||||
A2osX.RANDOM16 .EQ $BEEE WORD
|
A2osX.RANDOM16 .EQ $BEEE WORD
|
||||||
|
@ -398,7 +398,6 @@ K.GetPSList.YA >STYA ZPPtr1
|
|||||||
ldy #1
|
ldy #1
|
||||||
lda CORE.InKernelStat
|
lda CORE.InKernelStat
|
||||||
sta (ZPPtr1),y
|
sta (ZPPtr1),y
|
||||||
iny
|
|
||||||
|
|
||||||
.1 lda PS.Table.PID,x
|
.1 lda PS.Table.PID,x
|
||||||
beq .2
|
beq .2
|
||||||
|
Loading…
Reference in New Issue
Block a user