tellsimp & truncate



With 5.13, I get 

(%i1) tellsimp(truncate(x), 5);
(%o1) [truncaterule1,simp-truncate]

(%i2) truncate(x);
(%o2) 5

(%i3) truncate(-x);
(%o3) -5

These are OK, But with CVS maxima

 (%i1) tellsimp(truncate(x), 5);
(%o1) [truncaterule1,simp-truncate]

  (%i2) truncate(x);
  (%o2) truncate(x);

  (%i3) truncate(-x);
  (%o3) -5

I also get errors with rtest_round #79 and #81. I haven't done a build in 
awhile, so
I might have missed some things. I also see that the author of rtest_round 
was
clueless (me, by the way :)

(tellsimp(truncate(x),%pi),0);
0$

truncate(-x);
-%pi$

OK, but truncate should be integer-valued, so the test is kinda bogus, I 
think.

BW