JavaClass.st
changeset 581 124338be273b
parent 570 ebcfa3ec6d5d
child 582 0796f6db7c14
--- a/JavaClass.st	Wed Jul 14 10:52:53 1999 +0000
+++ b/JavaClass.st	Wed Jul 14 16:32:27 1999 +0000
@@ -1109,6 +1109,24 @@
     "Modified: / 13.11.1998 / 14:10:45 / cg"
 !
 
+newWith_String:argString
+    "create a new instance, preset its fields,
+     and call its JAVA init function passing a String arg"
+
+    |newJavaObject|
+
+    newJavaObject := self newCleared.
+    newJavaObject perform:#'<init>(Ljava/lang/String;)V' with:(Java as_String:argString).
+    ^ newJavaObject
+
+    "
+     ((Java classNamed:'java.lang.ArrayStoreException') newWith_String:'foo') inspect
+    "
+
+    "Modified: / 4.11.1998 / 18:04:34 / cg"
+    "Created: / 13.11.1998 / 14:17:01 / cg"
+!
+
 newWith_int:arg
     "create a new instance, preset its fields,
      and call its JAVA init function passing an int arg"
@@ -1666,6 +1684,6 @@
 !JavaClass class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClass.st,v 1.101 1999/07/11 00:40:55 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClass.st,v 1.102 1999/07/14 16:32:27 cg Exp $'
 ! !
 JavaClass initialize!