diff options
Diffstat (limited to 'lib/pile.c')
-rw-r--r-- | lib/pile.c | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -150,6 +150,7 @@ void act_pile(int func) { pile_elem operande1, operande2; char buf[50]; + char valid; sprintf(buf, _("Calling act_pile(%i)"), func); pushcontext(buf); @@ -269,6 +270,9 @@ void act_pile(int func) operande2 = pop_pile(1); if ((operande1.type == T_POLY) && (operande2.type == T_STRING)) { if (operande2.label) { + NomVarToVar(operande2.label, variables, &valid); + if (valid) + SupprimerDansTab(&variables,operande2.label); InsererVarDansTab(&variables, CreerElement(operande2.label, (void *) operande1.poly)); free(operande2.label); } else { |