[Gnucash-changes] That's not all, there's even more!

Linas Vepstas linas at cvs.gnucash.org
Fri Jul 2 21:47:31 EDT 2004


Log Message:
-----------
That's not all, there's even more!

Modified Files:
--------------
    gnucash/src/engine/test:
        test-numeric.c

Revision Data
-------------
Index: test-numeric.c
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/src/engine/test/test-numeric.c,v
retrieving revision 1.17
retrieving revision 1.18
diff -Lsrc/engine/test/test-numeric.c -Lsrc/engine/test/test-numeric.c -u -r1.17 -r1.18
--- src/engine/test/test-numeric.c
+++ src/engine/test/test-numeric.c
@@ -690,6 +690,15 @@
 	check_binary_op (gnc_numeric_create(-2939846940LL, 19873),
 	                 val_a, val_tot, frac,
 	                 "expected %s got %s = %s * %s for mult round");
+
+	frac = gnc_numeric_create (396226789777979LL, 328758834367851752LL);
+	val_tot = gnc_numeric_create (467013515494988LL, 100);
+	val_a = gnc_numeric_mul (frac, val_tot,
+                        gnc_numeric_denom(val_tot),
+                        GNC_HOW_RND_ROUND| GNC_HOW_DENOM_EXACT);
+	check_binary_op (gnc_numeric_create(562854125307LL, 100),
+	                 val_a, val_tot, frac,
+	                 "expected %s got %s = %s * %s for mult round");
 }
   
 /* ======================================================= */


More information about the gnucash-changes mailing list