The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
?RCS: $Id: d_getlogin.U,v 3.0.1.1 1994/08/29 16:07:41 ram Exp $
?RCS:
?RCS: Copyright (c) 1991-1993, 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 3.0.
?RCS:
?RCS: Original Author: Andy Dougherty <doughera@lafcol.lafayette.edu>
?RCS:
?RCS: $Log: d_getlogin.U,v $
?RCS: Revision 3.0.1.1  1994/08/29  16:07:41  ram
?RCS: patch32: created by ADO
?RCS:
?MAKE:d_getlogin: Inlibc
?MAKE:	-pick add $@ %<
?S:d_getlogin:
?S:	This variable conditionally defines the HAS_GETLOGIN symbol, which
?S:	indicates to the C program that the getlogin() routine is available
?S:	to get the login name.
?S:.
?C:HAS_GETLOGIN :
?C:	This symbol, if defined, indicates that the getlogin routine is
?C:	available to get the login name.
?C:.
?H:#$d_getlogin HAS_GETLOGIN		/**/
?H:.
?LINT:set d_getlogin
: see if getlogin exists
set getlogin d_getlogin
eval $inlibc