More regression tests. Test binary I/O.

diff --git a/tests/mptext b/tests/mptext
index fe26090..4c20983 100644 (file)
--- a/tests/mptext
+++ b/tests/mptext
@@ -1,8 +1,8 @@
 # Test vectors for MP textual I/O
 #
 # Test vectors for MP textual I/O
 #

-# $Id: mptext,v 1.2 1999/12/10 23:26:26 mdw Exp $
+# $Id: mptext,v 1.3 2000/06/17 12:11:34 mdw Exp $

 
 

-mptext {
+mptext-ascii {

 
   # --- Perfectly valid things ---
 
 
   # --- Perfectly valid things ---
 


@@ -27,4 +27,19 @@ mptext {
   4 12345 10 27;               # Stop parsing when reaching `4'
   0 37_ 10 37;                 # 37 is an invalid base, so stop at `_'
   0 36_ 0 0;                   # 36 is a valid base, so restart and fail
   4 12345 10 27;               # Stop parsing when reaching `4'
   0 37_ 10 37;                 # 37 is an invalid base, so stop at `_'
   0 36_ 0 0;                   # 36 is a valid base, so restart and fail

+
+  # --- Bugs ---
+
+  16 -9802d5c5d5a73f9d4e694a8920f95231b4017f3ec6a4654ace3fa3d85879e5964dade0e051d57f13c275dab1df3da5331f39271efb2792d1dad4460fd5eb5c21fbf355456f523e5631e623074ff9b3e85cf5e0a9336c8d8b8621b24c4e625800ee0152d12c8e22658a66ade38cb4453ab6e4958114717355186649a6cc20d9f5ae2207f99814965035072a9f2121c8f9dd22ab134181378906291aae97287b62a2f592bbceb4198c9cd78e1968bf1e16865c3c6ce9c777232f186b5da240a24523a07faca9de44eba510c91917e099372e67a6a66e93fe7aaefcb9c5485e1a889eae721ab6407586880a95575a968b43bdf50323627aa0fcddfa4e198b0008
+  10 -74959454570640520505374182178324326240748657042677990093617716411759477136824854815262670168473667077524864904515489090301434501507378472350618141578200289566815110468728966378289347050752371322168328511598641143081017162500179880923097593329564317427467179672704707842937085621549781627579801356509572397210965270406925309382945647493757499822518272539171346319468210919037390479279679328187057939609889863122790083219768061816093131875491575840052493376341193028052061557296969558099473333023971577236615940525630787016398581105441977909848659239970133974969366933817929047771871736452423855320657946133173829640;
+}
+
+mptext-bin-in {
+  -10 010203040506070809 10 123456789;
+  -100 01172d4359 10 123456789;
+}
+
+mptext-bin-out {
+  10 123456789 -10 010203040506070809;
+  10 123456789 -100 01172d4359;

 }
 }