Mercurial > hg > Members > kono > nitros9-code

changeset 74:e3956c6fd78b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed I$Detach Static Storage Wipe-Out bug
author boisy
date Sun, 12 May 2002 03:14:31 +0000
parents 89a324d09f87
children ce04e3883dec
files level2/modules/ioman.asm
diffstat 1 files changed, 6 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/level2/modules/ioman.asm	Tue May 07 11:28:17 2002 +0000
+++ b/level2/modules/ioman.asm	Sun May 12 03:14:31 2002 +0000
@@ -9,10 +9,11 @@
 * 14     IOMAN ignores device address high byte now     ??? ??/??/??
 *        (FFXXXX vs 07XXXX etc ignored)
 * 15     Fixed IOQueue sort bug                         BGP 98/10/08
-* 15b    Made minor optimizations as per Curtis Boyle's BGP 98/10/10
+* 15r2   Made minor optimizations as per Curtis Boyle's BGP 98/10/10
 *        optimization document 
 *        Added comments from version provided by        BGP 98/10/21
 *        Curtis Boyle
+* 15r3   Fixed IDetach static storage wipeout bug       BGP 02/05/11
 
          nam   IOMan
          ttl   OS-9 Level Two V3 I/O Manager
@@ -24,7 +25,7 @@
 
 tylg     set   Systm+Objct
 atrv     set   ReEnt+rev
-rev      set   $02
+rev      set   $03
 edition  set   15
 
          mod   eom,name,tylg,atrv,IOManEnt,size
@@ -343,17 +344,14 @@
 
 IDetach  ldu   R$U,u      get ptr to dev tbl entry
          ldx   V$DESC,u
-         ldb   V$USRS,u
-         bne   L0240
-         pshs  u,b
-         ldu   V$STAT,u
-         pshs  u
-         bra   L027C
+         tst   V$USRS,u
+         beq   IDetach2
 L0240    lda   #$FF
          cmpa  $08,u
          lbeq  L02B7
          dec   $08,u
          lbne  L0299
+IDetach2
          ldx   <D.Init
          ldb   DevCnt,x
          pshs  u,b