vbscript: Fixed local variable count calculation.

This commit is contained in:
Jacek Caban 2011-10-24 12:30:48 +02:00 committed by Alexandre Julliard
parent a65ef29151
commit 851856af67
2 changed files with 2 additions and 1 deletions

View file

@ -746,6 +746,7 @@ static HRESULT compile_dim_statement(compile_ctx_t *ctx, dim_statement_t *stat)
return E_FAIL;
}
ctx->func->var_cnt++;
if(!dim_decl->next)
break;
dim_decl = dim_decl->next;
@ -753,7 +754,6 @@ static HRESULT compile_dim_statement(compile_ctx_t *ctx, dim_statement_t *stat)
dim_decl->next = ctx->dim_decls;
ctx->dim_decls = stat->dim_decls;
ctx->func->var_cnt++;
return S_OK;
}

View file

@ -470,6 +470,7 @@ Sub TestSubLocalVal
x = false
Call ok(not x, "local x is not false?")
Dim x
Dim a,b, c
End Sub
x = true