shithub: mc

Info  •  Files  •  Log  •  Branches

Remove a global-global.

	Now it's static.

--- a/parse/infer.c

+++ b/parse/infer.c

@@ -69,6 +69,7 @@

 static Stab **specializationscope;

 static size_t nspecializationscope;

 static Traitmap *traitmap;

+static Htab *seqbase;

 static void

 ctxstrcall(char *buf, size_t sz, Node *n)

--- a/parse/parse.h

+++ b/parse/parse.h

@@ -377,7 +377,6 @@

 extern size_t ndecls;

 extern Node **exportimpls;

 extern size_t nexportimpls;

-extern Htab *seqbase;

 /* property tables */

 extern int opispure[];

--- a/parse/specialize.c

+++ b/parse/specialize.c

@@ -109,7 +109,7 @@

 				ts->aux = tyspecialize(t->spec[i]->aux, tsmap, delayed, trbase);

 			lappend(&ret->spec, &ret->nspec, ts);

 		}

-		tmp = htget(seqbase, t);

+		tmp = htget(trbase, t);

 		if (tmp) {

 			tmp = tyspecialize(tmp, tsmap, delayed, trbase);

 			htput(trbase, ret, tmp);

--- a/parse/type.c

+++ b/parse/type.c

@@ -24,7 +24,6 @@

 Node **impltab;

 size_t nimpltab;

 Htab *eqcache;

-Htab *seqbase;

 struct Typair {

 	uint32_t atid;