X-Git-Url: https://ginac.de/ginac.git//ginac.git?a=blobdiff_plain;f=check%2Fexam_pseries.cpp;h=2e5d2d6ef9e8e5f2b146022813108eb4db660d86;hb=2a49feaf2d257a43aaeaee071b5da3620eca842b;hp=1c8acd939712ddacb3e8dee733907dc76e027783;hpb=d2de9f5307c47adb2df13359002d987653c38a6a;p=ginac.git

diff --git a/check/exam_pseries.cpp b/check/exam_pseries.cpp
index 1c8acd93..2e5d2d6e 100644
--- a/check/exam_pseries.cpp
+++ b/check/exam_pseries.cpp
@@ -354,7 +354,8 @@ static unsigned exam_series13()
 {
 	unsigned result = 0;
 
-	ex e = pow(2,x)*( 1/x*(-(1+x)/(1-x)) + (1+x)/x/(1-x));
+	ex e = (new mul(pow(2,x), (1/x*(-(1+x)/(1-x)) + (1+x)/x/(1-x)))
+	       )->setflag(status_flags::evaluated);
 	ex d = Order(x);
 	result += check_series(e,0,d,1);