loadAll
author Jan Vrany <jan.vrany@fit.cvut.cz>
Fri, 19 Apr 2013 13:50:19 +0200
branchdevelopment
changeset 2532 64a784c73d1e
parent 2380 9195eccdcbd9
permissions -rw-r--r--
Update bytecode and constpool upon context restart. This way the restarted method can execute new code. This allows for fix & continue workflow. Should check for exceptions - will do it later.

"/
"/ base system
"/
Smalltalk fileIn:'loadClasses'.
!

Java initialize.
JavaVM initialize.
JavaVM initializeVM.
!

|p|

(Java classForName:'netscape.applet.MozillaAppletContext') isNil ifTrue:[
    (p := Smalltalk getResourceFileName:'java/ns30_unix.zip' forPackage:'stx:libjava') notNil
    ifTrue:[
	Java addToClassPath:p.
    ] ifFalse:[
	'../../libjava/java/java/ns30_unix.zip' asFilename exists ifTrue:[
	    Java addToClassPath:'../../../cg/java/java/ns30_unix.zip'.
	] ifFalse:[
	    'C:\Programme\eXept\SmalltalkX\packages\stx\libjava\java\ns30_unix.zip' asFilename exists ifTrue:[
		Java addToClassPath:'C:\Programme\eXept\SmalltalkX\packages\stx\libjava\java\ns30_unix.zip'.
	     ]
	]
    ]
].
!