Properly add rat_eval_cp_dp_test

edvinolo · edvinolo · commit 24affedcd3fe · 2025-12-22T01:10:42.000+01:00
diff --git a/test/test_polynomial_eval.f90 b/test/test_polynomial_eval.f90
@@ -25,7 +25,7 @@ subroutine collect_polynomial_eval_suite(testsuite)
         new_unittest('rat_eval_re_sp test', rat_eval_re_sp_test),&
         new_unittest('rat_eval_re_dp test', rat_eval_re_dp_test),&
         new_unittest('rat_eval_cp_sp test', rat_eval_cp_sp_test),&
-        new_unittest('rat_eval_cp_sp test', rat_eval_cp_sp_test)&
+        new_unittest('rat_eval_cp_dp test', rat_eval_cp_dp_test)&
     ]
 end subroutine collect_polynomial_eval_suite
 
diff --git a/test/test_polynomial_eval.fypp b/test/test_polynomial_eval.fypp
@@ -31,7 +31,7 @@ subroutine collect_polynomial_eval_suite(testsuite)
         #: for k in KINDS[:-1]
         new_unittest('rat_eval_cp_${k}$ test', rat_eval_cp_${k}$_test),&
         #: endfor
-        new_unittest('rat_eval_cp_${k}$ test', rat_eval_cp_${k}$_test)&
+        new_unittest('rat_eval_cp_${KINDS[-1]}$ test', rat_eval_cp_${KINDS[-1]}$_test)&
     ]
 end subroutine collect_polynomial_eval_suite
 

Original file line number	Diff line number	Diff line change
`@@ -25,7 +25,7 @@ subroutine collect_polynomial_eval_suite(testsuite)`
`25`	`25`	`new_unittest('rat_eval_re_sp test', rat_eval_re_sp_test),&`
`26`	`26`	`new_unittest('rat_eval_re_dp test', rat_eval_re_dp_test),&`
`27`	`27`	`new_unittest('rat_eval_cp_sp test', rat_eval_cp_sp_test),&`
`28`		`- new_unittest('rat_eval_cp_sp test', rat_eval_cp_sp_test)&`
	`28`	`+ new_unittest('rat_eval_cp_dp test', rat_eval_cp_dp_test)&`
`29`	`29`	`]`
`30`	`30`	`end subroutine collect_polynomial_eval_suite`
`31`	`31`
Original file line number	Diff line number	Diff line change
`@@ -31,7 +31,7 @@ subroutine collect_polynomial_eval_suite(testsuite)`
`31`	`31`	`#: for k in KINDS[:-1]`
`32`	`32`	`new_unittest('rat_eval_cp_${k}$ test', rat_eval_cp_${k}$_test),&`
`33`	`33`	`#: endfor`
`34`		`- new_unittest('rat_eval_cp_${k}$ test', rat_eval_cp_${k}$_test)&`
	`34`	`+ new_unittest('rat_eval_cp_${KINDS[-1]}$ test', rat_eval_cp_${KINDS[-1]}$_test)&`
`35`	`35`	`]`
`36`	`36`	`end subroutine collect_polynomial_eval_suite`
`37`	`37`