[Maxima-commits] CVS: maxima/tests rtest3.mac, 1.8, 1.9 rtest_allnummod.mac, 1.11, 1.12

[Robert D. <rob...@us...>]

Update of /cvsroot/maxima/maxima/tests
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv11925/tests

Modified Files:
	rtest3.mac rtest_allnummod.mac 
Log Message:
(1) In MAYBE-RESET, evaluate ((MSETQ) ...) to assign a new value.
That causes the special assignment function (attached to ASSIGN property) to be
called, if present. (2) Special treatment of global variable fpprec in test
cases is no longer necessary; reset(fpprec) handles it correctly.

Index: rtest3.mac
===================================================================
RCS file: /cvsroot/maxima/maxima/tests/rtest3.mac,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- rtest3.mac	9 Sep 2007 16:04:41 -0000	1.8
+++ rtest3.mac	29 Sep 2007 14:34:09 -0000	1.9
@@ -194,10 +194,7 @@
 25$
 sin(5.0b-1);
 4.794255386042030002732879b-1$
-/* FPPREC1 sets some special variables;
- * it is invoked via assignment to fpprec
- */
-(reset (fpprec), fpprec : fpprec, 0);
+(reset (fpprec), 0);
 0;
 /*begin fix */
  exp:cos(x)^2-sin(x)^2;

Index: rtest_allnummod.mac
===================================================================
RCS file: /cvsroot/maxima/maxima/tests/rtest_allnummod.mac,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- rtest_allnummod.mac	9 Sep 2007 16:04:41 -0000	1.11
+++ rtest_allnummod.mac	29 Sep 2007 14:34:09 -0000	1.12
@@ -1532,8 +1532,5 @@
 min(1/(1-x),minf);
 minf$
 
-/* FPPREC1 sets some special variables;
- * it is invoked via assignment to fpprec
- */
-(reset (fpprec), fpprec : fpprec, 0);
+(reset (fpprec), 0);
 0;