Mercurial > vim
annotate src/testdir/test_bench_regexp.vim @ 33204:36aebbf8389f v9.0.1880
patch 9.0.1880: Vim9: Need more tests for inheritance
Commit: https://github.com/vim/vim/commit/cf138d4ea5b7e4495abbc867f9bb8a6be6482762
Author: Ernie Rael <errael@raelity.com>
Date: Wed Sep 6 20:45:03 2023 +0200
patch 9.0.1880: Vim9: Need more tests for inheritance
Problem: Vim9: Need more tests for inheritance
Solution: Add access tests and fixes.
`inside_class` fix from yegappan. `object_index_from_itf_index` fix
access of member on class extending class implementing interface.
Based on tests from Vim9: Class/Object member variable access control #12979
closes: #13032
related: #12979
Signed-off-by: Christian Brabandt <cb@256bit.org>
Co-authored-by: Ernie Rael <errael@raelity.com>
Co-authored-by: Yegappan Lakshmanan <yegappan@yahoo.com>
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Wed, 06 Sep 2023 21:00:04 +0200 |
parents | 16460964c304 |
children |
rev | line source |
---|---|
20120
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
1 " Test for benchmarking the RE engine |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
2 |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
3 source check.vim |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
4 CheckFeature reltime |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
5 |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
6 func Measure(file, pattern, arg) |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
7 for re in range(3) |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
8 let sstart = reltime() |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
9 let before = ['set re=' .. re] |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
10 let after = ['call search("' .. escape(a:pattern, '\\') .. '", "", "", 10000)'] |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
11 let after += ['quit!'] |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
12 let args = empty(a:arg) ? '' : a:arg .. ' ' .. a:file |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
13 call RunVim(before, after, args) |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
14 let s = 'file: ' .. a:file .. ', re: ' .. re .. |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
15 \ ', time: ' .. reltimestr(reltime(sstart)) |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
16 call writefile([s], 'benchmark.out', "a") |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
17 endfor |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
18 endfunc |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
19 |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
20 func Test_Regex_Benchmark() |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
21 call Measure('samples/re.freeze.txt', '\s\+\%#\@<!$', '+5') |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
22 endfunc |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
23 |
16460964c304
patch 8.2.0615: regexp benchmark stest is old style
Bram Moolenaar <Bram@vim.org>
parents:
diff
changeset
|
24 " vim: shiftwidth=2 sts=2 expandtab |