752
|
1 |
"/
|
|
2 |
"/ base system
|
|
3 |
"/
|
|
4 |
Smalltalk fileIn:'loadClasses'.
|
|
5 |
!
|
|
6 |
|
|
7 |
Java initialize.
|
|
8 |
JavaVM initialize.
|
|
9 |
JavaVM initializeVM.
|
|
10 |
!
|
|
11 |
|
|
12 |
|p|
|
|
13 |
|
|
14 |
(Java classForName:'netscape.applet.MozillaAppletContext') isNil ifTrue:[
|
|
15 |
(p := Smalltalk getResourceFileName:'java/ns30_unix.zip' forPackage:'stx:libjava') notNil
|
|
16 |
ifTrue:[
|
|
17 |
Java addToClassPath:p.
|
|
18 |
] ifFalse:[
|
|
19 |
'../../libjava/java/java/ns30_unix.zip' asFilename exists ifTrue:[
|
|
20 |
Java addToClassPath:'../../../cg/java/java/ns30_unix.zip'.
|
|
21 |
] ifFalse:[
|
|
22 |
'C:\Programme\eXept\SmalltalkX\packages\stx\libjava\java\ns30_unix.zip' asFilename exists ifTrue:[
|
|
23 |
Java addToClassPath:'C:\Programme\eXept\SmalltalkX\packages\stx\libjava\java\ns30_unix.zip'.
|
|
24 |
]
|
|
25 |
]
|
|
26 |
]
|
|
27 |
].
|
|
28 |
!
|
|
29 |
|
|
30 |
|