DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦352e0ff9c⟧ TextFile

    Length: 326 (0x146)
    Types: TextFile
    Names: »vars.c«

Derivation

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Adv/Compiler/vars.c«

TextFile

#include	"advgen.h"

static int	nvars = 0;

void
decl_var(s)
    symbol	*s;
{
    switch (s->s_type)
    {
	case S_VAR:
	    muldecl(s->s_sym, "variable");
	    break;
	case S_UNKNOWN:
	    s->s_type = S_VAR;
	    s->s_value = nvars++;
	    break;
	default:
	    confdecl(s->s_sym, "variable", s->s_type);
	    break;
    }
}