solve test bug on GCL



Greetings!

Finally I located the problem with solve test
on GCL Maxima build with new build system.
If you load("test.lisp"); the following file
-------- tests.lisp ---------
(sloop for v in '("rtest.mac")
  do
  (test-batch v)
)
-----------------------------
with
------- rtest.mac ----------
W:SOLVE([4*X^2-Y^2 = 12,X*Y-X = 2],[X,Y]);
[[X = 2,Y = 2],
 [X = 0.5202594388652008*%I-0.1331240357358706,
  Y = 0.07678378523787777-3.608003221870287*%I],
 [X = -0.5202594388652008*%I-0.1331240357358706,
  Y = 3.608003221870287*%I+0.07678378523787777],
 [X = -1.733751846381093,Y = -0.1535675710019696]];
-----------------------------
in GCL Maxima you will get an error.
But it is enough to change sloop variable v
to something different to get correct answer!
On Clisp everything works fine independently
on sloop variable name.

I'm perfectly sure that the problem has nothing to do
with recent solve changes. It is not clear yet
which part is to be blamed for the problem -
new build system or GCL. The case require
more thorough testing.

Vadim

--

[ Vadim V. Zhytnikov  <vvzhy@mail.ru>  <vvzhy@td.lpi.ac.ru> ]

Attached file: solve.tar.gz