[unix-history] / usr / src / usr.bin / f77 / libU77 / getuid_.c

/*
char id_getuid[] = "@(#)getuid_.c	1.1";
 *
 * get user id
 *
 * calling sequence:
 *	integer getuid, uid
 *	uid = getuid()
 * where:
 *	uid will be the real user id
 */

long getuid_()
{
	return((long)getuid());
}
Commit	Line	Data
7740b891 DW	1	/*
	2	char id_getuid[] = "@(#)getuid_.c 1.1";
	3	*
	4	* get user id
	5	*
	6	* calling sequence:
	7	* integer getuid, uid
	8	* uid = getuid()
	9	* where:
	10	* uid will be the real user id
	11	*/
	12
	13	long getuid_()
	14	{
	15	return((long)getuid());
	16	}