You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@apache.org on 2002/03/13 18:21:53 UTC

cvs commit: modperl-2.0/src/modules/perl modperl_log.h

dougm       02/03/13 09:21:53

  Modified:    src/modules/perl modperl_log.h
  Log:
  Submitted by:   Philippe M. Chiasson <go...@cpan.org>
  Reviewed by:	dougm
  fix MP_FUNC for gcc3
  
  Revision  Changes    Path
  1.7       +9 -4      modperl-2.0/src/modules/perl/modperl_log.h
  
  Index: modperl_log.h
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_log.h,v
  retrieving revision 1.6
  retrieving revision 1.7
  diff -u -r1.6 -r1.7
  --- modperl_log.h	11 Oct 2001 19:14:06 -0000	1.6
  +++ modperl_log.h	13 Mar 2002 17:21:53 -0000	1.7
  @@ -2,10 +2,15 @@
   #define MODPERL_LOG_H
   
   #ifdef MP_TRACE
  -/* XXX: not every cc supports this
  - * sort out later
  - */
  -#   define MP_FUNC __FUNCTION__
  +#   if defined(__GNUC__)
  +#      if (__GNUC__ > 2)
  +#         define MP_FUNC __func__
  +#      else
  +#         define MP_FUNC __FUNCTION__
  +#      endif
  +#   else
  +#      define MP_FUNC "MP_FUNC"
  +#   endif
   #else
   #   define MP_FUNC "MP_FUNC"
   #endif