diff options
| author | Sverker Eriksson <[email protected]> | 2019-08-19 19:44:52 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2019-08-22 17:26:01 +0200 |
| commit | f7b6235ca36a5fccd7e4c77df0d9052d3de5c554 (patch) | |
| tree | d1973c8eb0687792179705d8214572d18ffd3352 | |
| parent | 44c7f022e3a0e9c1fc2f906790413946cb48e58b (diff) | |
| download | otp-f7b6235ca36a5fccd7e4c77df0d9052d3de5c554.tar.gz otp-f7b6235ca36a5fccd7e4c77df0d9052d3de5c554.tar.bz2 otp-f7b6235ca36a5fccd7e4c77df0d9052d3de5c554.zip | |
stdlib: Fix ets_SUITE:tabfile_ext4
on machines with long host names.
Move forward the file location interval to corrupt.
An ETS table file corrupted in the header may still be readable
with table content unchanged and that will cause tabfile_ext4 to fail.
The header length increase with long host names and added table options.
| -rw-r--r-- | lib/stdlib/test/ets_SUITE.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/stdlib/test/ets_SUITE.erl b/lib/stdlib/test/ets_SUITE.erl index 05893a92b0..b23cdf5900 100644 --- a/lib/stdlib/test/ets_SUITE.erl +++ b/lib/stdlib/test/ets_SUITE.erl @@ -4984,7 +4984,7 @@ tabfile_ext4(Config) when is_list(Config) -> {error,Y} = ets:file2tab(FName,[{verify,true}]), ets:tab2file(TL,FName,[{extended_info,[md5sum]}]), {X,Y} - end || N <- lists:seq(500,600)], + end || N <- lists:seq(700,800)], io:format("~p~n",[Res]), file:delete(FName) end), |