summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorOri Bernstein <ori@eigenstate.org>2018-01-14 23:51:05 -0800
committerOri Bernstein <ori@eigenstate.org>2018-01-14 23:51:05 -0800
commit8aef13f0d3a760760a3843245f6d5b1f62c2a142 (patch)
treef2fc2ddfd93e05a73416889128e01f2c23a5bb36
parent9b6e7069755a73fb43acd86fd76aafb2178a6f0c (diff)
downloadmc-8aef13f0d3a760760a3843245f6d5b1f62c2a142.tar.gz
Remove a global-global.
Now it's static.
-rw-r--r--parse/infer.c1
-rw-r--r--parse/parse.h1
-rw-r--r--parse/specialize.c2
-rw-r--r--parse/type.c1
4 files changed, 2 insertions, 3 deletions
diff --git a/parse/infer.c b/parse/infer.c
index 34bb69a..1b81bb1 100644
--- a/parse/infer.c
+++ b/parse/infer.c
@@ -69,6 +69,7 @@ static size_t nspecializations;
static Stab **specializationscope;
static size_t nspecializationscope;
static Traitmap *traitmap;
+static Htab *seqbase;
static void
ctxstrcall(char *buf, size_t sz, Node *n)
diff --git a/parse/parse.h b/parse/parse.h
index 7ac4b05..c622623 100644
--- a/parse/parse.h
+++ b/parse/parse.h
@@ -377,7 +377,6 @@ extern Node **nodes; /* node id -> node map */
extern size_t ndecls;
extern Node **exportimpls;
extern size_t nexportimpls;
-extern Htab *seqbase;
/* property tables */
extern int opispure[];
diff --git a/parse/specialize.c b/parse/specialize.c
index a9d8ee4..0491d76 100644
--- a/parse/specialize.c
+++ b/parse/specialize.c
@@ -109,7 +109,7 @@ tyspecialize(Type *orig, Tysubst *tsmap, Htab *delayed, Htab *trbase)
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);
diff --git a/parse/type.c b/parse/type.c
index de7237f..c31fbbe 100644
--- a/parse/type.c
+++ b/parse/type.c
@@ -24,7 +24,6 @@ size_t ntraittab;
Node **impltab;
size_t nimpltab;
Htab *eqcache;
-Htab *seqbase;
struct Typair {
uint32_t atid;