aboutsummaryrefslogtreecommitdiff
path: root/testsuite/factor.tests
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/factor.tests')
-rwxr-xr-xtestsuite/factor.tests23
1 files changed, 23 insertions, 0 deletions
diff --git a/testsuite/factor.tests b/testsuite/factor.tests
index 2cf4a54ce..e404e29c1 100755
--- a/testsuite/factor.tests
+++ b/testsuite/factor.tests
@@ -45,4 +45,27 @@ testing "factor \$((2*3*5*7*11*13*17*19*23*29*31*37*41*43*47))" \
"614889782588491410: 2 3 5 7 11 13 17 19 23 29 31 37 41 43 47\n" \
"" ""
+# Test that square-detection code is not buggy
+testing "factor 2 * 3037000493 * 3037000493" \
+ "factor 18446743988964486098" \
+ "18446743988964486098: 2 3037000493 3037000493\n" \
+ "" ""
+testing "factor 3 * 2479700513 * 2479700513" \
+ "factor 18446743902517389507" \
+ "18446743902517389507: 3 2479700513 2479700513\n" \
+ "" ""
+# including square-of-square cases:
+testing "factor 3 * 37831 * 37831 * 37831 * 37831" \
+ "factor 6144867742934288163" \
+ "6144867742934288163: 3 37831 37831 37831 37831\n" \
+ "" ""
+testing "factor 3 * 13^16" \
+ "factor 1996249827549539523" \
+ "1996249827549539523: 3 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13\n" \
+ "" ""
+testing "factor 13^16" \
+ "factor 665416609183179841" \
+ "665416609183179841: 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13\n" \
+ "" ""
+
exit $FAILCOUNT