Skip to content

Commit 76d08ac

Browse files
committed
Add a test for the original gzip bug, fixed in 26793e4
This was fixed a long time ago, but no test case was added. Add one now, just in case. This fails pre 26793e4 for form and tform -w2, but not tform -w4. Skip it for valgrind tform, since it takes a long time to run.
1 parent aee3289 commit 76d08ac

File tree

1 file changed

+34
-0
lines changed

1 file changed

+34
-0
lines changed

check/fixes.frm

Lines changed: 34 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -962,6 +962,40 @@ L F7 = f(10000*g5_);
962962
#pend_if mpi?
963963
assert runtime_error?
964964
*--#] Issue94 :
965+
*--#[ Issue95 :
966+
#-
967+
#: filepatches 32
968+
#: largepatches 32
969+
#: largesize 6250000
970+
#: maxtermsize 1250
971+
#: smallsize 1250000
972+
#: smallextension 2500032
973+
#: termsinsmall 12500
974+
975+
Off Statistics;
976+
977+
Symbol x,n;
978+
979+
* One fewer term than reported in the Issue, since now the
980+
* non-x term is in the initial definition of test.
981+
#define NTERMS "266905"
982+
983+
Local test = sum_(n,1,`NTERMS',x^n) - `NTERMS'*(`NTERMS'+1)/2;
984+
.sort
985+
986+
* Check all terms present
987+
Identify x^n?pos_ = n;
988+
989+
Print;
990+
.end
991+
# This takes a long time for tform under valgrind.
992+
# tform -w4 also doesn't crash here anyway (but -w2 does).
993+
#pend_if ( valgrind? && threaded? )
994+
# Also doesn't run properly for 32bit form.
995+
#require wordsize >= 4
996+
assert succeeded?
997+
assert result("test") =~ expr("0")
998+
*--#] Issue95 :
965999
*--#[ Issue95b :
9661000
#-
9671001
#:filepatches 4

0 commit comments

Comments
 (0)