[u/mdw/catacomb] / tests / mptext

# Test vectors for MP textual I/O
#
# $Id: mptext,v 1.3 2000/06/17 12:11:34 mdw Exp $

mptext-ascii {

  # --- Perfectly valid things ---

  10 0					10 0;
  0 0					10 0;
  10 52					10 52;
  10 654365464655464577673765769678	10 654365464655464577673765769678;
  10 654365464655464577673765769678	16 8425e6d06f272b9a2d73ed1ce;
  16 8425E6D06F272B9A2D73ED1CE		10 654365464655464577673765769678;
  0 654365464655464577673765769678	16 8425e6d06f272b9a2d73ed1ce;
  0 16_8425E6D06F272B9A2D73ED1CE	10 654365464655464577673765769678;
  0 -0x8425E6D06F272B9A2D73ED1CE	10 -654365464655464577673765769678;
  8 -366570443501403714657464766613	10 -596569802840985608098409867;
  0 0366570443501403714657464766613	10 596569802840985608098409867;
  

  # --- Bogus things ---

  10 "" 0 0;			# Empty string fails
  10 foo 0 0;			# Non-numeric character
  10 134f 10 134;		# Stop parsing when reaching `f'
  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;
}
Commit	Line	Data
d3409d5e	1	# Test vectors for MP textual I/O
d3409d5e	2	#
61f9c153	3	# $Id: mptext,v 1.3 2000/06/17 12:11:34 mdw Exp $
d3409d5e	4
61f9c153	5	mptext-ascii {
d3409d5e	6
	7	# --- Perfectly valid things ---
	8
	9	10 0 10 0;
	10	0 0 10 0;
	11	10 52 10 52;
	12	10 654365464655464577673765769678 10 654365464655464577673765769678;
	13	10 654365464655464577673765769678 16 8425e6d06f272b9a2d73ed1ce;
	14	16 8425E6D06F272B9A2D73ED1CE 10 654365464655464577673765769678;
	15	0 654365464655464577673765769678 16 8425e6d06f272b9a2d73ed1ce;
	16	0 16_8425E6D06F272B9A2D73ED1CE 10 654365464655464577673765769678;
6401773a	17	0 -0x8425E6D06F272B9A2D73ED1CE 10 -654365464655464577673765769678;
6401773a	18	8 -366570443501403714657464766613 10 -596569802840985608098409867;
d3409d5e	19	0 0366570443501403714657464766613 10 596569802840985608098409867;
	20
	21
	22	# --- Bogus things ---
	23
	24	10 "" 0 0; # Empty string fails
	25	10 foo 0 0; # Non-numeric character
	26	10 134f 10 134; # Stop parsing when reaching `f'
	27	4 12345 10 27; # Stop parsing when reaching `4'
	28	0 37_ 10 37; # 37 is an invalid base, so stop at `_'
	29	0 36_ 0 0; # 36 is a valid base, so restart and fail
61f9c153	30
	31	# --- Bugs ---
	32
	33	16 -9802d5c5d5a73f9d4e694a8920f95231b4017f3ec6a4654ace3fa3d85879e5964dade0e051d57f13c275dab1df3da5331f39271efb2792d1dad4460fd5eb5c21fbf355456f523e5631e623074ff9b3e85cf5e0a9336c8d8b8621b24c4e625800ee0152d12c8e22658a66ade38cb4453ab6e4958114717355186649a6cc20d9f5ae2207f99814965035072a9f2121c8f9dd22ab134181378906291aae97287b62a2f592bbceb4198c9cd78e1968bf1e16865c3c6ce9c777232f186b5da240a24523a07faca9de44eba510c91917e099372e67a6a66e93fe7aaefcb9c5485e1a889eae721ab6407586880a95575a968b43bdf50323627aa0fcddfa4e198b0008
	34	10 -74959454570640520505374182178324326240748657042677990093617716411759477136824854815262670168473667077524864904515489090301434501507378472350618141578200289566815110468728966378289347050752371322168328511598641143081017162500179880923097593329564317427467179672704707842937085621549781627579801356509572397210965270406925309382945647493757499822518272539171346319468210919037390479279679328187057939609889863122790083219768061816093131875491575840052493376341193028052061557296969558099473333023971577236615940525630787016398581105441977909848659239970133974969366933817929047771871736452423855320657946133173829640;
	35	}
	36
	37	mptext-bin-in {
	38	-10 010203040506070809 10 123456789;
	39	-100 01172d4359 10 123456789;
	40	}
	41
	42	mptext-bin-out {
	43	10 123456789 -10 010203040506070809;
	44	10 123456789 -100 01172d4359;
d3409d5e	45	}