Mercurial > hg > Members > kono > nitros9-code
changeset 1241:716c84dca8e4
Source enhancements
author | boisy |
---|---|
date | Wed, 06 Aug 2003 18:56:08 +0000 |
parents | cd2122359eb9 |
children | bdd2f61d5dbc |
files | level2/modules/kernel/falltsk.asm level2/modules/kernel/fld.asm level2/modules/kernel/fldabx.asm level2/modules/kernel/krn.asm level2/modules/kernel/krnp2.asm |
diffstat | 5 files changed, 19 insertions(+), 15 deletions(-) [+] |
line wrap: on
line diff
--- a/level2/modules/kernel/falltsk.asm Tue Aug 05 14:07:28 2003 +0000 +++ b/level2/modules/kernel/falltsk.asm Wed Aug 06 18:56:08 2003 +0000 @@ -50,7 +50,7 @@ stu b,x save DAT image pointer in task table cmpb #2 is it either system or GrfDrv? bhi L0C9F no, return - ldx #$FFA0 update system DAT image + ldx #DAT.Regs update system DAT image lbsr L0E93 go bash the hardware L0C9F puls cc,d,x,u,pc
--- a/level2/modules/kernel/fld.asm Tue Aug 05 14:07:28 2003 +0000 +++ b/level2/modules/kernel/fld.asm Wed Aug 06 18:56:08 2003 +0000 @@ -11,11 +11,15 @@ clrb Clear carry/setup for STB pshs cc Preserve interrupt status/settings orcc #IntMasks shut IRQ's off - sta >$FFA0 Map block into $0000-$1FFF + sta >DAT.Regs Map block into $0000-$1FFF + IFNE H6309 brn L0AC8 + ENDC lda ,x Get byte - stb >$FFA0 Map block 0 into $0000-$1FFF + stb >DAT.Regs Map block 0 into $0000-$1FFF + IFNE H6309 fdb $21ED LBRN ??? + ENDC puls pc,cc Get interrupt status/(or turn on) & return * Get 1st byte of LDDDXY - also used by many other routines @@ -24,10 +28,10 @@ pshs b,cc clrb orcc #IntMasks Shut off interrupts - sta >$FFA0 Map in MMU block into slot 0 + sta >DAT.Regs Map in MMU block into slot 0 lda ,x+ Get byte - stb >$FFA0 -* clr >$FFA0 Map in MMU block #0 into slot 0 + stb >DAT.Regs +* clr >DAT.Regs Map in MMU block #0 into slot 0 * andcc #^IntMasks puls b,cc bra AdjBlk0 @@ -64,8 +68,8 @@ ldb 3,y Get MMU block #1 pshs cc Preserve int. status orcc #IntMasks shut off int. - std >$FFA0 Map in both blocks + std >DAT.Regs Map in both blocks ldd ,x Get 2 bytes - stu >$FFA0 Map original blocks in + stu >DAT.Regs Map original blocks in * tfr y,w Restore W puls pc,u,y,x,cc Restore regs & return
--- a/level2/modules/kernel/fldabx.asm Tue Aug 05 14:07:28 2003 +0000 +++ b/level2/modules/kernel/fldabx.asm Wed Aug 06 18:56:08 2003 +0000 @@ -10,9 +10,9 @@ bsr L0BF5 ldd a,u orcc #IntMasks - stb >$FFA0 + stb >DAT.Regs ldb ,x - clr >$FFA0 + clr >DAT.Regs puls cc,a,x,u stb R$A,u Save into caller's A & return @@ -41,7 +41,7 @@ ldd a,u get memory block lda 1,s orcc #IntMasks - stb >$FFA0 + stb >DAT.Regs sta ,x - clr >$FFA0 + clr >DAT.Regs puls cc,d,x,u,pc
--- a/level2/modules/kernel/krn.asm Tue Aug 05 14:07:28 2003 +0000 +++ b/level2/modules/kernel/krn.asm Wed Aug 06 18:56:08 2003 +0000 @@ -33,7 +33,7 @@ fcc /0123456789ABCDEF/ fcc /01234567/ ELSE - fcc /123456789/ + fcc /123456789ABCD/ ENDC * Might as well have this here as just past the end of OS9p1...
--- a/level2/modules/kernel/krnp2.asm Tue Aug 05 14:07:28 2003 +0000 +++ b/level2/modules/kernel/krnp2.asm Wed Aug 06 18:56:08 2003 +0000 @@ -231,8 +231,8 @@ ldy #$0000 ENDC os9 F$Fork fork it - bcc L0093 if no error, go execute it - jmp <D.Crash otherwise crash the system + bcc L0093 if no error, go execute it + jmp <D.Crash otherwise crash the system L0093 os9 F$NProc let it take over L0096 fcs /OS9p3/