Kernel 0.9.1 : KERNEL, bugfix in PS command.

This commit is contained in:
Rémy GIBERT 2018-04-27 14:13:54 +02:00
parent 5f215b75ad
commit b974fded06
3 changed files with 4 additions and 4 deletions

View File

@ -53,7 +53,8 @@ CS.RUN >LDYA pData
>LDA.G PS.Count
beq .8
>INC.G PS.Index
lda #1
>STA.G PS.Index
.1 >INC.G PS.Index
tay
@ -126,7 +127,7 @@ CS.QUIT clc
*--------------------------------------
CS.END
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"
MSG.FLAGS .AS "IRQDHSed"
*--------------------------------------

View File

@ -40,7 +40,7 @@ A2osX.CPUSPEED .EQ $BEE6 WORD, (->255.99 Mhz)
A2osX.Z80SLOT .EQ $BEE8
A2osX.Z80SPEED .EQ $BEE9 WORD
A2osX.InKernel .EQ $BEEB
* .EQ $BEEB
A2osX.TIMER16 .EQ $BEEC WORD
A2osX.RANDOM16 .EQ $BEEE WORD

View File

@ -398,7 +398,6 @@ K.GetPSList.YA >STYA ZPPtr1
ldy #1
lda CORE.InKernelStat
sta (ZPPtr1),y
iny
.1 lda PS.Table.PID,x
beq .2