--- a/JavaLocalVariableTable.st	Mon Jan 12 13:51:13 1998 +0000
+++ b/JavaLocalVariableTable.st	Mon Jan 12 14:24:47 1998 +0000
@@ -1,3 +1,5 @@
+'From Smalltalk/X, Version:3.3.1 on 8-jan-1998 at 9:38:22 pm'                   !
+
 Array subclass:#JavaLocalVariableTable
 	instanceVariableNames:''
 	classVariableNames:''
@@ -9,13 +11,36 @@
 !JavaLocalVariableTable methodsFor:'queries'!
 
 nameForSlot:slot atPC:pc
+    |numEntryForSlot entryForSlot|
+
+    numEntryForSlot := 0.
+    self do:[:entry |
+        entry slot == slot ifTrue:[
+            entry startPC <= pc ifTrue:[
+                entry endPC >= pc ifTrue:[
+                    ^ entry name
+                ]
+            ].
+            numEntryForSlot := numEntryForSlot + 1.
+            entryForSlot := entry.
+        ]
+    ].
+
+    "/ not at this pc - but maybe the name is valid
+    "/ for all of the methods lines ...
+
+    numEntryForSlot == 1 ifTrue:[
+        ^ entryForSlot name
+    ].
+
     ^ nil
 
-    "Created: 2.7.1996 / 11:30:09 / cg"
+    "Created: / 2.7.1996 / 11:30:09 / cg"
+    "Modified: / 8.1.1998 / 18:56:20 / cg"
 ! !
 
 !JavaLocalVariableTable class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaLocalVariableTable.st,v 1.2 1997/02/07 20:37:22 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaLocalVariableTable.st,v 1.3 1998/01/12 14:24:33 cg Exp $'
 ! !