--- 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!
--- 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!