Delinted some more

diff --git a/lang/pc/comp/def.c b/lang/pc/comp/def.c
index 9d2ad39..bce5241 100644 (file)
--- a/lang/pc/comp/def.c
+++ b/lang/pc/comp/def.c
@@ -121,7 +121,7 @@ DoDirective(directive, nd, tp, scl, function)
        struct type *tp;
        struct scopelist *scl;
 {
-       int kind;                       /* kind of directive */
+       long kind;                      /* kind of directive */
        int inp;                        /* internal or external name */
        int ext = 0;            /* directive = EXTERN */
        struct def *df = lookup(directive, PervasiveScope, D_INUSE);

diff --git a/lang/pc/comp/stab.c b/lang/pc/comp/stab.c
index 2b88d6d..8a9f5be 100644 (file)
--- a/lang/pc/comp/stab.c
+++ b/lang/pc/comp/stab.c
@@ -220,11 +220,11 @@ stb_type(tp, assign_num)
                break;
        case T_FILE:
                addc_db_str('L');
-               stb_type(tp->next);
+               stb_type(tp->next, 0);
                break;
        case T_STRING:
                addc_db_str('*');
-               stb_type(char_type);
+               stb_type(char_type, 0);
                break;
        }
 }
@@ -268,7 +268,7 @@ stb_string(df, kind)
        case D_END:
        case D_PEND:
                adds_db_str(sprint(buf, "E%d;", df->prc_vis->sc_count));
-               C_ms_stb_cst(db_str.base, N_SCOPE, proclevel, 0);
+               C_ms_stb_cst(db_str.base, N_SCOPE, proclevel, (arith)0);
                break;
        case D_VARIABLE:
                if (df->df_flags & D_VARPAR) {  /* VAR parameter */