comparison src/testdir/test95.in @ 5903:fdea5ea9afd1 v7.4.294

updated for version 7.4.294 Problem: Test files missing from patch. Solution: Patch the test files.
author Bram Moolenaar <bram@vim.org>
date Tue, 13 May 2014 20:15:37 +0200
parents 60cdaa05a6ad
children bc269cf15ccd
comparison
equal deleted inserted replaced
5902:3a1b9743d014 5903:fdea5ea9afd1
49 :call add(tl, [2, "\u05b9", " y\u05bb\u05b9 x\u05b9 ", "y\u05bb\u05b9"]) 49 :call add(tl, [2, "\u05b9", " y\u05bb\u05b9 x\u05b9 ", "y\u05bb\u05b9"])
50 :call add(tl, [2, ".\u05b9", " y\u05bb\u05b9 x\u05b9 ", "y\u05bb\u05b9"]) 50 :call add(tl, [2, ".\u05b9", " y\u05bb\u05b9 x\u05b9 ", "y\u05bb\u05b9"])
51 :call add(tl, [1, "\u05b9\u05bb", " y\u05b9 x\u05b9\u05bb ", "x\u05b9\u05bb"]) 51 :call add(tl, [1, "\u05b9\u05bb", " y\u05b9 x\u05b9\u05bb ", "x\u05b9\u05bb"])
52 :call add(tl, [2, ".\u05b9\u05bb", " y\u05bb x\u05b9\u05bb ", "x\u05b9\u05bb"]) 52 :call add(tl, [2, ".\u05b9\u05bb", " y\u05bb x\u05b9\u05bb ", "x\u05b9\u05bb"])
53 :call add(tl, [2, "a", "ca\u0300t"]) 53 :call add(tl, [2, "a", "ca\u0300t"])
54 :call add(tl, [2, "ca", "ca\u0300t"])
54 :call add(tl, [2, "a\u0300", "ca\u0300t", "a\u0300"]) 55 :call add(tl, [2, "a\u0300", "ca\u0300t", "a\u0300"])
56 :call add(tl, [2, 'a\%C', "ca\u0300t", "a\u0300"])
57 :call add(tl, [2, 'ca\%C', "ca\u0300t", "ca\u0300"])
58 :call add(tl, [2, 'ca\%Ct', "ca\u0300t", "ca\u0300t"])
55 59
56 60
57 :"""" Test \Z 61 :"""" Test \Z
58 :call add(tl, [2, 'ú\Z', 'x']) 62 :call add(tl, [2, 'ú\Z', 'x'])
59 :call add(tl, [2, 'יהוה\Z', 'יהוה', 'יהוה']) 63 :call add(tl, [2, 'יהוה\Z', 'יהוה', 'יהוה'])
89 : endif 93 : endif
90 : let &regexpengine = engine 94 : let &regexpengine = engine
91 : try 95 : try
92 : let l = matchlist(text, pat) 96 : let l = matchlist(text, pat)
93 : catch 97 : catch
94 : $put ='ERROR: pat: \"' . pat . '\", text: \"' . text . '\", caused an exception: \"' . v:exception . '\"' 98 : $put ='ERROR ' . engine . ': pat: \"' . pat . '\", text: \"' . text . '\", caused an exception: \"' . v:exception . '\"'
95 : endtry 99 : endtry
96 :" check the match itself 100 :" check the match itself
97 : if len(l) == 0 && len(t) > matchidx 101 : if len(l) == 0 && len(t) > matchidx
98 : $put ='ERROR: pat: \"' . pat . '\", text: \"' . text . '\", did not match, expected: \"' . t[matchidx] . '\"' 102 : $put ='ERROR ' . engine . ': pat: \"' . pat . '\", text: \"' . text . '\", did not match, expected: \"' . t[matchidx] . '\"'
99 : elseif len(l) > 0 && len(t) == matchidx 103 : elseif len(l) > 0 && len(t) == matchidx
100 : $put ='ERROR: pat: \"' . pat . '\", text: \"' . text . '\", match: \"' . l[0] . '\", expected no match' 104 : $put ='ERROR ' . engine . ': pat: \"' . pat . '\", text: \"' . text . '\", match: \"' . l[0] . '\", expected no match'
101 : elseif len(t) > matchidx && l[0] != t[matchidx] 105 : elseif len(t) > matchidx && l[0] != t[matchidx]
102 : $put ='ERROR: pat: \"' . pat . '\", text: \"' . text . '\", match: \"' . l[0] . '\", expected: \"' . t[matchidx] . '\"' 106 : $put ='ERROR ' . engine . ': pat: \"' . pat . '\", text: \"' . text . '\", match: \"' . l[0] . '\", expected: \"' . t[matchidx] . '\"'
103 : else 107 : else
104 : $put ='OK ' . engine . ' - ' . pat 108 : $put ='OK ' . engine . ' - ' . pat
105 : endif 109 : endif
106 : if len(l) > 0 110 : if len(l) > 0
107 :" check all the nine submatches 111 :" check all the nine submatches
110 : let e = '' 114 : let e = ''
111 : else 115 : else
112 : let e = t[matchidx + i] 116 : let e = t[matchidx + i]
113 : endif 117 : endif
114 : if l[i] != e 118 : if l[i] != e
115 : $put ='ERROR: pat: \"' . pat . '\", text: \"' . text . '\", submatch ' . i . ': \"' . l[i] . '\", expected: \"' . e . '\"' 119 : $put ='ERROR ' . engine . ': pat: \"' . pat . '\", text: \"' . text . '\", submatch ' . i . ': \"' . l[i] . '\", expected: \"' . e . '\"'
116 : endif 120 : endif
117 : endfor 121 : endfor
118 : unlet i 122 : unlet i
119 : endif 123 : endif
120 : endfor 124 : endfor