delinted a little

This commit is contained in:
ceriel 1989-01-19 16:41:55 +00:00
parent 57dfee488a
commit b45706ce7a
4 changed files with 12 additions and 11 deletions

View file

@ -102,7 +102,6 @@ extern struct outhead outhead;
#endif
/* forward function declarations */
extern char *libname();
extern char *readident();
extern char *remember();
extern item_t *fb_shift();
@ -118,6 +117,7 @@ extern long atol();
extern char *mktemp();
extern char *malloc();
extern char *getenv();
extern char *strncpy();
/* ========== Machine dependent C declarations ========== */

View file

@ -221,6 +221,7 @@ char **argv;
}
#ifdef ASLD
archive() {
register long offset;
struct ar_hdr header;

View file

@ -70,8 +70,8 @@ yylex()
putval(c)
{
register valu_t v;
register n;
register char *p;
register n = 0;
register char *p = 0;
assert(c >= 256 && c < 256+128);
switch (c) {
@ -115,7 +115,7 @@ putval(c)
case OP_RR:
case OP_OO:
case OP_AA:
n = 0; break;
break;
default:
n = sizeof(word_t);
p = (char *) &yylval.y_word; break;
@ -127,9 +127,9 @@ putval(c)
getval(c)
{
register n;
register n = 0;
register valu_t v;
register char *p;
register char *p = 0;
switch (c) {
case CODE1:
@ -139,7 +139,7 @@ getval(c)
case CODE4:
n = 4; goto getnum;
case NUMBER0:
n = 0; c = NUMBER; goto getnum;
c = NUMBER; goto getnum;
case NUMBER1:
n = 1; c = NUMBER; goto getnum;
case NUMBER2:
@ -176,7 +176,7 @@ getval(c)
case OP_RR:
case OP_OO:
case OP_AA:
n = 0; break;
break;
default:
n = sizeof(word_t);
p = (char *) &yylval.y_word; break;

View file

@ -237,7 +237,7 @@ emit1(arg)
#ifdef LISTING
if (listeoln) {
if (listflag & 1) {
listcolm += printx(VALWIDTH, DOTVAL);
listcolm += printx(VALWIDTH, (valu_t)DOTVAL);
listcolm++;
putchar(' ');
}
@ -280,9 +280,9 @@ emit4(arg)
long arg;
{
#ifdef WORDS_REVERSED
emit2((arg>>16)); emit2((arg));
emit2((int)(arg>>16)); emit2((int)(arg));
#else
emit2((arg)); emit2((arg>>16));
emit2((int)(arg)); emit2((int)(arg>>16));
#endif
}