Subversion Repositories planix.SVN

Rev

Rev 51 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 51 Rev 52
Line -... Line 1...
- 
 
 1 
#include <u.h>
- 
 
 2 
#include <lib9.h>
1 
 
 3 
 
2 
#include <stdlib.h>
 4 
#include <stdlib.h>
3 
 
 5 
 
4 
char * __progname;
 6 
const char * __progname = nil;
5 
 
 7 
 
6 
const char *
 8 
const char *
7 
_getprogname(void)
 9 
getprogname(void)
8 
{
 10 
{
- 
 
 11 
 
- 
 
 12 
	if ( __progname == nil )
- 
 
 13 
		setprogname(getenv("_"));
9 
 
 14 
 
10 
	return (__progname);
 15 
	return (__progname);
11 
}
 16 
}