Mercurial > hg > Members > kono > nitros9-code

changeset 2415:ae4de5a48f90

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
More updates
author boisy
date Tue, 26 Jan 2010 04:04:38 +0000
parents e96eb55b10b5
children 7f8d006d5da6
files level2/modules/ioman.asm
diffstat 1 files changed, 17 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/level2/modules/ioman.asm	Tue Jan 26 03:51:52 2010 +0000
+++ b/level2/modules/ioman.asm	Tue Jan 26 04:04:38 2010 +0000
@@ -572,12 +572,22 @@
          ldb   P$ID,y    
          stb   V$USRS,u  
          ldy   V$DESC,u  
+         IFGT  LEVEL-1
          ldu   V$DRIVEX,u
          exg   x,u       
          pshs  u         
          jsr   $0F,x     
          puls  u         
-L02D1    ldx   $01,s     	get ptr to dev table
+         ELSE
+         ldu   V$DRIV,u
+         exg   x,u                     X pts to driver, U pts to static
+         ldd   M$Exec,x
+         leax  d,x
+         pshs  u
+         jsr   $0F,x     
+         puls  u         
+         ENDC
+         ldx   $01,s     	get ptr to dev table
          ldx   V$DRIV,x  	load X with driver addr
          ldd   M$Mem,x   	get static storage size
          addd  #$00FF    	round up one page
@@ -1052,7 +1062,13 @@
          sta   PD.CPR,y  
          stu   PD.RGS,y  
          ldx   PD.DEV,y  
+         IFGT  Leve-1         
          ldx   V$FMGREX,x     	get file manager address
+         ELSE
+         ldx   V$FMGR,x
+         ldd   M$Exec,x
+         leax  d,x
+         ENDC
          lda   #$03      	length of lbra instruction
          mul             
          jsr   b,x