[PATCH 2.1.6] 64-bit test ploth

[Ilya Zakharevich <nospam-abuse@ilyaz.org>]

This patch fixes wrong format of the output:

--- pari-2.1.6/src/test/64/ploth	Sun Mar 12 09:27:46 2000
+++ pari-2.1.6/src/test/64/ploth-32	Sun Mar 12 09:27:46 2000
@@ -1,2 +1,3 @@
+   echo = 1 (on)
 ? default(realprecision,9)
    realprecision = 9 significant digits
@@ -11,5 +12,5 @@
 ? plotlines(0,vector(5,k,50*k),vector(5,k,10*k*k))
 ? plotmove(0,243,583);plotcursor(0)
-% = [243, 583]
+[243, 583]
 ? plot(x=-5,5,sin(x))
 
@@ -38,30 +39,30 @@
           -5                                                             5
 ? ploth(x=-5,5,sin(x))
-% = [-5.00000000, 5.00000000, -0.999996411, 0.999996410]
+[-5.00000000, 5.00000000, -0.999996411, 0.999996410]
 ? ploth(t=0,2*Pi,[sin(5*t),sin(7*t)])
-% = [0.E-92, 6.28318530, -0.999998764, 0.999998764]
+[0.E-92, 6.28318530, -0.999998764, 0.999998765]
 ? ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],1,100)
-% = [-0.999874128, 0.999874127, -0.999874128, 0.999874127]
+[-0.999874125, 0.999874127, -0.999874127, 0.999874128]
 ? ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],2,100)
   ***   multi-curves cannot be plot recursively.
 ? ploth(t=0,2*Pi,[sin(5*t),sin(7*t)],3,100)
-% = [-1.00000000, 1.00000000, -1.00000000, 1.00000000]
+[-1.00000000, 0.999999999, -1.00000000, 0.999999999]
 ? plothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500))
-% = [0.E-92, 500.000000, 0.E-92, 500.000000]
+[0.E-92, 500.000000, 0.E-92, 500.000000]
 ? plothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500),1)
-% = [0.E-92, 500.000000, 0.E-92, 500.000000]
+[0.E-92, 500.000000, 0.E-92, 500.000000]
 ? plotpoints(0,225,334)
 ? plotpoints(0,vector(10,k,10*k),vector(10,k,5*k*k))
 ? psploth(x=-5,5,sin(x))
-% = [-5.00000000, 5.00000000, -0.999996411, 0.999996410]
+[-5.00000000, 5.00000000, -0.999996411, 0.999996410]
 ? psplothraw(vector(501,k,k-1),vector(501,k,(k-1)*(k-1)/500),1)
-% = [0.E-92, 500.000000, 0.E-92, 500.000000]
+[0.E-92, 500.000000, 0.E-92, 500.000000]
 ? plotmove(0,50,50);plotrbox(0,50,50)
 ? plotrline(0,150,100)
 ? plotcolor(0,4);
 ? plotcursor(0)
-% = [200, 150]
+[200, 150]
 ? plotrmove(0,5,5);plotcursor(0)
-% = [205, 155]
+[205, 155]
 ? plotrpoint(0,20,20)
 ? plotmove(0,100,100);plotstring(0,Pi)
@@ -70,5 +71,4 @@
 ? psdraw([0,10,10])
 ? print("Total time spent: ",gettime);
-Total time spent: 2196
+Total time spent: 1205
 ? \q
-Good bye!