From: Richard Kreckel <Richard.Kreckel@uni-mainz.de>
Date: Wed, 14 Mar 2001 21:30:16 +0000 (+0000)
Subject: fix stupid memory problem.
X-Git-Tag: release_0-8-0~28
X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=commitdiff_plain;h=5136cb28833944aedbd47e1f66cd4a103e6697b1;ds=sidebyside

fix stupid memory problem.
---

diff --git a/check/exam_misc.cpp b/check/exam_misc.cpp
index 3b2ff8ea..c9872a93 100644
--- a/check/exam_misc.cpp
+++ b/check/exam_misc.cpp
@@ -27,20 +27,17 @@
 static unsigned exam_expand_subs(void)
 {
 	unsigned result = 0;
-	symbol a1("a1");
 	symbol a[VECSIZE];
 	ex e, aux;
 	
-	a[1] = a1;
-	for (unsigned i=0; i<VECSIZE; ++i) {
+	for (unsigned i=0; i<VECSIZE; ++i)
 		e = e + a[i];
-	}
 	
 	// prepare aux so it will swallow anything but a1^2:
 	aux = -e + a[0] + a[1];
 	e = expand(subs(expand(pow(e, 2)), a[0] == aux));
 	
-	if (e != pow(a1,2)) {
+	if (e != pow(a[1],2)) {
 		clog << "Denny Fliegner's quick consistency check erroneously returned "
 		     << e << "." << endl;
 		++result;