Bram Moolenaar | ad48e6c | 2020-04-21 22:19:45 +0200 | [diff] [blame] | 1 | " Test for benchmarking the RE engine |
| 2 | |
| 3 | source check.vim |
| 4 | CheckFeature reltime |
| 5 | |
| 6 | func Measure(file, pattern, arg) |
| 7 | for re in range(3) |
| 8 | let sstart = reltime() |
| 9 | let before = ['set re=' .. re] |
| 10 | let after = ['call search("' .. escape(a:pattern, '\\') .. '", "", "", 10000)'] |
| 11 | let after += ['quit!'] |
| 12 | let args = empty(a:arg) ? '' : a:arg .. ' ' .. a:file |
| 13 | call RunVim(before, after, args) |
| 14 | let s = 'file: ' .. a:file .. ', re: ' .. re .. |
| 15 | \ ', time: ' .. reltimestr(reltime(sstart)) |
| 16 | call writefile([s], 'benchmark.out', "a") |
| 17 | endfor |
| 18 | endfunc |
| 19 | |
| 20 | func Test_Regex_Benchmark() |
| 21 | call Measure('samples/re.freeze.txt', '\s\+\%#\@<!$', '+5') |
| 22 | endfunc |
| 23 | |
| 24 | " vim: shiftwidth=2 sts=2 expandtab |