This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add IP probe for ip_mreq
[metaconfig.git] / U / modified / d_getsrvby.U
CommitLineData
959f3c4c
JH
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:
2f125bce
MB
11?S: This variable conditionally defines the HAS_GETSERVBYNAME
12?S: symbol, which indicates to the C program that the
959f3c4c
JH
13?S: getservbyname() routine is available to look up services
14?S: by their name.
15?S:.
16?S:d_getsbyport:
2f125bce
MB
17?S: This variable conditionally defines the HAS_GETSERVBYPORT
18?S: symbol, which indicates to the C program that the
959f3c4c
JH
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
2f125bce 34: Optional checks for getsbyname and getsbyport
959f3c4c
JH
35
36@if d_getsbyname || HAS_GETSERVBYNAME
37: see if getservbyname exists
38set getservbyname d_getsbyname
39eval $inlibc
40@end
41
42@if d_getsbyport || HAS_GETSERVBYPORT
43: see if getservbyport exists
44set getservbyport d_getsbyport
45eval $inlibc
46@end
47