Macintosh-SW/mpw
1
0
Fork 0
mirror of https://github.com/ksherlock/mpw.git synced 2025-02-15 21:31:12 +00:00
Code Issues Projects Releases Wiki Activity

sane tests for inf/nan num2dec / dec2str

Browse Source
This commit is contained in:
Kelvin Sherlock 2015-03-10 12:49:11 -04:00
parent c17dd4f400
commit a726a68dfc
1 changed files with 109 additions and 57 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

166
test/test_sane.c
View File

@ -12,6 +12,105 @@ void dump_decimal(const decimal *d)
} }
void test_inf(void)
{
decimal d;
decform df;
char buffer[80+1];
printf("\nInfinity\n");
df.style = 1;
df.digits = 10;
num2dec(&df,-inf(), &d);
dump_decimal(&d);
//
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
df.style = 0;
df.digits = 10;
num2dec(&df, -inf(), &d);
dump_decimal(&d);
//
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
df.style = 1;
df.digits = 0;
num2dec(&df, inf(), &d);
dump_decimal(&d);
//
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
df.style = 0;
df.digits = 0;
num2dec(&df, inf(), &d);
dump_decimal(&d);
//
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
}
void test_nan(void)
{
// num2dec generates N[16-digit]
// str2dec generates NAN(001) -- NAN(255)
decimal d;
decform df;
char buffer[80+1];
printf("\nNaN\n");
df.style = 1;
df.digits = 0;
num2dec(&df,nan(1), &d);
dump_decimal(&d);
// 7 : N4001000000000000
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
df.style = 0;
df.digits = 0;
num2dec(&df, nan(2), &d);
dump_decimal(&d);
//
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
df.style = 1;
df.digits = 10;
num2dec(&df,-nan(3), &d);
dump_decimal(&d);
//
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
df.style = 0;
df.digits = 10;
num2dec(&df, nan(4), &d);
dump_decimal(&d);
//
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
df.style = 0;
df.digits = 10;
num2dec(&df, nan(255), &d);
dump_decimal(&d);
// 7 : N40FF000000000000
dec2str(&df, &d, buffer);
fprintf(stdout, "%s\n", buffer);
}
void test_fxc2dec(void) void test_fxc2dec(void)
{ {
decimal d; decimal d;
@ -125,55 +224,9 @@ void test_fxc2dec(void)
// //
df.style = 1;
df.digits = 0;
num2dec(&df,nan(1), &d);
dump_decimal(&d);
//
df.style = 0;
df.digits = 0;
num2dec(&df, nan(2), &d);
dump_decimal(&d);
//
df.style = 1;
df.digits = 10;
num2dec(&df,-nan(3), &d);
dump_decimal(&d);
//
df.style = 0;
df.digits = 10;
num2dec(&df, nan(4), &d);
dump_decimal(&d);
//
df.style = 1;
df.digits = 10;
num2dec(&df,-inf(), &d);
dump_decimal(&d);
//
df.style = 0;
df.digits = 10;
num2dec(&df, -inf(), &d);
dump_decimal(&d);
df.style = 1;
df.digits = 0;
num2dec(&df, inf(), &d);
dump_decimal(&d);
//
df.style = 0;
df.digits = 0;
num2dec(&df, inf(), &d);
dump_decimal(&d);
df.style = 0; df.style = 0;
@ -200,28 +253,27 @@ void test_fxc2dec(void)
dump_decimal(&d); dump_decimal(&d);
// s/b -4 0 // s/b -4 0
} }
int main(int argc, char **argv) int main(int argc, char **argv)
{ {
extended x; //extended x;
decimal d; //decimal d;
short index; //short index;
short valid; //short valid;
(void)argc; (void)argc;
(void)argv; (void)argv;
index = 0; //index = 0;
valid = 0; //valid = 0;
str2dec("1.125", &index, &d, &valid); //str2dec("1.125", &index, &d, &valid);
x = dec2num(&d); //x = dec2num(&d);
test_inf();
test_nan();
test_fxc2dec(); test_fxc2dec();