godzil/ack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

bug fixes: ifval must be an arith, not an int

Browse Source
This commit is contained in:
ceriel
1987-08-19 10:36:37 +00:00
parent d7b2998ebe
commit d35035fab8
8 changed files with 34 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
util/cpp/domacro.c
View File

@@ -6,7 +6,6 @@
/* PREPROCESSOR: CONTROLLINE INTERPRETER */
#include "interface.h"
#include <em_arith.h>
#include "LLlex.h"
#include "Lpars.h"
#include "debug.h"
@@ -258,7 +257,7 @@ do_include()
inctable[0] = WorkingDir;
if (filenm) {
if (!InsertFile(filenm, &inctable[tok==FILESPECIFIER],&result)){
error("cannot find include file \"%s\"", filenm);
fatal("cannot find include file \"%s\"", filenm);
}
else {
WorkingDir = getwdir(result);
@@ -645,13 +644,12 @@ get_text(formals, length)
text_size <<= 1);
}
else {
int sz = idp - id_buf;
int sz = idp - id_buf + 1;
idp = id_buf;
while (pos + sz >= text_size)
text = Srealloc(text,
text_size <<= 1);
while (pos + sz >= text_size) text_size <<= 1;
text = Srealloc(text, text_size);
while (text[pos++] = *idp++) ;
pos--;
}
@@ -664,6 +662,7 @@ get_text(formals, length)
}
}
text[pos++] = '\0';
text = Srealloc(text, pos);
*length = pos - 1;
return text;
}