perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From ran...@apache.org
Subject cvs commit: modperl/src/modules/perl mod_perl.h perl_config.c perl_util.c
Date Fri, 14 Mar 2003 04:55:59 GMT
randyk      2003/03/13 20:55:59

  Modified:    src/modules/perl mod_perl.h perl_config.c perl_util.c
  Log:
  s/I32/U8/ to avoid warnings
  
  Revision  Changes    Path
  1.117     +1 -1      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.116
  retrieving revision 1.117
  diff -u -r1.116 -r1.117
  --- mod_perl.h	23 May 2002 04:35:16 -0000	1.116
  +++ mod_perl.h	14 Mar 2003 04:55:59 -0000	1.117
  @@ -1174,7 +1174,7 @@
   I32 perl_module_is_loaded(char *name);
   SV *perl_module2file(char *name);
   int perl_require_module(char *module, server_rec *s);
  -int perl_load_startup_script(server_rec *s, pool *p, char *script, I32 my_warn);
  +int perl_load_startup_script(server_rec *s, pool *p, char *script, U8 my_warn);
   array_header *perl_cgi_env_init(request_rec *r);
   void perl_clear_env(void);
   void mp_magic_setenv(char *key, char *val, int is_tainted);
  
  
  
  1.117     +1 -1      modperl/src/modules/perl/perl_config.c
  
  Index: perl_config.c
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/perl_config.c,v
  retrieving revision 1.116
  retrieving revision 1.117
  diff -u -r1.116 -r1.117
  --- perl_config.c	14 Mar 2003 04:45:52 -0000	1.116
  +++ perl_config.c	14 Mar 2003 04:55:59 -0000	1.117
  @@ -1536,7 +1536,7 @@
   {
       I32 alen = AvFILL(av);
       I32 i, j;
  -    I32 oldwarn = dowarn; /*XXX, hmm*/
  +    U8 oldwarn = dowarn; /*XXX, hmm*/
       dowarn = FALSE;
   
       if(!n) n = alen+1;
  
  
  
  1.51      +3 -3      modperl/src/modules/perl/perl_util.c
  
  Index: perl_util.c
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/perl_util.c,v
  retrieving revision 1.50
  retrieving revision 1.51
  diff -u -r1.50 -r1.51
  --- perl_util.c	25 Dec 2002 01:46:09 -0000	1.50
  +++ perl_util.c	14 Mar 2003 04:55:59 -0000	1.51
  @@ -470,7 +470,7 @@
       dPSRV(s);
       HV *hash = GvHV(incgv);
       HE *entry;
  -    I32 old_warn = dowarn;
  +    U8 old_warn = dowarn;
       pool *p = ap_make_sub_pool(sp);
       table *reload = ap_make_table(p, HvKEYS(hash));
       char **entries;
  @@ -573,10 +573,10 @@
       /*(void)hv_delete(GvHV(incgv), pv, strlen(pv), G_DISCARD);*/
   }      
   
  -int perl_load_startup_script(server_rec *s, pool *p, char *script, I32 my_warn)
  +int perl_load_startup_script(server_rec *s, pool *p, char *script, U8 my_warn)
   {
       dTHR;
  -    I32 old_warn = dowarn;
  +    U8 old_warn = dowarn;
   
       if(!script) {
   	MP_TRACE_d(fprintf(stderr, "no Perl script to load\n"));
  
  
  

Mime
View raw message