JavaContext.st
changeset 511 1395b1fc453f
parent 454 38f590639d65
child 588 dfb441458353
--- a/JavaContext.st	Mon Jan 04 14:34:55 1999 +0000
+++ b/JavaContext.st	Mon Jan 04 16:01:50 1999 +0000
@@ -1,6 +1,6 @@
 "
  COPYRIGHT (c) 1997 by eXept Software AG
-              All Rights Reserved
+	      All Rights Reserved
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -13,7 +13,7 @@
 
 
 Context variableSubclass:#JavaContext
-	instanceVariableNames:'exArg byteCode constPool method monitor'
+	instanceVariableNames:'exArg exPC byteCode constPool method'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Java-Support'
@@ -24,7 +24,7 @@
 copyright
 "
  COPYRIGHT (c) 1997 by eXept Software AG
-              All Rights Reserved
+	      All Rights Reserved
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -284,7 +284,14 @@
 !JavaContext methodsFor:'exception handler support'!
 
 exceptionArg:aJavaException
-    exArg := aJavaException
+    exArg := aJavaException.
+
+    "Created: / 7.1.1998 / 21:36:56 / cg"
+!
+
+exceptionArg:aJavaException pc:newPc
+    exArg := aJavaException.
+    exPC := newPc.
 
     "Created: / 7.1.1998 / 21:36:56 / cg"
 !
@@ -391,5 +398,5 @@
 !JavaContext class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaContext.st,v 1.28 1998/11/16 15:13:35 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaContext.st,v 1.29 1999/01/04 16:01:50 cg Exp $'
 ! !