This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
RE: [perl #26136] localtime(3) calls tzset(3), but localtime_r(3) may not.
[metaconfig.git] / U / modified / d_getsrvby.U
1 ?RCS: $Id: d_getsrvby.U,v $
2 ?RCS:
3 ?RCS: Copyright (c) 1998 Andy Dougherty
4 ?RCS:
5 ?RCS: You may distribute under the terms of either the GNU General Public
6 ?RCS: License or the Artistic License, as specified in the README file.
7 ?RCS:
8 ?MAKE:d_getsbyname d_getsbyport: Inlibc
9 ?MAKE:  -pick add $@ %<
10 ?S:d_getsbyname:
11 ?S:     This variable conditionally defines the HAS_GETSERVBYNAME 
12 ?S:     symbol, which indicates to the C program that the 
13 ?S:     getservbyname() routine is available to look up services
14 ?S:     by their name.
15 ?S:.
16 ?S:d_getsbyport:
17 ?S:     This variable conditionally defines the HAS_GETSERVBYPORT 
18 ?S:     symbol, which indicates to the C program that the 
19 ?S:     getservbyport() routine is available to look up services
20 ?S:     by their port.
21 ?S:.
22 ?C:HAS_GETSERVBYNAME:
23 ?C:     This symbol, if defined, indicates that the getservbyname()
24 ?C:     routine is available to look up services by their name.
25 ?C:.
26 ?C:HAS_GETSERVBYPORT:
27 ?C:     This symbol, if defined, indicates that the getservbyport()
28 ?C:     routine is available to look up services by their port.
29 ?C:.
30 ?H:#$d_getsbyname HAS_GETSERVBYNAME             /**/
31 ?H:#$d_getsbyport HAS_GETSERVBYPORT             /**/
32 ?H:.
33 ?LINT:set d_getsbyname d_getsbyport
34
35 @if d_getsbyname || HAS_GETSERVBYNAME
36 : see if getservbyname exists
37 set getservbyname d_getsbyname
38 eval $inlibc
39 @end
40
41 @if d_getsbyport || HAS_GETSERVBYPORT
42 : see if getservbyport exists
43 set getservbyport d_getsbyport
44 eval $inlibc
45 @end
46