perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@apache.org
Subject cvs commit: modperl/src/modules/perl mod_perl.c mod_perl.h
Date Thu, 23 May 2002 04:35:16 GMT
dougm       02/05/22 21:35:16

  Modified:    src/modules/perl mod_perl.c mod_perl.h
  Log:
  fix fix to compile with ithreads
  
  Revision  Changes    Path
  1.145     +2 -2      modperl/src/modules/perl/mod_perl.c
  
  Index: mod_perl.c
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/mod_perl.c,v
  retrieving revision 1.144
  retrieving revision 1.145
  diff -u -r1.144 -r1.145
  --- mod_perl.c	23 May 2002 04:03:46 -0000	1.144
  +++ mod_perl.c	23 May 2002 04:35:16 -0000	1.145
  @@ -578,9 +578,9 @@
       perl_require_module("DynaLoader", NULL);
   }
   
  -static void mod_perl_xs_init(void)
  +static void mod_perl_xs_init(pTHX)
   {
  -    xs_init();
  +    xs_init(aTHX);
   
       /* XXX: in 5.7.2+ we can call the body of mod_perl_boot here
        * but in 5.6.1 the Perl runtime is not properly setup yet
  
  
  
  1.116     +2 -0      modperl/src/modules/perl/mod_perl.h
  
  Index: mod_perl.h
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/mod_perl.h,v
  retrieving revision 1.115
  retrieving revision 1.116
  diff -u -r1.115 -r1.116
  --- mod_perl.h	23 May 2002 04:03:46 -0000	1.115
  +++ mod_perl.h	23 May 2002 04:35:16 -0000	1.116
  @@ -168,6 +168,8 @@
   #ifndef PERL_IS_5_6
   #define pTHX_
   #define aTHXo_
  +#define aTHX
  +#define pTHX
   #define CopFILEGV(cop) cop->cop_filegv
   #define CopLINE(cop)   cop->cop_line
   #define CopLINE_set(c,l) (CopLINE(c) = (l))
  
  
  

Mime
View raw message