d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

made easier to patch

Browse source
This commit is contained in:
ceriel 1988-08-19 13:26:27 +00:00
parent 7ee4487924
commit b1712321e2
2 changed files with 8 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lang/pc/libpc/catch.c
View file

@ -23,6 +23,8 @@
#define MESLEN 30 #define MESLEN 30
#define PATHLEN 100 #define PATHLEN 100
/* to make it easier to patch ... */
char emdir[64] = EM_DIR;
extern struct file *_curfil; extern struct file *_curfil;
extern int _pargc; extern int _pargc;
@ -68,7 +70,7 @@ _catch(erno) unsigned erno; {
*qq++ = _curfil->fname; *qq++ = _curfil->fname;
*qq++ = ": "; *qq++ = ": ";
} }
if ( (i=strtobuf(EM_DIR,filename,PATHLEN)) >= PATHLEN-1 || if ( (i=strtobuf(emdir,filename,PATHLEN)) >= PATHLEN-1 ||
(filename[i]='/' , (filename[i]='/' ,
strtobuf(RTERR_PATH,filename+i+1,PATHLEN-i-1) >= PATHLEN-i-1 strtobuf(RTERR_PATH,filename+i+1,PATHLEN-i-1) >= PATHLEN-i-1
) ) ) )

7
util/LLgen/src/machdep.c
View file

@ -42,6 +42,9 @@ RENAME(x,y) string x,y; {
if(! sys_rename(x,y)) fatal(1,"Cannot rename to %s",y); if(! sys_rename(x,y)) fatal(1,"Cannot rename to %s",y);
} }
/* to make it easier to patch ... */
char emdir[64] = EM_DIR;
string string
libpath(s) string s; { libpath(s) string s; {
/* Must deliver a full pathname to the library file "s" */ /* Must deliver a full pathname to the library file "s" */
@ -52,9 +55,9 @@ libpath(s) string s; {
string strcpy(), strcat(); string strcpy(), strcat();
static string subdir = "/lib/LLgen/"; static string subdir = "/lib/LLgen/";
length = strlen(EM_DIR) + strlen(subdir) + strlen(s) + 1; length = strlen(emdir) + strlen(subdir) + strlen(s) + 1;
p = (string) alloc((unsigned) length); p = (string) alloc((unsigned) length);
strcpy(p,EM_DIR); strcpy(p,emdir);
strcat(p,subdir); strcat(p,subdir);
strcat(p,s); strcat(p,s);
return p; return p;