perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@hyperreal.org
Subject cvs commit: modperl/src/modules/perl mod_perl.c
Date Fri, 26 Mar 1999 19:13:18 GMT
dougm       99/03/26 11:13:17

  Modified:    .        ToDo Changes
               src/modules/perl mod_perl.c
  Log:
  fix bug triggered when siggv is not initialized
  
  Revision  Changes    Path
  1.167     +0 -2      modperl/ToDo
  
  Index: ToDo
  ===================================================================
  RCS file: /home/cvs/modperl/ToDo,v
  retrieving revision 1.166
  retrieving revision 1.167
  diff -u -r1.166 -r1.167
  --- ToDo	1999/03/12 19:25:10	1.166
  +++ ToDo	1999/03/26 19:13:08	1.167
  @@ -23,8 +23,6 @@
   
   - Makefile.PL should always push load_modules.pl for 'make test' 
   
  -- siggv not initialized under DSO?  (Preston Brown)
  -
   - look at using soft_timeout instead of hard_timeout
   
   - t/modules/cookie must test have_module "CGI::Cookie"
  
  
  
  1.269     +2 -0      modperl/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.268
  retrieving revision 1.269
  diff -u -r1.268 -r1.269
  --- Changes	1999/03/26 19:08:53	1.268
  +++ Changes	1999/03/26 19:13:09	1.269
  @@ -8,6 +8,8 @@
   
   =item 1.18_01-dev
   
  +fix bug triggered when siggv is not initialized, spotted by Preston Brown
  +
   new Apache::PerlRun::flush_namespace method to undef() each [SAHC]V
   entry, rather than a blind clear (which triggered cores, e.g. sort)
   
  
  
  
  1.81      +7 -3      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.80
  retrieving revision 1.81
  diff -u -r1.80 -r1.81
  --- mod_perl.c	1999/02/01 05:41:59	1.80
  +++ mod_perl.c	1999/03/26 19:13:15	1.81
  @@ -767,10 +767,14 @@
   	}
       }
   
  -    save_hptr(&GvHV(siggv)); 
  +    if (siggv) {
  +	save_hptr(&GvHV(siggv)); 
  +    }
   
  -    save_aptr(&endav); 
  -    endav = Nullav;
  +    if (endav) {
  +	save_aptr(&endav); 
  +	endav = Nullav;
  +    }
   
       /* hookup STDIN & STDOUT to the client */
       perl_stdout2client(r);
  
  
  

Mime
View raw message