e_left
x->e_left = l;
free_expr(x->e_left);
v1 = eval_subtree(e->e_left, lp);
x->e_left = lp = fold(x->e_left);