# HG changeset patch
# User boisy
# Date 1264478678 0
# Node ID ae4de5a48f903e5cee84d074a0245af38cfeefd5
# Parent  e96eb55b10b5e43ec8ad1553a7646149a75098d6
More updates

diff -r e96eb55b10b5 -r ae4de5a48f90 level2/modules/ioman.asm
--- 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