JavaMethod.st
branchdevelopment
changeset 1913 78fd166b4107
parent 1864 60a8dc26c8c6
child 1931 ac2ca5f6755a
--- a/JavaMethod.st	Tue Dec 18 19:20:12 2012 +0100
+++ b/JavaMethod.st	Tue Dec 18 20:28:54 2012 +0100
@@ -1045,6 +1045,19 @@
     "Modified: / 23-11-2010 / 19:32:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+methodArgAndVarNamesInContext: context
+    | pc |
+
+    localVariableTable isNil ifTrue:[^self methodArgNames , self methodVarNames ].
+    pc := context pc.
+
+    ^(1 to: self numArgs + self numVars) collect:[:i|
+        (localVariableTable nameForSlot: i atPC: pc) ? ''.
+    ].
+
+    "Created: / 18-12-2012 / 18:17:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 methodArgNames
     |nA|