[libmath-prime-util-perl] 12/16: Segments were in MB instead of KB. Waaaaay too much memory

Partha P. Mukherjee ppm-guest at moszumanska.debian.org
Thu May 21 18:44:35 UTC 2015


This is an automated email from the git hooks/post-receive script.

ppm-guest pushed a commit to annotated tag v0.08
in repository libmath-prime-util-perl.

commit f3fd04edcec5aab719bfe271e612eacc624181ea
Author: Dana Jacobsen <dana at acm.org>
Date:   Thu Jun 21 18:48:23 2012 -0600

    Segments were in MB instead of KB.  Waaaaay too much memory
---
 cache.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/cache.c b/cache.c
index aecdc44..f815ad5 100644
--- a/cache.c
+++ b/cache.c
@@ -143,11 +143,11 @@ void release_prime_cache(const unsigned char* mem) {
 
 
 /* The segment everyone is trying to share */
-#define PRIMARY_SEGMENT_CHUNK_SIZE    UVCONST(256*1024*1024-16)
+#define PRIMARY_SEGMENT_CHUNK_SIZE    UVCONST(256*1024-16)
 static unsigned char* prime_segment = 0;
 static int prime_segment_is_available = 1;
 /* If that's in use, malloc a new one of this size */
-#define SECONDARY_SEGMENT_CHUNK_SIZE  UVCONST( 64*1024*1024-16)
+#define SECONDARY_SEGMENT_CHUNK_SIZE  UVCONST( 64*1024-16)
 
 unsigned char* get_prime_segment(UV *size) {
   unsigned char* mem;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git



More information about the Pkg-perl-cvs-commits mailing list