X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fmatrix.cpp;h=52a1f1b423cd4b3eafea7a3b8c6d8a185565d26c;hp=871c3f15d1c5f433238b6f5a3b354d1f17ef1ea2;hb=052e9928511dd77d1d5d489b2a61b75579cc44e3;hpb=55b0f861ce3676061b8f531c97fd34046875581d

diff --git a/ginac/matrix.cpp b/ginac/matrix.cpp
index 871c3f15..52a1f1b4 100644
--- a/ginac/matrix.cpp
+++ b/ginac/matrix.cpp
@@ -1589,7 +1589,7 @@ ex diag_matrix(const lst & l)
 ex unit_matrix(unsigned r, unsigned c)
 {
 	matrix &Id = *new matrix(r, c);
-	Id.setflag(status_flags::dynallocated);
+	Id.setflag(status_flags::dynallocated | status_flags::evaluated);
 	for (unsigned i=0; i<r && i<c; i++)
 		Id(i,i) = _ex1;