develooper Front page | perl.perl5.porters | Postings from February 2000

Re: [Fwd: before perl 5.6 gets out the door ...]

Thread Next
From:
John Tobey
Date:
February 25, 2000 15:05
Subject:
Re: [Fwd: before perl 5.6 gets out the door ...]
Message ID:
m12OTmx-000FRSC@feynman.localnet
Cameron Simpson wrote:
> 
> Could I ask that someone test making the Apache mod_perl module
> against it? I tried against the then-current development perl
> a few weeks ago and had no joy. This module's fairly important to
> a number of people and seems like a worthwhile pretest.

We have been using mod_perl 1.21 with Perl 5.005_63 and HTML::Embperl
1.2.1 for three weeks in a development/demo environment.  I made a
couple of hacks (patch below) to get it compiled.  I'm not sure about
the effect of commenting out the saving of GvHV(siggv) (aka %SIG, I
believe).  Our app does not touch %SIG.

-John

-- 
John Tobey, late nite hacker <jtobey@john-edwin-tobey.org>
\\\                                                               ///
]]]             With enough bugs, all eyes are shallow.           [[[
///                                                               \\\


--- apache_1.3.11/src/modules/perl/mod_perl.c~	Tue Feb  1 21:15:05 2000
+++ apache_1.3.11/src/modules/perl/mod_perl.c	Tue Feb  1 22:23:03 2000
@@ -780,9 +780,9 @@
 	}
     }
 
-    if (siggv) {
+    /*    if (siggv) {
 	save_hptr(&GvHV(siggv)); 
-    }
+	}*/
 
     if (endav) {
 	save_aptr(&endav); 
--- apache_1.3.11/src/modules/perl/mod_perl.h~	Tue Feb  1 21:15:05 2000
+++ apache_1.3.11/src/modules/perl/mod_perl.h	Tue Feb  1 22:30:40 2000
@@ -1,3 +1,9 @@
+#define PERL_POLLUTE
+#define perl_eval_pv Perl_eval_pv
+#define perl_eval_sv Perl_eval_sv
+#define perl_call_sv Perl_call_sv
+#define perl_call_method Perl_call_method
+
 #ifdef WIN32
 #define NO_PERL_CHILD_INIT
 #define NO_PERL_CHILD_EXIT
--- HTML-Embperl-1.2.1/embperl.h~	Wed Jan  5 01:49:46 2000
+++ HTML-Embperl-1.2.1/embperl.h	Tue Feb  1 23:00:26 2000
@@ -1,3 +1,10 @@
+#define perl_eval_pv Perl_eval_pv
+#define perl_eval_sv Perl_eval_sv
+#define perl_call_sv Perl_call_sv
+#define perl_call_method Perl_call_method
+
+
+
 /*###################################################################################
 #
 #   Embperl - Copyright (c) 1997-1999 Gerald Richter / ECOS

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About