JavaExceptionTableEntry.st
changeset 107 86a831b6728a
parent 100 4b0da648dcc5
child 111 23243f9273fa
--- a/JavaExceptionTableEntry.st	Tue Jul 02 16:39:29 1996 +0000
+++ b/JavaExceptionTableEntry.st	Tue Jul 02 16:40:15 1996 +0000
@@ -20,17 +20,16 @@
     "if there is a handler for exceptionClass, with given pc,
      return the handler-PC; otherwise, return nil."
 
-    |cls ref|
+    |cls|
 
     (pc between:startPC and:endPC) ifTrue:[
-        catchType == 0 ifTrue:[^ handlerPC].
+        (catchType == 0) ifTrue:[^ handlerPC].
         cls := aMethod javaClass.
-        ref := cls constantPool at:catchType.
-        (ref isKindOf:JavaClass) ifFalse:[
+        (catchType isKindOf:JavaClass) ifFalse:[
             self halt.
             ^ nil
         ].
-        (exception class isKindOf:ref) ifTrue:[
+        (exception class isKindOf:catchType) ifTrue:[
             ^ handlerPC
         ].
         ^ nil
@@ -50,5 +49,5 @@
 !JavaExceptionTableEntry  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaExceptionTableEntry.st,v 1.4 1996/07/01 13:41:48 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaExceptionTableEntry.st,v 1.5 1996/07/02 16:38:48 cg Exp $'
 ! !