d3409d5e |
1 | # Test vectors for MP textual I/O |
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; |
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 | } |