develooper Front page | perl.perl5.porters | Postings from July 2003

Re: Which platforms need symbols to export to be explicitly listed?

From:
Stas Bekman
Date:
July 30, 2003 09:54
Subject:
Re: Which platforms need symbols to export to be explicitly listed?
Message ID:
3F27F7DE.3040301@stason.org
Steve Hay wrote:
[...]
> 
> #if PERL_VERSION >= 8 && ((!defined(WIN32) && !defined(NETWARE) && 
> !defined(OS2) && !defined(_AIX) && !defined(MACOS_TRADITIONAL) && 
> !defined(VMS)) || PERL_SUBVERSION >= 1)
> ...
> #endif

Since you want to handle specially the case of 5.8.0 on specific platforms, it 
probably will read much better as:

#if PERL_REVISION == 5 && PERL_VERSION == 8 && PERL_SUBVERSION == 0 && \
   (defined(WIN32) || defined(NETWARE) || defined(OS2) || \
    defined(_AIX) || defined(MACOS_TRADITIONAL) || defined(VMS))

and you can easily NOT it, rather than doing ! on each element. Also notice 
that I've added PERL_REVISION, which makes it easier to understand which perl 
we are talking about.

__________________________________________________________________
Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/     mod_perl Guide ---> http://perl.apache.org
mailto:stas@stason.org http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org   http://ticketmaster.com




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