Implement lexical scope instead of dynamic scope rules.

1 files changed, 3 insertions, 2 deletions

diff --git a/symbol.c b/symbol.c
index 8f4797a..6e9aa4a 100644
--- a/symbol.c
+++ b/symbol.c
@@ -34,7 +34,7 @@ getsym(Rune *name, int fresh)
 				return tab->syms[i];
 		}
 		if(dfn)
-			dfn = dfn->prev;
+			dfn = dfn->chain;
 		else
 			done = 1;
 	}while(!done && !fresh);
@@ -108,7 +108,7 @@ getcurrentdfn(void)
 }
 
 DfnFrame *
-pushdfnframe(Rune *code, Datum *lefto, Datum *righto, Array *left, Array *right)
+pushdfnframe(Rune *code, DfnFrame *scope, Datum *lefto, Datum *righto, Array *left, Array *right)
 {
 	ThreadData *td = getthreaddata();
 	DfnFrame *new = emalloc(sizeof(DfnFrame));
@@ -129,6 +129,7 @@ pushdfnframe(Rune *code, Datum *lefto, Datum *righto, Array *left, Array *right)
 	new->right = right;
 	incarrayref(right);
 	new->prev = td->currentdfn;
+	new->chain = scope;
 	td->currentdfn = new;
 	return new;
 }