Fixed duplicate declaration of local vars

This commit is contained in:
Cédric Pasteur 2010-07-22 17:38:11 +02:00
parent 3160855158
commit 89ceb8df76

View file

@ -570,7 +570,7 @@ let fun_def_of_step_fun name obj_env mem objs md =
f_retty = Cty_void;
f_args = args;
f_body = {
var_decls = local_vars @ out_vars;
var_decls = out_vars;
block_body = body
}
}