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.748 < prev    next >
Encoding:
Internet Message Format  |  2012-12-04  |  14.2 KB
  1. To: vim_dev@googlegroups.com
  2. Subject: Patch 7.3.748
  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.748
  11. Problem:    Cannot properly test conceal mode.
  12. Solution:   Add the screencol() and screenrow() functions.  Use them in
  13.         test88. (Simon Ruderich)
  14. Files:        runtime/doc/eval.txt, src/eval.c, src/proto/screen.pro,
  15.         src/screen.c, src/testdir/Make_amiga.mak,
  16.         src/testdir/Make_dos.mak, src/testdir/Make_ming.mak,
  17.         src/testdir/Make_os2.mak, src/testdir/Make_vms.mms
  18.         src/testdir/Makefile, src/testdir/test88.in,
  19.         src/testdir/test88.ok
  20.  
  21.  
  22. *** ../vim-7.3.747/runtime/doc/eval.txt    2012-11-14 18:10:49.000000000 +0100
  23. --- runtime/doc/eval.txt    2012-12-05 15:45:34.000000000 +0100
  24. ***************
  25. *** 1892,1897 ****
  26. --- 1903,1910 ----
  27.   resolve( {filename})        String    get filename a shortcut points to
  28.   reverse( {list})        List    reverse {list} in-place
  29.   round( {expr})            Float    round off {expr}
  30. + screencol()            Number    current cursor column
  31. + screenrow()            Number    current cursor row
  32.   search( {pattern} [, {flags} [, {stopline} [, {timeout}]]])
  33.                   Number    search for {pattern}
  34.   searchdecl( {name} [, {global} [, {thisblock}]])
  35. ***************
  36. *** 4848,4862 ****
  37.               echo round(-4.5)
  38.   <            -5.0
  39.           {only available when compiled with the |+float| feature}
  40. !         
  41. !         
  42.   search({pattern} [, {flags} [, {stopline} [, {timeout}]]])    *search()*
  43.           Search for regexp pattern {pattern}.  The search starts at the
  44.           cursor position (you can use |cursor()| to set it).
  45.   
  46.           If there is no match a 0 is returned and the cursor doesn't
  47.           move.  No error message is given.
  48. -         When a match has been found its line number is returned.
  49.   
  50.           {flags} is a String, which can contain these character flags:
  51.           'b'    search backward instead of forward
  52. --- 4874,4907 ----
  53.               echo round(-4.5)
  54.   <            -5.0
  55.           {only available when compiled with the |+float| feature}
  56. ! 
  57. ! screencol()                            *screencol()*
  58. !         The result is a Number, which is the current screen column of
  59. !         the cursor. The leftmost column has number 1.
  60. !         This function is mainly used for testing.
  61. ! 
  62. !         Note: Always returns the current screen column, thus if used
  63. !         in a command (e.g. ":echo screencol()") it will return the
  64. !         column inside the command line, which is 1 when the command is
  65. !         executed. To get the cursor position in the file use one of
  66. !         the following mappings: >
  67. !             nnoremap <expr> GG ":echom ".screencol()."\n"
  68. !             nnoremap <silent> GG :echom screencol()<CR>
  69. ! <
  70. ! screenrow()                            *screenrow()*
  71. !         The result is a Number, which is the current screen row of the
  72. !         cursor.  The top line has number one.
  73. !         This function is mainly used for testing.
  74. ! 
  75. !         Note: Same restrictions as with |screencol()|.
  76. ! 
  77.   search({pattern} [, {flags} [, {stopline} [, {timeout}]]])    *search()*
  78.           Search for regexp pattern {pattern}.  The search starts at the
  79.           cursor position (you can use |cursor()| to set it).
  80.   
  81. +         When a match has been found its line number is returned.
  82.           If there is no match a 0 is returned and the cursor doesn't
  83.           move.  No error message is given.
  84.   
  85.           {flags} is a String, which can contain these character flags:
  86.           'b'    search backward instead of forward
  87. *** ../vim-7.3.747/src/eval.c    2012-12-05 15:16:42.000000000 +0100
  88. --- src/eval.c    2012-12-05 16:03:23.000000000 +0100
  89. ***************
  90. *** 668,673 ****
  91. --- 668,675 ----
  92.   #ifdef FEAT_FLOAT
  93.   static void f_round __ARGS((typval_T *argvars, typval_T *rettv));
  94.   #endif
  95. + static void f_screencol __ARGS((typval_T *argvars, typval_T *rettv));
  96. + static void f_screenrow __ARGS((typval_T *argvars, typval_T *rettv));
  97.   static void f_search __ARGS((typval_T *argvars, typval_T *rettv));
  98.   static void f_searchdecl __ARGS((typval_T *argvars, typval_T *rettv));
  99.   static void f_searchpair __ARGS((typval_T *argvars, typval_T *rettv));
  100. ***************
  101. *** 8033,8038 ****
  102. --- 8035,8042 ----
  103.   #ifdef FEAT_FLOAT
  104.       {"round",        1, 1, f_round},
  105.   #endif
  106. +     {"screencol",    0, 0, f_screencol},
  107. +     {"screenrow",    0, 0, f_screenrow},
  108.       {"search",        1, 4, f_search},
  109.       {"searchdecl",    1, 3, f_searchdecl},
  110.       {"searchpair",    3, 7, f_searchpair},
  111. ***************
  112. *** 15725,15730 ****
  113. --- 15729,15758 ----
  114.   #endif
  115.   
  116.   /*
  117. +  * "screencol()" function
  118. +  *
  119. +  * First column is 1 to be consistent with virtcol().
  120. +  */
  121. +     static void
  122. + f_screencol(argvars, rettv)
  123. +     typval_T    *argvars UNUSED;
  124. +     typval_T    *rettv;
  125. + {
  126. +     rettv->vval.v_number = screen_screencol() + 1;
  127. + }
  128. + 
  129. + /*
  130. +  * "screenrow()" function
  131. +  */
  132. +     static void
  133. + f_screenrow(argvars, rettv)
  134. +     typval_T    *argvars UNUSED;
  135. +     typval_T    *rettv;
  136. + {
  137. +     rettv->vval.v_number = screen_screenrow() + 1;
  138. + }
  139. + 
  140. + /*
  141.    * "search()" function
  142.    */
  143.       static void
  144. *** ../vim-7.3.747/src/proto/screen.pro    2012-11-20 16:56:49.000000000 +0100
  145. --- src/proto/screen.pro    2012-12-05 15:57:35.000000000 +0100
  146. ***************
  147. *** 50,53 ****
  148. --- 50,55 ----
  149.   int messaging __ARGS((void));
  150.   void showruler __ARGS((int always));
  151.   int number_width __ARGS((win_T *wp));
  152. + int screen_screencol __ARGS((void));
  153. + int screen_screenrow __ARGS((void));
  154.   /* vim: set ft=c : */
  155. *** ../vim-7.3.747/src/screen.c    2012-12-05 15:32:24.000000000 +0100
  156. --- src/screen.c    2012-12-05 15:58:02.000000000 +0100
  157. ***************
  158. *** 10264,10266 ****
  159. --- 10264,10286 ----
  160.       return n;
  161.   }
  162.   #endif
  163. + 
  164. + /*
  165. +  * Return the current cursor column. This is the actual position on the
  166. +  * screen. First column is 0.
  167. +  */
  168. +     int
  169. + screen_screencol()
  170. + {
  171. +     return screen_cur_col;
  172. + }
  173. + 
  174. + /*
  175. +  * Return the current cursor row. This is the actual position on the screen.
  176. +  * First row is 0.
  177. +  */
  178. +     int
  179. + screen_screenrow()
  180. + {
  181. +     return screen_cur_row;
  182. + }
  183. *** ../vim-7.3.747/src/testdir/Make_amiga.mak    2012-06-29 12:54:32.000000000 +0200
  184. --- src/testdir/Make_amiga.mak    2012-12-05 16:00:14.000000000 +0100
  185. ***************
  186. *** 31,37 ****
  187.           test66.out test67.out test68.out test69.out test70.out \
  188.           test71.out test72.out test73.out test74.out test75.out \
  189.           test76.out test77.out test78.out test79.out test80.out \
  190. !         test81.out test82.out test83.out test84.out
  191.   
  192.   .SUFFIXES: .in .out
  193.   
  194. --- 31,37 ----
  195.           test66.out test67.out test68.out test69.out test70.out \
  196.           test71.out test72.out test73.out test74.out test75.out \
  197.           test76.out test77.out test78.out test79.out test80.out \
  198. !         test81.out test82.out test83.out test84.out test88.out
  199.   
  200.   .SUFFIXES: .in .out
  201.   
  202. ***************
  203. *** 135,137 ****
  204. --- 135,138 ----
  205.   test82.out: test82.in
  206.   test83.out: test83.in
  207.   test84.out: test84.in
  208. + test88.out: test88.in
  209. *** ../vim-7.3.747/src/testdir/Make_dos.mak    2012-10-06 19:10:29.000000000 +0200
  210. --- src/testdir/Make_dos.mak    2012-12-05 16:00:29.000000000 +0100
  211. ***************
  212. *** 30,36 ****
  213.           test68.out test69.out test71.out test72.out test73.out \
  214.           test74.out test75.out test76.out test77.out test78.out \
  215.           test79.out test80.out test81.out test82.out test83.out \
  216. !         test84.out test85.out test86.out test87.out
  217.   
  218.   SCRIPTS32 =    test50.out test70.out
  219.   
  220. --- 30,36 ----
  221.           test68.out test69.out test71.out test72.out test73.out \
  222.           test74.out test75.out test76.out test77.out test78.out \
  223.           test79.out test80.out test81.out test82.out test83.out \
  224. !         test84.out test85.out test86.out test87.out test88.out
  225.   
  226.   SCRIPTS32 =    test50.out test70.out
  227.   
  228. *** ../vim-7.3.747/src/testdir/Make_ming.mak    2012-10-06 19:10:29.000000000 +0200
  229. --- src/testdir/Make_ming.mak    2012-12-05 16:00:40.000000000 +0100
  230. ***************
  231. *** 50,56 ****
  232.           test68.out test69.out test71.out test72.out test73.out \
  233.           test74.out test75.out test76.out test77.out test78.out \
  234.           test79.out test80.out test81.out test82.out test83.out \
  235. !         test84.out test85.out test86.out test87.out
  236.   
  237.   SCRIPTS32 =    test50.out test70.out
  238.   
  239. --- 50,56 ----
  240.           test68.out test69.out test71.out test72.out test73.out \
  241.           test74.out test75.out test76.out test77.out test78.out \
  242.           test79.out test80.out test81.out test82.out test83.out \
  243. !         test84.out test85.out test86.out test87.out test88.out
  244.   
  245.   SCRIPTS32 =    test50.out test70.out
  246.   
  247. *** ../vim-7.3.747/src/testdir/Make_os2.mak    2012-06-29 12:54:32.000000000 +0200
  248. --- src/testdir/Make_os2.mak    2012-12-05 16:00:50.000000000 +0100
  249. ***************
  250. *** 31,37 ****
  251.           test66.out test67.out test68.out test69.out test70.out \
  252.           test71.out test72.out test73.out test74.out test75.out \
  253.           test76.out test77.out test78.out test79.out test80.out \
  254. !         test81.out test82.out test83.out test84.out
  255.   
  256.   .SUFFIXES: .in .out
  257.   
  258. --- 31,37 ----
  259.           test66.out test67.out test68.out test69.out test70.out \
  260.           test71.out test72.out test73.out test74.out test75.out \
  261.           test76.out test77.out test78.out test79.out test80.out \
  262. !         test81.out test82.out test83.out test84.out test88.out
  263.   
  264.   .SUFFIXES: .in .out
  265.   
  266. *** ../vim-7.3.747/src/testdir/Make_vms.mms    2012-10-06 19:10:29.000000000 +0200
  267. --- src/testdir/Make_vms.mms    2012-12-05 16:01:03.000000000 +0100
  268. ***************
  269. *** 4,10 ****
  270.   # Authors:    Zoltan Arpadffy, <arpadffy@polarhome.com>
  271.   #        Sandor Kopanyi,  <sandor.kopanyi@mailbox.hu>
  272.   #
  273. ! # Last change:  2012 Oct 06
  274.   #
  275.   # This has been tested on VMS 6.2 to 8.3 on DEC Alpha, VAX and IA64.
  276.   # Edit the lines in the Configuration section below to select.
  277. --- 4,10 ----
  278.   # Authors:    Zoltan Arpadffy, <arpadffy@polarhome.com>
  279.   #        Sandor Kopanyi,  <sandor.kopanyi@mailbox.hu>
  280.   #
  281. ! # Last change:  2012 Dec 05
  282.   #
  283.   # This has been tested on VMS 6.2 to 8.3 on DEC Alpha, VAX and IA64.
  284.   # Edit the lines in the Configuration section below to select.
  285. ***************
  286. *** 76,82 ****
  287.        test66.out test67.out test68.out test69.out \
  288.        test71.out test72.out test74.out test75.out test76.out \
  289.        test77.out test78.out test79.out test80.out test81.out \
  290. !      test82.out test83.out test84.out
  291.   
  292.   # Known problems:
  293.   # Test 30: a problem around mac format - unknown reason
  294. --- 76,82 ----
  295.        test66.out test67.out test68.out test69.out \
  296.        test71.out test72.out test74.out test75.out test76.out \
  297.        test77.out test78.out test79.out test80.out test81.out \
  298. !      test82.out test83.out test84.out test88.out
  299.   
  300.   # Known problems:
  301.   # Test 30: a problem around mac format - unknown reason
  302. *** ../vim-7.3.747/src/testdir/Makefile    2012-10-06 19:10:29.000000000 +0200
  303. --- src/testdir/Makefile    2012-12-05 15:59:02.000000000 +0100
  304. ***************
  305. *** 13,19 ****
  306.   
  307.   SCRIPTS = test1.out test2.out test3.out test4.out test5.out test6.out \
  308.           test7.out test8.out test9.out test10.out test11.out \
  309. !         test12.out  test13.out test14.out test15.out test17.out \
  310.           test18.out test19.out test20.out test21.out test22.out \
  311.           test23.out test24.out test25.out test26.out test27.out \
  312.           test28.out test29.out test30.out test31.out test32.out \
  313. --- 13,19 ----
  314.   
  315.   SCRIPTS = test1.out test2.out test3.out test4.out test5.out test6.out \
  316.           test7.out test8.out test9.out test10.out test11.out \
  317. !         test12.out test13.out test14.out test15.out test17.out \
  318.           test18.out test19.out test20.out test21.out test22.out \
  319.           test23.out test24.out test25.out test26.out test27.out \
  320.           test28.out test29.out test30.out test31.out test32.out \
  321. ***************
  322. *** 27,33 ****
  323.           test69.out test70.out test71.out test72.out test73.out \
  324.           test74.out test75.out test76.out test77.out test78.out \
  325.           test79.out test80.out test81.out test82.out test83.out \
  326. !         test84.out test85.out test86.out test87.out
  327.   
  328.   SCRIPTS_GUI = test16.out
  329.   
  330. --- 27,33 ----
  331.           test69.out test70.out test71.out test72.out test73.out \
  332.           test74.out test75.out test76.out test77.out test78.out \
  333.           test79.out test80.out test81.out test82.out test83.out \
  334. !         test84.out test85.out test86.out test87.out test88.out
  335.   
  336.   SCRIPTS_GUI = test16.out
  337.   
  338. *** ../vim-7.3.747/src/testdir/test88.in    2012-12-05 16:08:56.000000000 +0100
  339. --- src/testdir/test88.in    2012-12-05 15:40:05.000000000 +0100
  340. ***************
  341. *** 0 ****
  342. --- 1,85 ----
  343. + vim: set ft=vim
  344. + 
  345. + Tests for correct display (cursor column position) with +conceal and
  346. + tabulators.
  347. + 
  348. + STARTTEST
  349. + :so small.vim
  350. + :if !has('conceal')
  351. +    e! test.ok
  352. +    wq! test.out
  353. + :endif
  354. + :" Conceal settings.
  355. + :set conceallevel=2
  356. + :set concealcursor=nc
  357. + :syntax match test /|/ conceal
  358. + :" Save current cursor position. Only works in <expr> mode, can't be used
  359. + :" with :normal because it moves the cursor to the command line. Thanks to ZyX
  360. + :" <zyx.vim@gmail.com> for the idea to use an <expr> mapping.
  361. + :let positions = []
  362. + :nnoremap <expr> GG ":let positions += ['".screenrow().":".screencol()."']\n"
  363. + :" Start test.
  364. + /^start:
  365. + :normal ztj
  366. + GGk
  367. + :" We should end up in the same column when running these commands on the two
  368. + :" lines.
  369. + :normal ft
  370. + GGk
  371. + :normal $
  372. + GGk
  373. + :normal 0j
  374. + GGk
  375. + :normal ft
  376. + GGk
  377. + :normal $
  378. + GGk
  379. + :normal 0j0j
  380. + GGk
  381. + :" Same for next test block.
  382. + :normal ft
  383. + GGk
  384. + :normal $
  385. + GGk
  386. + :normal 0j
  387. + GGk
  388. + :normal ft
  389. + GGk
  390. + :normal $
  391. + GGk
  392. + :normal 0j0j
  393. + GGk
  394. + :" And check W with multiple tabs and conceals in a line.
  395. + :normal W
  396. + GGk
  397. + :normal W
  398. + GGk
  399. + :normal W
  400. + GGk
  401. + :normal $
  402. + GGk
  403. + :normal 0j
  404. + GGk
  405. + :normal W
  406. + GGk
  407. + :normal W
  408. + GGk
  409. + :normal W
  410. + GGk
  411. + :normal $
  412. + GGk
  413. + :" Display result.
  414. + :call append('$', 'end:')
  415. + :call append('$', positions)
  416. + :/^end/,$wq! test.out
  417. + ENDTEST
  418. + 
  419. + start:
  420. + .concealed.     text
  421. + |concealed|    text
  422. + 
  423. +     .concealed.    text
  424. +     |concealed|    text
  425. + 
  426. + .a.    .b.    .c.    .d.
  427. + |a|    |b|    |c|    |d|
  428. *** ../vim-7.3.747/src/testdir/test88.ok    2012-12-05 16:08:56.000000000 +0100
  429. --- src/testdir/test88.ok    2012-12-05 15:40:05.000000000 +0100
  430. ***************
  431. *** 0 ****
  432. --- 1,23 ----
  433. + end:
  434. + 2:1
  435. + 2:17
  436. + 2:20
  437. + 3:1
  438. + 3:17
  439. + 3:20
  440. + 5:8
  441. + 5:25
  442. + 5:28
  443. + 6:8
  444. + 6:25
  445. + 6:28
  446. + 8:1
  447. + 8:9
  448. + 8:17
  449. + 8:25
  450. + 8:27
  451. + 9:1
  452. + 9:9
  453. + 9:17
  454. + 9:25
  455. + 9:26
  456. *** ../vim-7.3.747/src/version.c    2012-12-05 15:32:24.000000000 +0100
  457. --- src/version.c    2012-12-05 16:07:46.000000000 +0100
  458. ***************
  459. *** 727,728 ****
  460. --- 727,730 ----
  461.   {   /* Add new patch number below this line */
  462. + /**/
  463. +     748,
  464.   /**/
  465.  
  466. -- 
  467. hundred-and-one symptoms of being an internet addict:
  468. 101. U can read htis w/o ny porblm and cant figur eout Y its evn listd.
  469.  
  470.  /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
  471. ///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
  472. \\\  an exciting new programming language -- http://www.Zimbu.org        ///
  473.  \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///
  474.