[svn:modperl-modules] rev 181 - Apache-Scoreboard-1.0/trunk

Author: stas
Date: Fri Mar 11 16:06:12 2005
New Revision: 181

Modified:
   Apache-Scoreboard-1.0/trunk/Changes
   Apache-Scoreboard-1.0/trunk/Scoreboard.xs
Log:
use PERL_NO_GET_CONTEXT macro to make the module run faster under
ithreads-enabled perl


Modified: Apache-Scoreboard-1.0/trunk/Changes
==============================================================================
--- Apache-Scoreboard-1.0/trunk/Changes	(original)
+++ Apache-Scoreboard-1.0/trunk/Changes	Fri Mar 11 16:06:12 2005
@@ -1,4 +1,9 @@
-0.15 - dev 
+0.15 - Fri Mar 11 18:51:32 EST 2005
+
+use PERL_NO_GET_CONTEXT macro to make the module run faster under
+ithreads-enabled perl
+
+fix req_time doc (returns msec, not usec)
 
 added a new method $image->server_limit, which is the same as
 HARD_SERVER_LIMIT added for future compat with Apache::Scoreboard 2.x.

Modified: Apache-Scoreboard-1.0/trunk/Scoreboard.xs
==============================================================================
--- Apache-Scoreboard-1.0/trunk/Scoreboard.xs	(original)
+++ Apache-Scoreboard-1.0/trunk/Scoreboard.xs	Fri Mar 11 16:06:12 2005
@@ -1,3 +1,4 @@
+#define PERL_NO_GET_CONTEXT /* we want efficiency */
 #include "modules/perl/mod_perl.h"
 #include "scoreboard.h"
 
@@ -58,7 +59,7 @@
     status_flags[SERVER_GRACEFUL] = 'G';
 }
 
-static SV *size_string(size_t size)
+static SV *size_string(pTHX_ size_t size)
 {
     SV *sv = newSVpv("    -", 5);
     if (size == (size_t)-1) {
@@ -111,6 +112,12 @@
 size_string(size)
     size_t size
 
+    CODE:
+    RETVAL = size_string(aTHX_ size);
+
+    OUTPUT:
+    RETVAL
+
 int
 scoreboard_send(r)
     Apache r