This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove spurious LINT: directives
[metaconfig.git] / U / threads / d_srand48_r.U
CommitLineData
0ed44c70 1?RCS: $Id: d_srand48_r.U,v 0RCS:
55e6b58d 2?RCS: Copyright (c) 2002,2003 Jarkko Hietaniemi
0ed44c70
JH
3?RCS:
4?RCS: You may distribute under the terms of either the GNU General Public
5?RCS: License or the Artistic License, as specified in the README file.
6?RCS:
7?RCS: Generated by the reentr.pl from the Perl 5.8 distribution.
8?RCS:
89d9cf69 9?MAKE:d_srand48_r srand48_r_proto: Inlibc Protochk Hasproto i_systypes usethreads i_stdlib
eed88ce0 10?MAKE: -pick add $@ %<
959f3c4c 11?S:d_srand48_r:
eed88ce0
JH
12?S: This variable conditionally defines the HAS_SRAND48_R symbol,
13?S: which indicates to the C program that the srand48_r()
14?S: routine is available.
46953654
JH
15?S:.
16?S:srand48_r_proto:
eed88ce0 17?S: This variable encodes the prototype of srand48_r.
05fdd8fd
JH
18?S: It is zero if d_srand48_r is undef, and one of the
19?S: REENTRANT_PROTO_T_ABC macros of reentr.h if d_srand48_r
20?S: is defined.
959f3c4c
JH
21?S:.
22?C:HAS_SRAND48_R:
eed88ce0
JH
23?C: This symbol, if defined, indicates that the srand48_r routine
24?C: is available to srand48 re-entrantly.
46953654
JH
25?C:.
26?C:SRAND48_R_PROTO:
eed88ce0 27?C: This symbol encodes the prototype of srand48_r.
05fdd8fd
JH
28?C: It is zero if d_srand48_r is undef, and one of the
29?C: REENTRANT_PROTO_T_ABC macros of reentr.h if d_srand48_r
30?C: is defined.
959f3c4c 31?C:.
eed88ce0
JH
32?H:#$d_srand48_r HAS_SRAND48_R /**/
33?H:#define SRAND48_R_PROTO $srand48_r_proto /**/
959f3c4c 34?H:.
f42a43f5 35?T:try hdrs d_srand48_r_proto
959f3c4c
JH
36: see if srand48_r exists
37set srand48_r d_srand48_r
38eval $inlibc
46953654
JH
39case "$d_srand48_r" in
40"$define")
f2dee704 41 hdrs="$i_systypes sys/types.h define stdio.h $i_stdlib stdlib.h"
9bb0d1dd
JH
42 case "$d_srand48_r_proto:$usethreads" in
43 ":define") d_srand48_r_proto=define
f42a43f5
JH
44 set d_srand48_r_proto srand48_r $hdrs
45 eval $hasproto ;;
46 *) ;;
47 esac
48 case "$d_srand48_r_proto" in
49 define)
46953654 50 case "$srand48_r_proto" in
5002a627 51 ''|0) try='int srand48_r(long, struct drand48_data*);'
f2dee704 52 ./protochk "extern $try" $hdrs && srand48_r_proto=I_LS ;;
46953654
JH
53 esac
54 case "$srand48_r_proto" in
81d83c43 55 ''|0) d_srand48_r=undef
5002a627 56 srand48_r_proto=0
f42a43f5 57 echo "Disabling srand48_r, cannot determine prototype." >&4 ;;
f2dee704
JH
58 * ) case "$srand48_r_proto" in
59 REENTRANT_PROTO*) ;;
60 *) srand48_r_proto="REENTRANT_PROTO_$srand48_r_proto" ;;
61 esac
62 echo "Prototype: $try" ;;
46953654
JH
63 esac
64 ;;
9bb0d1dd
JH
65 *) case "$usethreads" in
66 define) echo "srand48_r has no prototype, not using it." >&4 ;;
67 esac
81d83c43
JH
68 d_srand48_r=undef
69 srand48_r_proto=0
9bb0d1dd 70 ;;
f42a43f5
JH
71 esac
72 ;;
5002a627
JH
73*) srand48_r_proto=0
74 ;;
46953654 75esac
959f3c4c 76