checkin from browser
authorcg
Thu, 10 Dec 1998 20:50:59 +0000
changeset 492 ed7000cb1b62
parent 491 5623ece3bf3c
child 493 7e16e004250e
checkin from browser
JavaClass.st
--- a/JavaClass.st	Thu Dec 10 18:37:21 1998 +0000
+++ b/JavaClass.st	Thu Dec 10 20:50:59 1998 +0000
@@ -1266,6 +1266,29 @@
 
     "Modified: / 15.1.1998 / 00:31:27 / cg"
     "Created: / 12.11.1998 / 16:29:20 / cg"
+!
+
+performStatic:selector with:arg
+    "send a static message, with one args."
+
+    |javaMethod sel|
+
+    sel := selector asSymbolIfInterned.
+    sel notNil ifTrue:[
+        javaMethod := methodDictionary at:sel.
+        javaMethod notNil ifTrue:[
+            javaMethod isStatic ifTrue:[
+                ^ javaMethod 
+                    valueWithReceiver:self 
+                    arguments:(Array with:arg)
+            ]
+        ].
+    ].
+
+    ^ self doesNotUnderstand:(Message selector:selector argument:arg)
+
+    "Modified: / 15.1.1998 / 00:31:27 / cg"
+    "Created: / 10.12.1998 / 21:50:29 / cg"
 ! !
 
 !JavaClass methodsFor:'printOut'!
@@ -1652,6 +1675,6 @@
 !JavaClass class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClass.st,v 1.94 1998/11/17 19:19:59 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClass.st,v 1.95 1998/12/10 20:50:59 cg Exp $'
 ! !
 JavaClass initialize!