Author: rfm
Date: Tue Jul 7 14:20:44 2015
New Revision: 38759
URL: http://svn.gna.org/viewcvs/gnustep?rev=38759&view=rev
Log:
increase initial margin
Modified:
libs/ec/trunk/EcProcess.h
libs/ec/trunk/EcProcess.m
Modified: libs/ec/trunk/EcProcess.h
URL:
http://svn.gna.org/viewcvs/gnustep/libs/ec/trunk/EcProcess.h?rev=38759&r1=38758&r2=38759&view=diff
==============================================================================
--- libs/ec/trunk/EcProcess.h (original)
+++ libs/ec/trunk/EcProcess.h Tue Jul 7 14:20:44 2015
@@ -99,7 +99,9 @@
If this is not specified (or a negative or excessive value
is specified) then memory is monitored for ten minutes and
the threshold is set at the peak during that period plus a
- small margin to allow further memory growth before warning.
+ margin to allow further memory growth before warning.<br />
+ The margin is at least 20KB on a test system, 5000KB on
+ a non-test system.
</desc>
<term>EcMemoryIncrement</term>
<desc>
Modified: libs/ec/trunk/EcProcess.m
URL:
http://svn.gna.org/viewcvs/gnustep/libs/ec/trunk/EcProcess.m?rev=38759&r1=38758&r2=38759&view=diff
==============================================================================
--- libs/ec/trunk/EcProcess.m (original)
+++ libs/ec/trunk/EcProcess.m Tue Jul 7 14:20:44 2015
@@ -2349,17 +2349,28 @@
}
else
{
+ NSUInteger inc;
+
+ if (YES == [cmdDefs boolForKey: @"Memory"])
+ {
+ inc = 20;
+ }
+ else
+ {
+ inc = 5000;
+ }
+
/* Use the peak memory, plus half the difference between
* average and peak in order to provide some room for
* growth before warning.
*/
memWarn = memPeak + (memPeak - memAvge) / 2;
- if (memWarn < memPeak + 16 * 1024)
+ if (memWarn < memPeak + (inc * 1024))
{
- /* If the room for growth was very small, increase
- * to at least 16KB.
+ /* The room for growth was smaller than the margin
+ * we we expect; increase it.
*/
- memWarn = memPeak + 16 * 1024;
+ memWarn = memPeak + (inc * 1024);
}
}
if (memWarn % 1024)
_______________________________________________
Gnustep-cvs mailing list
[email protected]
https://mail.gna.org/listinfo/gnustep-cvs
