Add a special section in the testsuite for regressions.
This commit is contained in:
+6
-1
@@ -53,6 +53,12 @@ checkutils()
|
||||
#check "$ZZOPTS" "-i cut -b1- < $file" "|cut -b1-"
|
||||
;;
|
||||
esac
|
||||
# Regression tests for stuff that used to break
|
||||
check "$ZZOPTS" "$ZZCAT \"fread(1,33000) fseek(1,SEEK_SET) fread(1,1) fseek(4093,SEEK_CUR) fread(1,1) fseek(1,SEEK_CUR) fread(1,1)\" $file" \
|
||||
"eglibc (2.9-21) bug regression"
|
||||
check "$ZZOPTS" "$ZZCAT \"repeat(33000,getc_unlocked() ungetc() getline())\" $file" \
|
||||
"sed getc_unlocked() bug regression"
|
||||
# Misc tests
|
||||
for n in \
|
||||
"fread(1,33000)" \
|
||||
"repeat(33,fread(1,1000))" \
|
||||
@@ -84,7 +90,6 @@ checkutils()
|
||||
"fread(1,33000) rewind() repeat(10000,fseek(4,SEEK_CUR) fread(1,4))" \
|
||||
"repeat(33000,getc() ungetc() getline())" \
|
||||
"repeat(33000,fgetc() ungetc() getline())" \
|
||||
"repeat(33000,getc_unlocked() ungetc() getline())" \
|
||||
"fread(1,33000) fseek(1000,SEEK_CUR) repeat(10000,fread(1,2))" \
|
||||
"fread(1,33000) fseek(1000,SEEK_CUR) repeat(10000,getc())" \
|
||||
"fread(1,33000) fseek(1000,SEEK_CUR) repeat(10000,fgetc())" \
|
||||
|
||||
Reference in New Issue
Block a user