X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/8826e40ce869a5c7d5b57708d3593e614d80299b..9bca44cb97d2b5d01f41163932b260ae3a900299:/tests/mp diff --git a/tests/mp b/tests/mp index 79d2980..6fe61e5 100644 --- a/tests/mp +++ b/tests/mp @@ -1,6 +1,6 @@ # Test vectors for MP functions # -# $Id: mp,v 1.9 2001/05/07 17:32:23 mdw Exp $ +# $Id: mp,v 1.12 2002/10/15 19:18:31 mdw Exp $ add { 5 4 9; 5 -4 1; -5 4 -1; -5 -4 -9; @@ -21,6 +21,42 @@ div { 9 4 2 1; -9 4 -3 3; 9 -4 -3 -3; -9 -4 2 -1; } +bin2c { + and 5 3 1; + or 5 3 7; + xor 5 3 6; + 1111 0 0 -1; + xor 0x343cd5 -0x6a49c -0x32984f; +} + +lsr2c { + -1 5 -1; + 1 5 0; + -6 2 -2; +} + +setbit { + 0 40 0x10000000000; + 0x87348 40 0x10000087348; + 5 1 7; + 7 1 7; + -3 1 -1; +} + +clrbit { + 0x10000000000 40 0; + 0x87348 40 0x87348; + 5 1 5; + 7 1 5; + -1 1 -3; +} + +neg { + 0 0; + 15 -15; + -15 15; +} + odd { 1 0 1; 2 1 1;