conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[bugfix] don't push symbols doubly to captured variable list

This commit is contained in:
Yuichi Nishiwaki 2014-03-21 12:51:57 +09:00
parent 9a3ff987af
commit 189487b026
1 changed files with 18 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
src/codegen.c
View File

@ -196,6 +196,23 @@ lookup_scope(analyze_scope *scope, pic_sym sym)
return false; return false;
} }
static void
capture_var(analyze_scope *scope, pic_sym sym)
{
pic_sym *var;
size_t i;
for (i = 0; i < scope->captures.size; ++i) {
var = xv_get(&scope->captures, i);
if (*var == sym) {
break;
}
}
if (i == scope->captures.size) {
xv_push(&scope->captures, &sym);
}
}
static int static int
find_var(analyze_state *state, pic_sym sym) find_var(analyze_state *state, pic_sym sym)
{ {
@ -205,7 +222,7 @@ find_var(analyze_state *state, pic_sym sym)
while (scope) { while (scope) {
if (lookup_scope(scope, sym)) { if (lookup_scope(scope, sym)) {
if (depth > 0) { if (depth > 0) {
xv_push(&scope->captures, &sym); capture_var(scope, sym);
} }
return depth; return depth;
} }