loadAll
author Claus Gittinger <cg@exept.de>
Wed, 26 Jun 2019 22:06:15 +0200
branchcvs_MAIN
changeset 3917 94088b7097d5
parent 638 f49f34dedcf7
child 2380 9195eccdcbd9
permissions -rw-r--r--
#OTHER by cg +bracketStrings
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
403
32b3d1b4fdf5 *** empty log message ***
cg
parents: 389
diff changeset
     1
"/
32b3d1b4fdf5 *** empty log message ***
cg
parents: 389
diff changeset
     2
"/ base system
32b3d1b4fdf5 *** empty log message ***
cg
parents: 389
diff changeset
     3
"/
636
e54ec46157d3 *** empty log message ***
cg
parents: 634
diff changeset
     4
Smalltalk fileIn:'loadClasses'.
30
a85fb8f85586 *** empty log message ***
cg
parents: 20
diff changeset
     5
!
a85fb8f85586 *** empty log message ***
cg
parents: 20
diff changeset
     6
458
8d965d791b0a *** empty log message ***
cg
parents: 424
diff changeset
     7
Java initialize.
8d965d791b0a *** empty log message ***
cg
parents: 424
diff changeset
     8
JavaVM initialize.
8d965d791b0a *** empty log message ***
cg
parents: 424
diff changeset
     9
JavaVM initializeVM.
501
171e912a334c *** empty log message ***
cg
parents: 500
diff changeset
    10
!
131
1087f929bf55 *** empty log message ***
cg
parents: 107
diff changeset
    11
634
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    12
|p|
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    13
500
425d1df4be6b *** empty log message ***
cg
parents: 458
diff changeset
    14
(Java classForName:'netscape.applet.MozillaAppletContext') isNil ifTrue:[
634
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    15
    (p := Smalltalk getResourceFileName:'java/ns30_unix.zip' forPackage:'stx:libjava') notNil
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    16
    ifTrue:[
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    17
	Java addToClassPath:p.
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    18
    ] ifFalse:[
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    19
	'../../libjava/java/java/ns30_unix.zip' asFilename exists ifTrue:[
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    20
	    Java addToClassPath:'../../../cg/java/java/ns30_unix.zip'.
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    21
	] ifFalse:[
638
f49f34dedcf7 *** empty log message ***
cg
parents: 636
diff changeset
    22
	    'C:\Programme\eXept\SmalltalkX\packages\stx\libjava\java\ns30_unix.zip' asFilename exists ifTrue:[
f49f34dedcf7 *** empty log message ***
cg
parents: 636
diff changeset
    23
		Java addToClassPath:'C:\Programme\eXept\SmalltalkX\packages\stx\libjava\java\ns30_unix.zip'.
634
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    24
	     ]
c5a9d34c6ae5 *** empty log message ***
cg
parents: 574
diff changeset
    25
	]
500
425d1df4be6b *** empty log message ***
cg
parents: 458
diff changeset
    26
    ]
424
6ab47d2f7e8d *** empty log message ***
cg
parents: 411
diff changeset
    27
].
411
7702650e7c0e *** empty log message ***
cg
parents: 403
diff changeset
    28
!
7702650e7c0e *** empty log message ***
cg
parents: 403
diff changeset
    29
458
8d965d791b0a *** empty log message ***
cg
parents: 424
diff changeset
    30