1812
|
1 |
"{ Package: 'stx:libjava' }"!
|
|
2 |
|
|
3 |
!(Java classForName:'java.lang.String') class methodsFor:'queries'!
|
|
4 |
|
|
5 |
javaWrap: object
|
|
6 |
object isNil ifTrue:[ ^ nil ].
|
|
7 |
^self basicNew perform: #'<init>([C)V' with: object
|
|
8 |
! !
|
|
9 |
|
|
10 |
!(Java classForName:'java.lang.String') class methodsFor:'queries'!
|
|
11 |
|
|
12 |
javaWrapRequired
|
|
13 |
"Returns true, if a #javaWrap: has to be called
|
|
14 |
prior an instance of Smalltalk object is passed
|
|
15 |
as an argument to Java method, whoose formal tyoe
|
|
16 |
is the receiver."
|
|
17 |
|
|
18 |
^true
|
|
19 |
! !
|
|
20 |
|