+static int tneg(dstr *v)
+{
+ mp *a = *(mp **)v[0].buf;
+ mp *r = *(mp **)v[1].buf;
+ int ok = 1;
+ mp *n = mp_neg(MP_NEW, a);
+ if (!MP_EQ(r, n)) {
+ ok = 0;
+ fprintf(stderr, "\n*** neg failed\n");
+ fputs("\n*** a = ", stderr); mp_writefile(a, stderr, 10);
+ fputs("\n*** r = ", stderr); mp_writefile(r, stderr, 10);
+ fputs("\n*** n = ", stderr); mp_writefile(n, stderr, 10);
+ fputc('\n', stderr);
+ }
+ mp_drop(n);
+ n = mp_neg(a, a);
+ if (!MP_EQ(r, n)) {
+ ok = 0;
+ fprintf(stderr, "\n*** neg failed\n");
+ fputs("\n*** a* = ", stderr); mp_writefile(a, stderr, 10);
+ fputs("\n*** r = ", stderr); mp_writefile(r, stderr, 10);
+ fputs("\n*** n = ", stderr); mp_writefile(n, stderr, 10);
+ fputc('\n', stderr);
+ }
+ mp_drop(a);
+ mp_drop(r);
+ assert(mparena_count(MPARENA_GLOBAL) == 0);
+ return (ok);
+}
+