Warning fixes.

This commit is contained in:
David Given 2022-07-17 23:52:05 +02:00
parent 739b9af662
commit 78674d935f
2 changed files with 6 additions and 6 deletions

View file

@ -174,7 +174,7 @@ STATIC void getpnames(dumpp)
} }
} }
STATIC new_name(s) char** s; STATIC int new_name(s) char** s;
{ {
static int nn = 0; static int nn = 0;
char buf[20]; char buf[20];
@ -190,7 +190,7 @@ STATIC new_name(s) char** s;
strcpy(*s, buf); strcpy(*s, buf);
} }
STATIC uniq_names() STATIC int uniq_names()
{ {
/* The names of all internal procedures and data blocks /* The names of all internal procedures and data blocks
* are made different. As the optimizer combines several * are made different. As the optimizer combines several
@ -218,7 +218,7 @@ STATIC uniq_names()
} }
} }
main(argc, argv) int argc; int main(argc, argv) int argc;
char* argv[]; char* argv[];
{ {
/* CA does not output proctable etc. files. Instead, its /* CA does not output proctable etc. files. Instead, its

View file

@ -71,13 +71,13 @@ STATIC void outsym(const char *s, int t)
coutshort((short) num); coutshort((short) num);
} }
} else { } else {
p= s; p= (byte*) s;
while (*p && p < &s[IDL]) while (*p && p < &s[IDL])
p++; p++;
num = p - s; num = p - s;
outbyte( (byte) t); outbyte( (byte) t);
coutint((short) num); coutint((short) num);
p = s; p = (byte*) s;
while (num--) while (num--)
outbyte( (byte) *p++ ); outbyte( (byte) *p++ );
} }
@ -167,7 +167,7 @@ STATIC void coutobject(obj_p obj)
STATIC void cputstr(argb_p abp) { STATIC void cputstr(argb_p abp) {
register argb_p tbp; register argb_p tbp;
register length; register int length;
length = 0; length = 0;
tbp = abp; tbp = abp;