suzanne.soy/tock-mirror
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added checks for division and remainder, and discovered some failing remainder tests

Browse Source
This commit is contained in:
Neil Brown 2009-01-22 12:49:47 +00:00
parent 98136367e0
commit 226f8b4ac4
1 changed files with 38 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

39
rangetest.c
View File

@ -99,10 +99,47 @@ int g_stopped;
testf(f(-max-1,"")); \
} while (0)
#define check_division(max, f) \
do { testp(0,f(0,1,"")); \
testp(0,f(0,-1,"")); \
testf(f(0,0,"")); \
testf(f(1,0,"")); \
testf(f(-1,0,"")); \
testf(f(max,0,"")); \
testf(f(-max-1,0,"")); \
testf(f(-max-1,-1,"")); \
testp(-max-1,f(-max-1,1,"")); \
testp(max,f(-max,-1,"")); \
testp(-max,f(max,-1,"")); \
testp(max,f(max,1,"")); \
} while (0)
#define check_rem(max, f) \
do { testp(0, f(1,1,"")); \
testp(0, f(0,1,"")); \
testp(0, f(0,-1,"")); \
testf(f(0,0,"")); \
testf(f(1,0,"")); \
testf(f(-1,0,"")); \
testf(f(max,0,"")); \
testf(f(-max-1,0,"")); \
testp(0,f(max,max,"")); \
testp(0,f(-max-1,-max-1,"")); \
testp(-1,f(-max-1,-max,"")); \
testp(-1,f(-max-1,max,"")); \
testp(3,f(3,-max-1,"")); \
testp(-3,f(-3,-max-1,"")); \
testp(max,f(max,-max-1,"")); \
testp(-max,f(-max,-max-1,"")); \
} while (0)
#define check_all(max,type) \
check_addition(max,occam_add_##type); \
check_subtraction(max,occam_subtr_##type); \
check_negation(max,occam_negate_##type);
check_negation(max,occam_negate_##type); \
check_division(max,occam_div_##type); \
check_rem(max,occam_rem_##type);
// The values of various operations (REM, shifts and so on)
// are checked by the cgtest. All we are concerned with