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

de-linted somewhat

Browse source
This commit is contained in:
ceriel 1990-10-02 17:19:17 +00:00
parent 4483f237f6
commit 5ba9685e76
5 changed files with 19 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
lang/cem/cpp.ansi/LLlex.c
View file

@ -31,8 +31,9 @@ int AccFileSpecifier = 0; /* return filespecifier <...> */
int LexSave = 0; /* last character read by GetChar */
extern int InputLevel; /* # of current macro expansions */
char *string_token();
arith char_constant();
extern char *string_token();
extern char *strcpy();
extern arith char_constant();
#define FLG_ESEEN 0x01 /* possibly a floating point number */
#define FLG_DOTSEEN 0x02 /* certainly a floating point number */
@ -57,7 +58,7 @@ GetToken(ptok)
again: /* rescan the input after an error or replacement */
ch = GetChar();
go_on: /* rescan, the following character has been read */
/* rescan, the following character has been read */
if ((ch & 0200) && ch != EOI) /* stop on non-ascii character */
fatal("non-ascii '\\%03o' read", ch & 0377);
/* keep track of the place of the token in the file */
@ -387,11 +388,11 @@ string_token(nm, stop_char)
ch = quoted(GetChar());
str[pos++] = ch;
if (pos == str_size)
str = Realloc(str, str_size <<= 1);
str = Realloc(str, (unsigned)(str_size <<= 1));
ch = GetChar();
}
str[pos++] = '\0'; /* for filenames etc. */
str = Realloc(str, pos);
str = Realloc(str, (unsigned)pos);
return str;
}

2
lang/cem/cpp.ansi/Makefile
View file

@ -34,7 +34,7 @@ GENOPTIONS =
# Special #defines during compilation
CDEFS = $(LIB_INCLUDES)
CFLAGS = $(CDEFS) $(COPTIONS) -O# # we cannot pass the COPTIONS to lint!
CFLAGS = $(CDEFS) $(COPTIONS)# # we cannot pass the COPTIONS to lint!
# Grammar files and their objects
LSRC = tokenfile.g expression.g

5
lang/cem/cpp.ansi/options.c
View file

@ -80,7 +80,7 @@ do_option(text)
error("malformed option -D%s", text);
break;
}
macro_def(str2idf(name, 0), mactext, -1, maclen, NOFLAG);
macro_def(str2idf(name, 0), mactext, -1, (int)maclen, NOFLAG);
break;
}
case 'I' : /* -Ipath : insert "path" into include list */
@ -90,7 +90,8 @@ do_option(text)
if (++inc_total > inc_max) {
inctable = (char **)
Realloc(inctable,(inc_max+=10)*sizeof(char *));
Realloc((char *)inctable,
(unsigned)((inc_max+=10)*sizeof(char *)));
}
for(i = inc_pos++; i < inc_total; i++) {

8
lang/cem/cpp.ansi/preprocess.c
View file

@ -53,7 +53,7 @@ do_pragma()
*c_ptr = '\0';
while(c != '\n') {
if (c_ptr + 1 - cur_line == size) {
cur_line = Realloc(cur_line, size += ITEXTSIZE);
cur_line = Realloc(cur_line, (unsigned)(size += ITEXTSIZE));
c_ptr = cur_line + size - 1;
}
*c_ptr++ = c;
@ -63,8 +63,8 @@ do_pragma()
if (!pragma_nr) {
pragma_tab = (struct prag_info *)Malloc(sizeof(struct prag_info));
} else {
pragma_tab = (struct prag_info *)Realloc(pragma_tab
, sizeof(struct prag_info) * (pragma_nr+1));
pragma_tab = (struct prag_info *)Realloc((char *)pragma_tab
, (unsigned)(sizeof(struct prag_info) * (pragma_nr+1)));
}
pragma_tab[pragma_nr].pr_linnr = LineNumber;
pragma_tab[pragma_nr].pr_fil = FileName;
@ -143,7 +143,7 @@ preprocess(fn)
free(pragma_tab[i].pr_text);
i++;
}
free(pragma_tab);
free((char *) pragma_tab);
pragma_tab = (struct prag_info *)0;
pragma_nr = 0;
LineNumber = LiNo;

9
lang/cem/cpp.ansi/replace.c
View file

@ -22,6 +22,8 @@
#include "replace.h"
extern char *GetIdentifier();
extern char *strcpy();
extern char *strcat();
extern int InputLevel;
struct repl *ReplaceList; /* list of currently active macros */
@ -254,7 +256,6 @@ struct repl *repl;
{
register struct repl *nrepl = ReplaceList;
register struct args *ap = nrepl->r_args;
struct args *args = repl->r_args;
register char *p;
/* stash identifier name */
@ -731,7 +732,7 @@ add2repl(repl, ch)
assert(index < repl->r_size);
if (index + 2 >= repl->r_size) {
repl->r_text = Realloc(repl->r_text, repl->r_size <<= 1);
repl->r_text = Realloc(repl->r_text, (unsigned)(repl->r_size <<= 1));
repl->r_ptr = repl->r_text + index;
}
*repl->r_ptr++ = ch;
@ -756,7 +757,7 @@ stash(repl, ch, stashraw)
assert(index < args->a_expsize);
if (index + 1 >= args->a_expsize) {
args->a_expbuf = Realloc(args->a_expbuf,
args->a_expsize <<= 1);
(unsigned)(args->a_expsize <<= 1));
args->a_expptr = args->a_expbuf + index;
}
*args->a_expptr++ = ch;
@ -767,7 +768,7 @@ stash(repl, ch, stashraw)
assert(index < args->a_rawsize);
if (index + 1 >= args->a_rawsize) {
args->a_rawbuf = Realloc(args->a_rawbuf,
args->a_rawsize <<= 1);
(unsigned)(args->a_rawsize <<= 1));
args->a_rawptr = args->a_rawbuf + index;
}
*args->a_rawptr++ = ch;