X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fpower.cpp;h=c6bf7b9770d2fa939eb242fef780f6aa84286dc5;hp=d24c969a2145d5a755d574c475a4ea57fd05d139;hb=5f896fa7f59bbce727e4bba23df9c4bbdbb55c29;hpb=beeb0818e9cdb1b5de0ba2754286ad7bb2a9d032

diff --git a/ginac/power.cpp b/ginac/power.cpp
index d24c969a..c6bf7b97 100644
--- a/ginac/power.cpp
+++ b/ginac/power.cpp
@@ -539,6 +539,7 @@ ex power::eval(int level) const
 					if (num_coeff.is_positive()) {
 						mul *mulp = new mul(mulref);
 						mulp->overall_coeff = _ex1;
+						mulp->setflag(status_flags::dynallocated);
 						mulp->clearflag(status_flags::evaluated);
 						mulp->clearflag(status_flags::hash_calculated);
 						return (new mul(power(*mulp,exponent),
@@ -548,6 +549,7 @@ ex power::eval(int level) const
 						if (!num_coeff.is_equal(*_num_1_p)) {
 							mul *mulp = new mul(mulref);
 							mulp->overall_coeff = _ex_1;
+							mulp->setflag(status_flags::dynallocated);
 							mulp->clearflag(status_flags::evaluated);
 							mulp->clearflag(status_flags::hash_calculated);
 							return (new mul(power(*mulp,exponent),