home *** CD-ROM | disk | FTP | other *** search
/ vim.ftp.fu-berlin.de / 2015-02-03.vim.ftp.fu-berlin.de.tar / vim.ftp.fu-berlin.de / patches / 7.3 / 7.3.1196 < prev    next >
Encoding:
Internet Message Format  |  2013-06-14  |  7.7 KB
  1. To: vim_dev@googlegroups.com
  2. Subject: Patch 7.3.1196
  3. Fcc: outbox
  4. From: Bram Moolenaar <Bram@moolenaar.net>
  5. Mime-Version: 1.0
  6. Content-Type: text/plain; charset=UTF-8
  7. Content-Transfer-Encoding: 8bit
  8. ------------
  9.  
  10. Patch 7.3.1196
  11. Problem:    Old regexp engine does not match pattern with backref correctly.
  12.         (Dominique Pelle)
  13. Solution:   Fix setting status.  Test multi-line patterns better.
  14. Files:        src/regexp.c, src/testdir/test64.in, src/testdir/test64.ok
  15.  
  16.  
  17. *** ../vim-7.3.1195/src/regexp.c    2013-06-14 22:48:50.000000000 +0200
  18. --- src/regexp.c    2013-06-15 14:09:21.000000000 +0200
  19. ***************
  20. *** 5021,5032 ****
  21.               {
  22.                   /* Messy situation: Need to compare between two
  23.                    * lines. */
  24. !                 status = match_with_backref(
  25.                           reg_startpos[no].lnum,
  26.                           reg_startpos[no].col,
  27.                           reg_endpos[no].lnum,
  28.                           reg_endpos[no].col,
  29.                           &len);
  30.               }
  31.               }
  32.           }
  33. --- 5021,5035 ----
  34.               {
  35.                   /* Messy situation: Need to compare between two
  36.                    * lines. */
  37. !                 int r = match_with_backref(
  38.                           reg_startpos[no].lnum,
  39.                           reg_startpos[no].col,
  40.                           reg_endpos[no].lnum,
  41.                           reg_endpos[no].col,
  42.                           &len);
  43. + 
  44. +                 if (r != RA_MATCH)
  45. +                 status = r;
  46.               }
  47.               }
  48.           }
  49. *** ../vim-7.3.1195/src/testdir/test64.in    2013-06-14 20:31:20.000000000 +0200
  50. --- src/testdir/test64.in    2013-06-15 15:05:03.000000000 +0200
  51. ***************
  52. *** 377,382 ****
  53. --- 377,383 ----
  54.   :call add(tl, [2, '\(\i\+\) \1', 'xgoo goox', 'goo goo', 'goo'])
  55.   :call add(tl, [2, '\(a\)\(b\)\(c\)\(dd\)\(e\)\(f\)\(g\)\(h\)\(i\)\1\2\3\4\5\6\7\8\9', 'xabcddefghiabcddefghix', 'abcddefghiabcddefghi', 'a', 'b', 'c', 'dd', 'e', 'f', 'g', 'h', 'i'])
  56.   :call add(tl, [2, '\(\d*\)a \1b', ' a b ', 'a b', ''])
  57. + :call add(tl, [2, '^.\(.\).\_..\1.', "aaa\naaa\nb", "aaa\naaa", 'a'])
  58.   :"
  59.   :"""" Look-behind with limit
  60.   :call add(tl, [2, '<\@<=span.', 'xxspanxx<spanyyy', 'spany'])
  61. ***************
  62. *** 453,469 ****
  63.   :endfor
  64.   :unlet t tl e l
  65.   :"
  66.   :" Check that \_[0-9] matching EOL does not break a following \>
  67. ! :" This only works on a buffer line, not with expression evaluation
  68. ! /^Find this
  69. ! /\%#=0\<\(\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\.\)\{3\}\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\>
  70. ! y$Gop:"
  71. ! /^Find this
  72. ! /\%#=1\<\(\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\.\)\{3\}\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\>
  73. ! y$Gop:"
  74. ! /^Find this
  75. ! /\%#=2\<\(\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\.\)\{3\}\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\>
  76. ! y$Gop:"
  77.   :"
  78.   :" Check that using a pattern on two lines doesn't get messed up by using
  79.   :" matchstr() with \ze in between.
  80. --- 454,501 ----
  81.   :endfor
  82.   :unlet t tl e l
  83.   :"
  84. + :"""""" multi-line tests
  85. + :let tl = []
  86. + :"
  87. + :"""" back references
  88. + :call add(tl, [2, '^.\(.\).\_..\1.', ['aaa', 'aaa', 'b'], ['XX', 'b']])
  89. + :call add(tl, [2, '\v.*\/(.*)\n.*\/\1$', ['./Dir1/Dir2/zyxwvuts.txt', './Dir1/Dir2/abcdefgh.bat', '', './Dir1/Dir2/file1.txt', './OtherDir1/OtherDir2/file1.txt'], ['./Dir1/Dir2/zyxwvuts.txt', './Dir1/Dir2/abcdefgh.bat', '', 'XX']])
  90. + :"
  91. + :"""" line breaks
  92. + :call add(tl, [2, '\S.*\nx', ['abc', 'def', 'ghi', 'xjk', 'lmn'], ['abc', 'def', 'XXjk', 'lmn']])
  93. + :"
  94.   :" Check that \_[0-9] matching EOL does not break a following \>
  95. ! :call add(tl, [2, '\<\(\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\.\)\{3\}\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\>', ['', 'localnet/192.168.0.1', ''], ['', 'localnet/XX', '']])
  96. ! :"
  97. ! :" Check a pattern with a line break and ^ and $
  98. ! :call add(tl, [2, 'a\n^b$\n^c', ['a', 'b', 'c'], ['XX']])
  99. ! :"
  100. ! :"""" Run the multi-line tests
  101. ! :"
  102. ! :$put ='multi-line tests'
  103. ! :for t in tl
  104. ! :  let re = t[0]
  105. ! :  let pat = t[1]
  106. ! :  let before = t[2]
  107. ! :  let after = t[3]
  108. ! :  for engine in [0, 1, 2]
  109. ! :    if engine == 2 && re == 0 || engine == 1 && re ==1
  110. ! :      continue
  111. ! :    endif
  112. ! :    let ®expengine = engine
  113. ! :    new
  114. ! :    call setline(1, before)
  115. ! :    exe '%s/' . pat . '/XX/'
  116. ! :    let result = getline(1, '$')
  117. ! :    q!
  118. ! :    if result != after
  119. ! :      $put ='ERROR: pat: \"' . pat . '\", text: \"' . string(before) . '\", expected: \"' . string(after) . '\", got: \"' . string(result) . '\"'
  120. ! :    else
  121. ! :      $put ='OK ' . engine . ' - ' . pat
  122. ! :    endif
  123. ! :  endfor
  124. ! :endfor
  125. ! :unlet t tl
  126.   :"
  127.   :" Check that using a pattern on two lines doesn't get messed up by using
  128.   :" matchstr() with \ze in between.
  129. ***************
  130. *** 474,497 ****
  131.   :.+1,.+2yank
  132.   Gop:"
  133.   :"
  134. - :" Check a pattern with a line break matches in the right position.
  135. - /^Multiline
  136. - /\S.*\nx
  137. - :.yank
  138. - y$Gop:"
  139. - :"
  140. - :" Check a pattern with a line break and ^ and $
  141. - /^Abc:
  142. - /a\n^b$\n^c/e
  143. - :.yank
  144. - Gop:"
  145. - :"
  146. - :" Check using a backref matching in a previous line
  147. - /^Backref:
  148. - /\v.*\/(.*)\n.*\/\1$
  149. - :.yank
  150. - Gop:"
  151. - :"
  152.   :" Check a pattern with a look beind crossing a line boundary
  153.   /^Behind:
  154.   /\(<\_[xy]\+\)\@3<=start
  155. --- 506,511 ----
  156. ***************
  157. *** 553,584 ****
  158.   :/\%#=1^Results/,$wq! test.out
  159.   ENDTEST
  160.   
  161. - Find this:
  162. - localnet/192.168.0.1
  163. - 
  164.   Substitute here:
  165.   <T="">Ta 5</Title>
  166.   <T="">Ac 7</Title>
  167.   
  168. - Multiline:
  169. - abc
  170. - def
  171. - ghi
  172. - xjk
  173. - lmn
  174. - 
  175. - Abc:
  176. - a
  177. - b
  178. - c
  179. - 
  180. - Backref:
  181. - ./Dir1/Dir2/zyxwvuts.txt
  182. - ./Dir1/Dir2/abcdefgh.bat
  183. - 
  184. - ./Dir1/Dir2/file1.txt
  185. - ./OtherDir1/OtherDir2/file1.txt
  186. - 
  187.   Behind:
  188.   asdfasd<yyy
  189.   xxstart1
  190. --- 567,576 ----
  191. *** ../vim-7.3.1195/src/testdir/test64.ok    2013-06-14 20:31:20.000000000 +0200
  192. --- src/testdir/test64.ok    2013-06-15 15:05:06.000000000 +0200
  193. ***************
  194. *** 857,862 ****
  195. --- 857,865 ----
  196.   OK 0 - \(\d*\)a \1b
  197.   OK 1 - \(\d*\)a \1b
  198.   OK 2 - \(\d*\)a \1b
  199. + OK 0 - ^.\(.\).\_..\1.
  200. + OK 1 - ^.\(.\).\_..\1.
  201. + OK 2 - ^.\(.\).\_..\1.
  202.   OK 0 - <\@<=span.
  203.   OK 1 - <\@<=span.
  204.   OK 2 - <\@<=span.
  205. ***************
  206. *** 910,926 ****
  207.   OK 0 - [0-9a-zA-Z]\{8}-\([0-9a-zA-Z]\{4}-\)\{3}[0-9a-zA-Z]\{12}
  208.   OK 1 - [0-9a-zA-Z]\{8}-\([0-9a-zA-Z]\{4}-\)\{3}[0-9a-zA-Z]\{12}
  209.   OK 2 - [0-9a-zA-Z]\{8}-\([0-9a-zA-Z]\{4}-\)\{3}[0-9a-zA-Z]\{12}
  210. ! 192.168.0.1
  211. ! 192.168.0.1
  212. ! 192.168.0.1
  213.   
  214.   <T="5">Ta 5</Title>
  215.   <T="7">Ac 7</Title>
  216. - ghi
  217. - 
  218. - c
  219. - 
  220. - ./Dir1/Dir2/file1.txt
  221.   
  222.   xxstart3
  223.   
  224. --- 913,937 ----
  225.   OK 0 - [0-9a-zA-Z]\{8}-\([0-9a-zA-Z]\{4}-\)\{3}[0-9a-zA-Z]\{12}
  226.   OK 1 - [0-9a-zA-Z]\{8}-\([0-9a-zA-Z]\{4}-\)\{3}[0-9a-zA-Z]\{12}
  227.   OK 2 - [0-9a-zA-Z]\{8}-\([0-9a-zA-Z]\{4}-\)\{3}[0-9a-zA-Z]\{12}
  228. ! multi-line tests
  229. ! OK 0 - ^.\(.\).\_..\1.
  230. ! OK 1 - ^.\(.\).\_..\1.
  231. ! OK 2 - ^.\(.\).\_..\1.
  232. ! OK 0 - \v.*\/(.*)\n.*\/\1$
  233. ! OK 1 - \v.*\/(.*)\n.*\/\1$
  234. ! OK 2 - \v.*\/(.*)\n.*\/\1$
  235. ! OK 0 - \S.*\nx
  236. ! OK 1 - \S.*\nx
  237. ! OK 2 - \S.*\nx
  238. ! OK 0 - \<\(\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\.\)\{3\}\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\>
  239. ! OK 1 - \<\(\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\.\)\{3\}\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\>
  240. ! OK 2 - \<\(\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\.\)\{3\}\(25\_[0-5]\|2\_[0-4]\_[0-9]\|\_[01]\?\_[0-9]\_[0-9]\?\)\>
  241. ! OK 0 - a\n^b$\n^c
  242. ! OK 1 - a\n^b$\n^c
  243. ! OK 2 - a\n^b$\n^c
  244.   
  245.   <T="5">Ta 5</Title>
  246.   <T="7">Ac 7</Title>
  247.   
  248.   xxstart3
  249.   
  250. *** ../vim-7.3.1195/src/version.c    2013-06-14 22:48:50.000000000 +0200
  251. --- src/version.c    2013-06-15 14:12:46.000000000 +0200
  252. ***************
  253. *** 730,731 ****
  254. --- 730,733 ----
  255.   {   /* Add new patch number below this line */
  256. + /**/
  257. +     1196,
  258.   /**/
  259.  
  260. -- 
  261. hundred-and-one symptoms of being an internet addict:
  262. 213. Your kids start referring to you as "that guy in front of the monitor."
  263.  
  264.  /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
  265. ///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
  266. \\\  an exciting new programming language -- http://www.Zimbu.org        ///
  267.  \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///
  268.