Mercurial > hg > Members > kono > nitros9-code

changeset 2111:6ccd6e25a441

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed issues with pshs and puls of 6309 registers -- a nono!
author boisy
date Thu, 26 Jul 2007 16:41:45 +0000
parents 8b36468b2edb
children cfb3a637a000
files level2/modules/cowin.asm level2/modules/krnp4_regdump.asm
diffstat 2 files changed, 6 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/level2/modules/cowin.asm	Sun May 27 15:27:43 2007 +0000
+++ b/level2/modules/cowin.asm	Thu Jul 26 16:41:45 2007 +0000
@@ -580,10 +580,10 @@
 L0101    ldx   >WGlobal+G.GrfEnt     Get GrfDrv entry address
          orcc  #Entire    Set up 'pull all regs' for RTI
          IFNE  H6309
-         pshs  e
+         pshsw
          tfr   cc,e
          ste   >WGlobal+g0005
-         puls  e
+         pulsw
          ELSE
          pshs  d
          ldd   >GrfMem+gr00B5
--- a/level2/modules/krnp4_regdump.asm	Sun May 27 15:27:43 2007 +0000
+++ b/level2/modules/krnp4_regdump.asm	Thu Jul 26 16:41:45 2007 +0000
@@ -57,10 +57,9 @@
          fcb   C$CR
 
 regdmp   equ   *
+         pshs  cc,a,b,dp,x,y,u save all registers
          IFNE  H6309
-         pshs  cc,a,b,e,f,dp,x,y,u save all registers
-         ELSE
-         pshs  cc,a,b,dp,x,y,u save all registers
+         pshsw
          ENDC
          tfr   u,y        transfer addresses
          leas  -60,s      back up for some variable storage
@@ -106,10 +105,9 @@
          lbsr  reg060     send a <CR>
          leas  60,s       restore stack pointer
          IFNE  H6309
-         puls  cc,a,b,e,f,dp,x,y,u,pc restore all registers and return
-         ELSE
+         pulsw
+         ENDC
          puls  cc,a,b,dp,x,y,u,pc restore all registers and return
-         ENDC
 
 * Dump a register in "D"
 * X = Control Table Location