ObjectMemory.st
branchjv
changeset 17836 525ed10af75a
parent 17835 67648e9f2814
child 17841 7abcc4aef871
--- a/ObjectMemory.st	Sat Apr 23 11:55:48 2011 +0100
+++ b/ObjectMemory.st	Sat Apr 23 17:27:23 2011 +0100
@@ -3752,9 +3752,13 @@
     "return the setting of the optimize contexts flag"
 
 %{  /* NOCONTEXT */
+#ifndef WIN32
     extern int __optimizeContexts();
 
     RETURN (__optimizeContexts(-1) ? true : false);
+#else
+	RETURN ( true );
+#endif
 %}
     "
      ObjectMemory optimizeContexts
@@ -3768,6 +3772,7 @@
      Execution is a bit slower if enabled."
 
 %{  /* NOCONTEXT */
+#ifndef WIN32
     extern int __optimizeContexts();
     int prev;
 
@@ -3777,6 +3782,9 @@
 					? 0
 					: -1);
     RETURN (prev ? true : false);
+#else
+	RETURN ( true );
+#endif
 %}
     "
      ObjectMemory optimizeContexts:true
@@ -5441,7 +5449,7 @@
 !ObjectMemory class methodsFor:'documentation'!
 
 version
-    ^ '$Id: ObjectMemory.st 10633 2011-04-23 10:55:48Z vranyj1 $'
+    ^ '$Id: ObjectMemory.st 10635 2011-04-23 16:27:23Z vranyj1 $'
 !
 
 version_CVS
@@ -5449,7 +5457,7 @@
 !
 
 version_SVN
-    ^ '$Id: ObjectMemory.st 10633 2011-04-23 10:55:48Z vranyj1 $'
+    ^ '$Id: ObjectMemory.st 10635 2011-04-23 16:27:23Z vranyj1 $'
 ! !
 
 ObjectMemory initialize!