Added some comments and removed some Lint complaints
This commit is contained in:
parent
774ce1ecc3
commit
d068cf64b3
1 changed files with 8 additions and 1 deletions
|
@ -42,18 +42,25 @@ extern RENAME();
|
||||||
extern string libpath();
|
extern string libpath();
|
||||||
|
|
||||||
UNLINK(x) string x; {
|
UNLINK(x) string x; {
|
||||||
|
/* Must remove the file "x" */
|
||||||
|
|
||||||
unlink(x); /* systemcall to remove file */
|
unlink(x); /* systemcall to remove file */
|
||||||
}
|
}
|
||||||
|
|
||||||
RENAME(x,y) string x,y; {
|
RENAME(x,y) string x,y; {
|
||||||
|
/* Must move the file "x" to the file "y" */
|
||||||
|
|
||||||
unlink(y);
|
unlink(y);
|
||||||
if(link(x,y)!=0)fatal(1,"Cannot link to %s",y);
|
if(link(x,y)!=0)fatal(1,"Cannot link to %s",y);
|
||||||
unlink(x);
|
unlink(x);
|
||||||
}
|
}
|
||||||
|
|
||||||
string
|
string
|
||||||
libpath(s) char *s; {
|
libpath(s) string s; {
|
||||||
|
/* Must deliver a full pathname to the library file "s" */
|
||||||
|
|
||||||
static char buf[100];
|
static char buf[100];
|
||||||
|
string strcpy(), strcat();
|
||||||
|
|
||||||
strcpy(buf,EM_DIR);
|
strcpy(buf,EM_DIR);
|
||||||
strcat(buf,"/lib/LLgen/");
|
strcat(buf,"/lib/LLgen/");
|
||||||
|
|
Loading…
Add table
Reference in a new issue