verbose.c File Reference

#include "defs.h"

Include dependency graph for verbose.c:

Go to the source code of this file.

Functions
	verbose ()
	log_unused ()
	log_conflicts ()
	print_state (int state)
	print_conflicts (int state)
	print_core (int state)
	print_nulls (int state)
	print_actions (int stateno)
	print_shifts (action *p)
	print_reductions (action *p, int defred)
	print_gotos (int stateno)

Variables
static short *	null_rules

Function Documentation

log_conflicts

(

)

Definition at line 50 of file verbose.c.

References nstates, RRconflicts, SRconflicts, and verbose_file.

Referenced by verbose().

{
    register int i;

    fprintf(verbose_file, "\n\n");
    for (i = 0; i < nstates; i++)
    {
        if (SRconflicts[i] || RRconflicts[i])
        {
            fprintf(verbose_file, "State %d contains ", i);
            if (SRconflicts[i] == 1)
                fprintf(verbose_file, "1 shift/reduce conflict");
            else if (SRconflicts[i] > 1)
                fprintf(verbose_file, "%d shift/reduce conflicts",
                        SRconflicts[i]);
            if (SRconflicts[i] && RRconflicts[i])
                fprintf(verbose_file, ", ");
            if (RRconflicts[i] == 1)
                fprintf(verbose_file, "1 reduce/reduce conflict");
            else if (RRconflicts[i] > 1)
                fprintf(verbose_file, "%d reduce/reduce conflicts",
                        RRconflicts[i]);
            fprintf(verbose_file, ".\n");
        }
    }
}

Here is the caller graph for this function:

log_unused

(

)

Definition at line 31 of file verbose.c.

References nrules, ritem, rlhs, rrhs, rules_used, symbol_name, and verbose_file.

Referenced by verbose().

{
    register int i;
    register short *p;

    fprintf(verbose_file, "\n\nRules never reduced:\n");
    for (i = 3; i < nrules; ++i)
    {
        if (!rules_used[i])
        {
            fprintf(verbose_file, "\t%s :", symbol_name[rlhs[i]]);
            for (p = ritem + rrhs[i]; *p >= 0; ++p)
                fprintf(verbose_file, " %s", symbol_name[*p]);
            fprintf(verbose_file, "  (%d)\n", i - 2);
        }
    }
}

Here is the caller graph for this function:

print_actions

(

int

stateno

)

Definition at line 220 of file verbose.c.

References accessing_symbol, defred, final_state, ISVAR, shifts::nshifts, parser, print_gotos(), print_reductions(), print_shifts(), shifts::shift, shift_table, and verbose_file.

Referenced by print_state().

{
    register action *p;
    register shifts *sp;
    register int as;

    if (stateno == final_state)
        fprintf(verbose_file, "\t$end  accept\n");

    p = parser[stateno];
    if (p)
    {
        print_shifts(p);
        print_reductions(p, defred[stateno]);
    }

    sp = shift_table[stateno];
    if (sp && sp->nshifts > 0)
    {
        as = accessing_symbol[sp->shift[sp->nshifts - 1]];
        if (ISVAR(as))
            print_gotos(stateno);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

print_conflicts

(

int

state

)

Definition at line 92 of file verbose.c.

References action::action_code, final_state, action::next, action::number, parser, REDUCE, SHIFT, action::suppressed, action::symbol, symbol_name, and verbose_file.

Referenced by print_state().

{
    register int symbol, act, number;
    register action *p;

    symbol = -1;
    for (p = parser[state]; p; p = p->next)
    {
        if (p->suppressed == 2)
            continue;

        if (p->symbol != symbol)
        {
            symbol = p->symbol;
            number = p->number;
            if (p->action_code == SHIFT)
                act = SHIFT;
            else
                act = REDUCE;
        }
        else if (p->suppressed == 1)
        {
            if (state == final_state && symbol == 0)
            {
                fprintf(verbose_file, "%d: shift/reduce conflict \
(accept, reduce %d) on $end\n", state, p->number - 2);
            }
            else
            {
                if (act == SHIFT)
                {
                    fprintf(verbose_file, "%d: shift/reduce conflict \
(shift %d, reduce %d) on %s\n", state, number, p->number - 2,
                            symbol_name[symbol]);
                }
                else
                {
                    fprintf(verbose_file, "%d: reduce/reduce conflict \
(reduce %d, reduce %d) on %s\n", state, number - 2, p->number - 2,
                            symbol_name[symbol]);
                }
            }
        }
    }
}

Here is the caller graph for this function:

print_core

(

int

state

)

Definition at line 140 of file verbose.c.

References core::items, core::nitems, ritem, rlhs, rrhs, state_table, symbol_name, and verbose_file.

Referenced by print_state().

{
    register int i;
    register int k;
    register int rule;
    register core *statep;
    register short *sp;
    register short *sp1;

    statep = state_table[state];
    k = statep->nitems;

    for (i = 0; i < k; i++)
    {
        sp1 = sp = ritem + statep->items[i];

        while (*sp >= 0) ++sp;
        rule = -(*sp);
        fprintf(verbose_file, "\t%s : ", symbol_name[rlhs[rule]]);

        for (sp = ritem + rrhs[rule]; sp < sp1; sp++)
            fprintf(verbose_file, "%s ", symbol_name[*sp]);

        putc('.', verbose_file);

        while (*sp >= 0)
        {
            fprintf(verbose_file, " %s", symbol_name[*sp]);
            sp++;
        }
        fprintf(verbose_file, "  (%d)\n", -2 - *sp);
    }
}

Here is the caller graph for this function:

print_gotos

(

int

stateno

)

Definition at line 310 of file verbose.c.

References accessing_symbol, ISVAR, shifts::nshifts, shifts::shift, shift_table, symbol_name, to_state, and verbose_file.

Referenced by print_actions().

{
    register int i, k;
    register int as;
    register short *to_state;
    register shifts *sp;

    putc('\n', verbose_file);
    sp = shift_table[stateno];
    to_state = sp->shift;
    for (i = 0; i < sp->nshifts; ++i)
    {
        k = to_state[i];
        as = accessing_symbol[k];
        if (ISVAR(as))
            fprintf(verbose_file, "\t%s  goto %d\n", symbol_name[as], k);
    }
}

Here is the caller graph for this function:

print_nulls

(

int

state

)

Definition at line 176 of file verbose.c.

References action::action_code, action::next, null_rules, action::number, parser, REDUCE, rlhs, rrhs, action::suppressed, symbol_name, and verbose_file.

Referenced by print_state().

{
    register action *p;
    register int i, j, k, nnulls;

    nnulls = 0;
    for (p = parser[state]; p; p = p->next)
    {
        if (p->action_code == REDUCE &&
                (p->suppressed == 0 || p->suppressed == 1))
        {
            i = p->number;
            if (rrhs[i] + 1 == rrhs[i+1])
            {
                for (j = 0; j < nnulls && i > null_rules[j]; ++j)
                    continue;

                if (j == nnulls)
                {
                    ++nnulls;
                    null_rules[j] = i;
                }
                else if (i != null_rules[j])
                {
                    ++nnulls;
                    for (k = nnulls - 1; k > j; --k)
                        null_rules[k] = null_rules[k-1];
                    null_rules[j] = i;
                }
            }
        }
    }

    for (i = 0; i < nnulls; ++i)
    {
        j = null_rules[i];
        fprintf(verbose_file, "\t%s : .  (%d)\n", symbol_name[rlhs[j]],
                j - 2);
    }
    fprintf(verbose_file, "\n");
}

Here is the caller graph for this function:

print_reductions	(	action *	p,
		int	defred
	)

Definition at line 272 of file verbose.c.

References action::action_code, action::next, REDUCE, action::suppressed, symbol_name, and verbose_file.

Referenced by print_actions().

{
    register int k, anyreds;
    register action *q;

    anyreds = 0;
    for (q = p; q ; q = q->next)
    {
        if (q->action_code == REDUCE && q->suppressed < 2)
        {
            anyreds = 1;
            break;
        }
    }

    if (anyreds == 0)
        fprintf(verbose_file, "\t.  error\n");
    else
    {
        for (; p; p = p->next)
        {
            if (p->action_code == REDUCE && p->number != defred)
            {
                k = p->number - 2;
                if (p->suppressed == 0)
                    fprintf(verbose_file, "\t%s  reduce %d\n",
                            symbol_name[p->symbol], k);
            }
        }

        if (defred > 0)
            fprintf(verbose_file, "\t.  reduce %d\n", defred - 2);
    }
}

Here is the caller graph for this function:

print_shifts

(

action *

p

)

Definition at line 247 of file verbose.c.

References action::action_code, action::next, SHIFT, action::suppressed, symbol_name, and verbose_file.

Referenced by print_actions().

{
    register int count;
    register action *q;

    count = 0;
    for (q = p; q; q = q->next)
    {
        if (q->suppressed < 2 && q->action_code == SHIFT)
            ++count;
    }

    if (count > 0)
    {
        for (; p; p = p->next)
        {
            if (p->action_code == SHIFT && p->suppressed == 0)
                fprintf(verbose_file, "\t%s  shift %d\n",
                        symbol_name[p->symbol], p->number);
        }
    }
}

Here is the caller graph for this function:

print_state

(

int

state

)

Definition at line 78 of file verbose.c.

References print_actions(), print_conflicts(), print_core(), print_nulls(), RRconflicts, SRconflicts, and verbose_file.

Referenced by verbose().

{
    if (state)
        fprintf(verbose_file, "\n\n");
    if (SRconflicts[state] || RRconflicts[state])
        print_conflicts(state);
    fprintf(verbose_file, "state %d\n", state);
    print_core(state);
    print_nulls(state);
    print_actions(state);
}

Here is the call graph for this function:

Here is the caller graph for this function:

verbose

(

)

Definition at line 7 of file verbose.c.

References FREE, log_conflicts(), log_unused(), MALLOC, no_space(), nrules, nstates, ntokens, null_rules, nunused, nvars, print_state(), RRtotal, SRtotal, verbose_file, and vflag.

Referenced by main().

{
    register int i;

    if (!vflag) return;

    null_rules = (short *) MALLOC(nrules*sizeof(short));
    if (null_rules == 0) no_space();
    fprintf(verbose_file, "\f\n");
    for (i = 0; i < nstates; i++)
        print_state(i);
    FREE(null_rules);

    if (nunused)
        log_unused();
    if (SRtotal || RRtotal)
        log_conflicts();

    fprintf(verbose_file, "\n\n%d terminals, %d nonterminals\n", ntokens,
            nvars);
    fprintf(verbose_file, "%d grammar rules, %d states\n", nrules - 2, nstates);
}

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

short* null_rules

static

Definition at line 5 of file verbose.c.

Referenced by print_nulls(), and verbose().