blob: 9a2bcf37b53c71a53d8cf429e17458e217af1d67 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
?RCS: $Id: d_getwd.U 1 2006-08-24 12:32:52Z rmanfredi $
?RCS:
?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
?RCS:
?RCS: You may redistribute only under the terms of the Artistic Licence,
?RCS: as specified in the README file that comes with the distribution.
?RCS: You may reuse parts of this distribution only within the terms of
?RCS: that same Artistic Licence; a copy of which may be found at the root
?RCS: of the source tree for dist 4.0.
?RCS:
?RCS: $Log: d_getwd.U,v $
?RCS: Revision 3.0 1993/08/18 12:06:18 ram
?RCS: Baseline for dist 3.0 netwide release.
?RCS:
?MAKE:d_getwd: Csym Setvar
?MAKE: -pick add $@ %<
?S:d_getwd:
?S: This variable conditionally defines HAS_GETWD if getwd() is
?S: available to get working directory. If not, you should
?S: probably use getcwd().
?S:.
?C:HAS_GETWD (GETWD):
?C: This symbol, if defined, indicates that the getwd routine is
?C: available to get working directory. If not, you should
?C: probably use getcwd().
?C:.
?H:#$d_getwd HAS_GETWD /**/
?H:.
?LINT:set d_getwd
: see if getwd exists
echo " "
if set getwd val -f d_getwd; eval $csym; $val; then
echo 'getwd() found.' >&4
val="$define"
else
echo 'getwd() not found. Assuming getcwd() exists.' >&4
val="$undef"
fi
set d_getwd
eval $setvar
|
