# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 847477711 -3600
# Node ID 214f42e298680e3dd4d4516614677dc23312f0d2
# Parent  e1a56370a833dece182b15795c031ab572573911
remember just-in-time state in image

diff -r e1a56370a833 -r 214f42e29868 ObjMem.st
--- a/ObjMem.st	Fri Nov 08 16:27:05 1996 +0100
+++ b/ObjMem.st	Fri Nov 08 19:28:31 1996 +0100
@@ -25,7 +25,7 @@
 		BackgroundFinalizationProcess FinalizationSemaphore Dependents
 		ImageName ImageSaveTime ChangeFileName MaxInterruptLatency
 		InterruptLatencyGoal VMSelectors DynamicCodeGCTrigger
-		DynamicCodeLimit'
+		DynamicCodeLimit JustInTimeCompilationEnabled'
 	poolDictionaries:''
 	category:'System-Support'
 !
@@ -2667,6 +2667,10 @@
 justInTimeCompilation:aBoolean
     "enable/disable just-in-time-compilation. Returns the previous setting."
 
+    aBoolean notNil ifTrue:[
+        JustInTimeCompilationEnabled := aBoolean.
+    ].
+
 %{  /* NOCONTEXT */
     extern int __justInTimeCompilation();
     int prev;
@@ -3838,6 +3842,6 @@
 !ObjectMemory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ObjMem.st,v 1.120 1996-11-07 18:54:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ObjMem.st,v 1.121 1996-11-08 18:28:31 cg Exp $'
 ! !
 ObjectMemory initialize!
diff -r e1a56370a833 -r 214f42e29868 ObjectMemory.st
--- a/ObjectMemory.st	Fri Nov 08 16:27:05 1996 +0100
+++ b/ObjectMemory.st	Fri Nov 08 19:28:31 1996 +0100
@@ -25,7 +25,7 @@
 		BackgroundFinalizationProcess FinalizationSemaphore Dependents
 		ImageName ImageSaveTime ChangeFileName MaxInterruptLatency
 		InterruptLatencyGoal VMSelectors DynamicCodeGCTrigger
-		DynamicCodeLimit'
+		DynamicCodeLimit JustInTimeCompilationEnabled'
 	poolDictionaries:''
 	category:'System-Support'
 !
@@ -2667,6 +2667,10 @@
 justInTimeCompilation:aBoolean
     "enable/disable just-in-time-compilation. Returns the previous setting."
 
+    aBoolean notNil ifTrue:[
+        JustInTimeCompilationEnabled := aBoolean.
+    ].
+
 %{  /* NOCONTEXT */
     extern int __justInTimeCompilation();
     int prev;
@@ -3838,6 +3842,6 @@
 !ObjectMemory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.120 1996-11-07 18:54:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.121 1996-11-08 18:28:31 cg Exp $'
 ! !
 ObjectMemory initialize!