# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 825518590 -3600
# Node ID 86125c414826d19cf78787ea6bd041ccd46c5410
# Parent  33b1b3dfdac4a31343877a3351635cb3b9a93022
dont send #isMemberOf: to the receiver (could be nil-subclass)

diff -r 33b1b3dfdac4 -r 86125c414826 ProcMonitor.st
--- a/ProcMonitor.st	Tue Feb 27 17:55:02 1996 +0100
+++ b/ProcMonitor.st	Wed Feb 28 15:43:10 1996 +0100
@@ -245,7 +245,7 @@
                                 1 to:10 do:[:n |
                                     found ifFalse:[
                                         c notNil ifTrue:[
-                                            (c receiver isMemberOf:Semaphore) ifTrue:[
+                                            (c receiver class == Semaphore) ifTrue:[
                                                 c selector == #wait ifTrue:[
                                                     found := true.
                                                 ]
@@ -620,4 +620,4 @@
 !ProcessMonitor class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libtool/Attic/ProcMonitor.st,v 1.29 1995-12-23 17:42:32 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libtool/Attic/ProcMonitor.st,v 1.30 1996-02-28 14:43:10 cg Exp $'! !
diff -r 33b1b3dfdac4 -r 86125c414826 ProcessMonitor.st
--- a/ProcessMonitor.st	Tue Feb 27 17:55:02 1996 +0100
+++ b/ProcessMonitor.st	Wed Feb 28 15:43:10 1996 +0100
@@ -245,7 +245,7 @@
                                 1 to:10 do:[:n |
                                     found ifFalse:[
                                         c notNil ifTrue:[
-                                            (c receiver isMemberOf:Semaphore) ifTrue:[
+                                            (c receiver class == Semaphore) ifTrue:[
                                                 c selector == #wait ifTrue:[
                                                     found := true.
                                                 ]
@@ -620,4 +620,4 @@
 !ProcessMonitor class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libtool/ProcessMonitor.st,v 1.29 1995-12-23 17:42:32 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libtool/ProcessMonitor.st,v 1.30 1996-02-28 14:43:10 cg Exp $'! !