vendor/bc/7.1.0vendor/bc

1 files changed, 17 insertions, 0 deletions

diff --git a/tests/bc/scripts/subtract_09900.bc b/tests/bc/scripts/subtract_09900.bc
new file mode 100644
index 000000000000..d2926980b543
--- /dev/null
+++ b/tests/bc/scripts/subtract_09900.bc
@@ -0,0 +1,17 @@
+#! /usr/bin/bc -lq
+
+scale = 20
+x = 1234567890 / scale
+len = length(x) + 1 + scale
+len *= 2
+
+for (i = 0; i <= len; ++i) {
+	a[i] = x * (10^i)
+	a[i]
+}
+
+for (i = 9801; i <= 9900; ++i) {
+	for (j = 0; j < len; ++j) {
+		a[i] - a[j]
+	}
+}