drygdryg/calc
1
0
Fork 0
mirror of https://github.com/lcn2/calc.git synced 2025-08-16 01:03:29 +03:00
Code Issues Packages Projects Releases Wiki Activity

move versin() and coversin() code

Browse Source 
Moved versin() and coversin() to bottom of functions in func.c
(however the builtin function list remains sorted).

Created a historical trig functions section for cmath.h and qmath.h.

Moved cal/test3500.cal to cal/test9300.cal to make room
for future trip tests going from test 3427 thru 3599.
This commit is contained in:
Landon Curt Noll
2023-09-01 23:53:30 -07:00
parent 7398fbb2e9
commit 20ce75a06d
6 changed files with 137 additions and 119 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
cal/Makefile
View File

@@ -120,7 +120,7 @@ V=@:
#
# Please use:
#
# make calc_files_list
# make clobber >/dev/null && make calc_files_list
#
# to keep this list in nice sorted order.
#
@@ -137,10 +137,10 @@ CALC_FILES= README alg_config.cal beer.cal bernoulli.cal \
smallfactors.cal solve.cal specialfunctions.cal splitbits.cal \
statistics.cal strings.cal sumsq.cal sumtimes.cal surd.cal \
test1700.cal test2300.cal test2600.cal test2700.cal test3100.cal \
test3300.cal test3400.cal test3500.cal test4000.cal test4100.cal \
test4600.cal test5100.cal test5200.cal test8400.cal test8500.cal \
test8600.cal test8900.cal toomcook.cal unitfrac.cal varargs.cal \
xx_print.cal zeta2.cal
test3300.cal test3400.cal test4000.cal test4100.cal test4600.cal \
test5100.cal test5200.cal test8400.cal test8500.cal test8600.cal \
test8900.cal test9300.cal toomcook.cal unitfrac.cal varargs.cal \
w2f.cal xx_print.cal zeta2.cal
# These calc files are now obsolete and are removed by the install rule.
#

22
cal/regress.cal
View File

@@ -3566,17 +3566,20 @@ print '051: parsed test_trig()';
/*
* test_frem - tests of the functions frem, fcnt, gcdrem
*
* NOTE: We haved test3500 to test9300. We parse this code here,
* however we execute this code as a 9300 test.
*/
read -once "test3500";
print '052: read -once test3500';
read -once "test9300";
print '052: read -once test9300';
/**/
define test_frem()
{
local tnum; /* test number */
print '3500: Beginning test_frem';
print '9300: Beginning test_frem';
tnum = test3500(1, 3501, 200, 61);
tnum = test9300(1, 9301, 200, 61);
print tnum: ': Ending test_frem';
}
@@ -8085,8 +8088,6 @@ return test_det();
print;
return test_trig();
print;
return test_frem();
print;
return test_error();
print;
return test_param();
@@ -8867,6 +8868,15 @@ print '9100: parsed test_functions3()';
print;
return test_functions3();
/*
* test_frem - tests of the functions frem, fcnt, gcdrem
*
* NOTE: We haved test3500 to test9300. We parse this code here,
* however we execute this code as a 9300 test.
*/
print;
return test_frem();
/*
* read various calc resource files

12
cal/test3500.cal → cal/test9300.cal
View File

@@ -1,7 +1,7 @@
/*
* test3500 - 3500 series of the regress.cal test suite
* test9300 - 9300 series of the regress.cal test suite
*
* Copyright (C) 1999 Ernest Bowen and Landon Curt Noll
* Copyright (C) 1999,2023 Ernest Bowen and Landon Curt Noll
*
* Primary author: Ernest Bowen
*
@@ -255,16 +255,16 @@ define testh(str,n,N,verbose)
}
/*
* test3500 - perform all of the above tests a bunch of times
* test9300 - perform all of the above tests a bunch of times
*/
define test3500(verbose, tnum, n, N)
define test9300(verbose, tnum, n, N)
{
/* set test parameters */
if (isnull(verbose)) {
verbose = defaultverbose;
}
if (isnull(tnum)) {
tnum = 3501; /* default test number */
tnum = 9301; /* default test number */
}
if (isnull(n)) {
n = 200;
@@ -276,7 +276,7 @@ define test3500(verbose, tnum, n, N)
/*
* test a lot of stuff
*/
srand(3500e3500);
srand(9300e9300);
err += testf(strcat(str(tnum++), ": frem/fcnt"), n, verbose);
err += testg(strcat(str(tnum++), ": gcdrem"), n, verbose);
err += testh(strcat(str(tnum++),": gcdrem #2"), n, N, verbose);