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 / old / 5.5.032 < prev    next >
Encoding:
Internet Message Format  |  1999-10-23  |  16.5 KB
  1. To: vim-dev@vim.org
  2. Subject: patch 5.5.032
  3. Fcc: outbox
  4. From: Bram Moolenaar <Bram@moolenaar.net>
  5. ------------
  6.  
  7. Patch 5.5.032 (depends on patch 5.5.025)
  8. Problem:    Patch 5.5.025 wasn't right.  And C highlighting was still not
  9.             working correctly for a #define.
  10. Solution:   Added "excludenl" argument to ":syntax", to be able not to extend
  11.             a containing item when there is a match with the end-of-line.
  12. Files:      src/syntax.c, runtime/doc/syntax.txt, runtime/syntax/c.vim
  13.  
  14.  
  15. *** ../vim-5.5.31/src/syntax.c    Sun Oct 17 15:45:09 1999
  16. --- src/syntax.c    Tue Oct 19 10:42:33 1999
  17. ***************
  18. *** 162,167 ****
  19. --- 162,168 ----
  20.   #define HL_SKIPWHITE    0x100    /* nextgroup can skip white space */
  21.   #define HL_SKIPEMPTY    0x200    /* nextgroup can skip empty lines */
  22.   #define HL_KEEPEND    0x400    /* end match always kept */
  23. + #define HL_EXCLUDENL    0x800    /* exclude NL from match */
  24.   
  25.   #define SYN_ITEMS(buf)    ((struct syn_pattern *)((buf)->b_syn_patterns.ga_data))
  26.   
  27. ***************
  28. *** 1701,1714 ****
  29.            * Only for a region the search for the end continues after
  30.            * the end of the contained item.  If the contained match
  31.            * included the end-of-line, break here, the region continues.
  32. !          * Don't do this when "keepend" is used.
  33.            */
  34.           if (SYN_ITEMS(syn_buf)[cur_si->si_idx].sp_type == SPTYPE_START
  35. !                  && !(cur_si->si_flags & (HL_MATCH | HL_KEEPEND))
  36. !                  && keepend_level < 0)
  37.           {
  38.               update_si_end(cur_si, line, (int)current_col);
  39. !             if (current_next_flags & HL_HAS_EOL)
  40.               break;
  41.           }
  42.           }
  43. --- 1702,1719 ----
  44.            * Only for a region the search for the end continues after
  45.            * the end of the contained item.  If the contained match
  46.            * included the end-of-line, break here, the region continues.
  47. !          * Don't do this when:
  48. !          * - "keepend" is used for the contained item
  49. !          * - not at the end of the line (could be end="x$"me=e-1).
  50. !          * - "excludenl" is used (HL_HAS_EOL won't be set)
  51.            */
  52.           if (SYN_ITEMS(syn_buf)[cur_si->si_idx].sp_type == SPTYPE_START
  53. !                  && !(cur_si->si_flags & (HL_MATCH | HL_KEEPEND)))
  54.           {
  55.               update_si_end(cur_si, line, (int)current_col);
  56. !             if ((current_next_flags & HL_HAS_EOL)
  57. !                 && keepend_level < 0
  58. !                 && line[current_col] == NUL)
  59.               break;
  60.           }
  61.           }
  62. ***************
  63. *** 2639,2644 ****
  64. --- 2644,2654 ----
  65.           msg_puts_attr((char_u *)"keepend", attr);
  66.           msg_putchar(' ');
  67.       }
  68. +     if (spp->sp_flags & HL_EXCLUDENL)
  69. +     {
  70. +         msg_puts_attr((char_u *)"excludenl", attr);
  71. +         msg_putchar(' ');
  72. +     }
  73.       if (spp->sp_flags & HL_TRANSP)
  74.       {
  75.           msg_puts_attr((char_u *)"transparent", attr);
  76. ***************
  77. *** 3084,3089 ****
  78. --- 3094,3100 ----
  79.       } flagtab[] = { {"contained",   9,    HL_CONTAINED},
  80.               {"oneline",        7,    HL_ONELINE},
  81.               {"keepend",        7,    HL_KEEPEND},
  82. +             {"excludenl",   9,    HL_EXCLUDENL},
  83.               {"transparent", 11, HL_TRANSP},
  84.               {"skipnl",        6,    HL_SKIPNL},
  85.               {"skipwhite",   9,    HL_SKIPWHITE},
  86. ***************
  87. *** 3385,3391 ****
  88.       init_syn_patterns();
  89.       vim_memset(&item, 0, sizeof(item));
  90.       rest = get_syn_pattern(rest, &item);
  91. !     if (vim_regcomp_had_eol())
  92.       flags |= HL_HAS_EOL;
  93.   
  94.       /* Get options after the pattern */
  95. --- 3396,3402 ----
  96.       init_syn_patterns();
  97.       vim_memset(&item, 0, sizeof(item));
  98.       rest = get_syn_pattern(rest, &item);
  99. !     if (vim_regcomp_had_eol() && !(flags & HL_EXCLUDENL))
  100.       flags |= HL_HAS_EOL;
  101.   
  102.       /* Get options after the pattern */
  103. ***************
  104. *** 3586,3592 ****
  105.            * Get the syntax pattern and the following offset(s).
  106.            */
  107.           rest = get_syn_pattern(rest, ppp->pp_synp);
  108. !         if (item == ITEM_END && vim_regcomp_had_eol())
  109.           ppp->pp_synp->sp_flags |= HL_HAS_EOL;
  110.           ppp->pp_matchgroup_id = matchgroup_id;
  111.           ++pat_count;
  112. --- 3597,3604 ----
  113.            * Get the syntax pattern and the following offset(s).
  114.            */
  115.           rest = get_syn_pattern(rest, ppp->pp_synp);
  116. !         if (item == ITEM_END && vim_regcomp_had_eol()
  117. !                            && !(flags & HL_EXCLUDENL))
  118.           ppp->pp_synp->sp_flags |= HL_HAS_EOL;
  119.           ppp->pp_matchgroup_id = matchgroup_id;
  120.           ++pat_count;
  121. *** ../vim-5.5.31/runtime/doc/syntax.txt    Wed Sep 22 10:06:42 1999
  122. --- runtime/doc/syntax.txt    Wed Oct 20 10:10:32 1999
  123. ***************
  124. *** 1,4 ****
  125. ! *syntax.txt*    For Vim version 5.5.  Last change: 1999 Sep 19
  126.   
  127.   
  128.             VIM REFERENCE MANUAL    by Bram Moolenaar
  129. --- 1,4 ----
  130. ! *syntax.txt*    For Vim version 5.5.  Last change: 1999 Oct 20
  131.   
  132.   
  133.             VIM REFERENCE MANUAL    by Bram Moolenaar
  134. ***************
  135. *** 1046,1051 ****
  136. --- 1046,1055 ----
  137.       variations at once:
  138.   >  :syntax keyword   VimCommand   ab[breviate] n[ext]
  139.   
  140. +     Don't forget that a keyword can only be recognized if all the
  141. +     characters are included in the 'iskeyword' option.  If one character
  142. +     isn't, the keyword will never be recognized.
  143. + 
  144.       A keyword always has higher priority than a match or region, the
  145.       keyword is used if more than one item matches.  Keywords do not nest
  146.       and a keyword can't contain anything else.
  147. ***************
  148. *** 1069,1080 ****
  149.   
  150.   DEFINING MATCHES                    *:syn-match*
  151.   
  152. ! :sy[ntax] match {group-name} [{options}] {pattern} [{options}]
  153.   
  154.       This defines one match.
  155.   
  156.       {group-name}        A syntax group name such as "Comment".
  157.       [{options}]        See |:syn-arguments| below.
  158.       {pattern}        The search pattern that defines the match.
  159.                   See |:syn-pattern| below.
  160.   
  161. --- 1073,1087 ----
  162.   
  163.   DEFINING MATCHES                    *:syn-match*
  164.   
  165. ! :sy[ntax] match {group-name} [{options}] [excludenl] {pattern} [{options}]
  166.   
  167.       This defines one match.
  168.   
  169.       {group-name}        A syntax group name such as "Comment".
  170.       [{options}]        See |:syn-arguments| below.
  171. +     [excludenl]        Don't make a pattern with the end-of-line "$"
  172. +                 extend a containing match or region.  Must be
  173. +                 given before the pattern. |:syn-excludenl|
  174.       {pattern}        The search pattern that defines the match.
  175.                   See |:syn-pattern| below.
  176.   
  177. ***************
  178. *** 1087,1092 ****
  179. --- 1094,1100 ----
  180.   :sy[ntax] region {group-name} [{options}]
  181.           [matchgroup={group_name}]
  182.           [keepend]
  183. +         [excludenl]
  184.           start={start_pattern} ..
  185.           [skip={skip_pattern}]
  186.           end={end_pattern} ..
  187. ***************
  188. *** 1105,1110 ****
  189. --- 1113,1122 ----
  190.       keepend            Don't allow contained matches to go past a
  191.                   match with the end pattern.  See
  192.                   |:syn-keepend|.
  193. +     excludenl        Don't make a pattern with the end-of-line "$"
  194. +                 extend a containing match or item.  Only
  195. +                 useful for end patterns.  Must be given before
  196. +                 the patterns it applies to. |:syn-excludenl|
  197.       start={start_pattern}    The search pattern that defines the start of
  198.                   the region.  See |:syn-pattern| below.
  199.       skip={skip_pattern}    The search pattern that defines text inside
  200. ***************
  201. *** 1125,1131 ****
  202.   
  203.       When more than one start pattern is given, a match with one of these
  204.       is sufficient.  This means there is an OR relation between the start
  205. !     patterns.  The first one that matches is used.  The same is true for
  206.       the end patterns.
  207.   
  208.       The search for the end pattern starts at the start of the region.
  209. --- 1137,1143 ----
  210.   
  211.       When more than one start pattern is given, a match with one of these
  212.       is sufficient.  This means there is an OR relation between the start
  213. !     patterns.  The last one that matches is used.  The same is true for
  214.       the end patterns.
  215.   
  216.       The search for the end pattern starts at the start of the region.
  217. ***************
  218. *** 1163,1168 ****
  219. --- 1175,1195 ----
  220.       after each contained match.  When "keepend" is included, the first
  221.       encountered match with an end pattern is used, truncating any
  222.       contained matches.
  223. + 
  224. +                             *:syn-excludenl*
  225. +     When a pattern for a match or end pattern of a region includes a '$'
  226. +     to match the end-of-line, it will make an item that it is contained in
  227. +     continue on the next line.  For example, a match with "\\$" (backslash
  228. +     at the end of the line) can make a match continue that would normally
  229. +     stop at the end of the line.  This is the default behaviour.  If this
  230. +     is not wanted, there are two ways to avoid it:
  231. +     1. Use "keepend" for the the containing item.  This will keep all
  232. +        contained matches from extending the match or region.  It can be
  233. +        used when all contained items must not extend the containing item.
  234. +     2. Use "excludenl" in the contained item.  This will keep that match
  235. +        from extending the containing match or region.  It can be used if
  236. +        only some contained items must not extend the containing item.
  237. +        "excludenl" must be given before the pattern it applies to.
  238.   
  239.                               *:syn-matchgroup*
  240.       "matchgroup" can be used to highlight the start and/or end pattern
  241. *** ../vim-5.5.31/runtime/syntax/c.vim    Wed Sep 22 10:06:30 1999
  242. --- runtime/syntax/c.vim    Tue Oct 19 10:49:47 1999
  243. ***************
  244. *** 1,7 ****
  245.   " Vim syntax file
  246.   " Language:    C
  247.   " Maintainer:    Bram Moolenaar <Bram@vim.org>
  248. ! " Last change:    1999 Sep 18
  249.   
  250.   " Remove any old syntax stuff hanging around
  251.   syn clear
  252. --- 1,7 ----
  253.   " Vim syntax file
  254.   " Language:    C
  255.   " Maintainer:    Bram Moolenaar <Bram@vim.org>
  256. ! " Last change:    1999 Oct 19
  257.   
  258.   " Remove any old syntax stuff hanging around
  259.   syn clear
  260. ***************
  261. *** 25,36 ****
  262. --- 25,42 ----
  263.   endif
  264.   if exists("c_no_cformat")
  265.     syn region    cString        start=+L\="+ skip=+\\\\\|\\"+ end=+"+ contains=cSpecial
  266. +   " cCppString: same as cString, but ends at end of line
  267. +   syn region    cCppString    start=+L\="+ skip=+\\\\\|\\"\|\\$+ excludenl end=+"+ end='$' contains=cSpecial
  268.   else
  269.     syn match    cFormat        "%\(\d\+\$\)\=[-+' #0*]*\(\d*\|\*\|\*\d\+\$\)\(\.\(\d*\|\*\|\*\d\+\$\)\)\=\([hlL]\|ll\)\=\([diuoxXfeEgGcCsSpn]\|\[\^\=.[^]]*\]\)" contained
  270.     syn match    cFormat        "%%" contained
  271.     syn region    cString        start=+L\="+ skip=+\\\\\|\\"+ end=+"+ contains=cSpecial,cFormat
  272. +   " cCppString: same as cString, but ends at end of line
  273. +   syn region    cCppString    start=+L\="+ skip=+\\\\\|\\"\|\\$+ excludenl end=+"+ end='$' contains=cSpecial,cFormat
  274.     hi link cFormat cSpecial
  275.   endif
  276. + hi link cCppString cString
  277. + 
  278.   syn match    cCharacter    "L\='[^\\]'"
  279.   syn match    cCharacter    "L'[^']*'" contains=cSpecial
  280.   syn match    cSpecialError    "L\='\\[^'\"?\\abfnrtv]'"
  281. ***************
  282. *** 42,48 ****
  283.   "when wanted, highlight trailing white space
  284.   if exists("c_space_errors")
  285.     if !exists("c_no_trail_space_error")
  286. !     syn match    cSpaceError    "\s\+$"
  287.     endif
  288.     if !exists("c_no_tab_space_error")
  289.       syn match    cSpaceError    " \+\t"me=e-1
  290. --- 48,54 ----
  291.   "when wanted, highlight trailing white space
  292.   if exists("c_space_errors")
  293.     if !exists("c_no_trail_space_error")
  294. !     syn match    cSpaceError    excludenl "\s\+$"
  295.     endif
  296.     if !exists("c_no_tab_space_error")
  297.       syn match    cSpaceError    " \+\t"me=e-1
  298. ***************
  299. *** 50,65 ****
  300.   endif
  301.   
  302.   "catch errors caused by wrong parenthesis and brackets
  303. ! syn cluster    cParenGroup    contains=cParenError,cIncluded,cSpecial,@cCommentGroup,cUserCont,cUserLabel,cBitField,cCommentSkip,cOctalZero,cCppOut,cCppOut2,cCppSkip,cFormat,cNumber,cFloat,cOctal,cOctalError,cNumbersCom
  304.   if exists("c_no_bracket_error")
  305. !   syn region    cParen        transparent start='(' end=')' contains=ALLBUT,@cParenGroup
  306.     syn match    cParenError    ")"
  307.     syn match    cErrInParen    contained "[{}]"
  308.   else
  309. !   syn region    cParen        transparent start='(' end=')' contains=ALLBUT,@cParenGroup,cErrInBracket
  310.     syn match    cParenError    "[\])]"
  311.     syn match    cErrInParen    contained "[\]{}]"
  312. !   syn region    cBracket    transparent start='\[' end=']' contains=ALLBUT,@cParenGroup,cErrInParen
  313.     syn match    cErrInBracket    contained "[);{}]"
  314.   endif
  315.   
  316. --- 56,77 ----
  317.   endif
  318.   
  319.   "catch errors caused by wrong parenthesis and brackets
  320. ! syn cluster    cParenGroup    contains=cParenError,cIncluded,cSpecial,cCommentSkip,cCommentString,cComment2String,@cCommentGroup,cUserCont,cUserLabel,cBitField,cCommentSkip,cOctalZero,cCppOut,cCppOut2,cCppSkip,cFormat,cNumber,cFloat,cOctal,cOctalError,cNumbersCom
  321.   if exists("c_no_bracket_error")
  322. !   syn region    cParen        transparent start='(' end=')' contains=ALLBUT,@cParenGroup,cCppParen,cCppString
  323. !   " cCppParen: same as cParen but ends at end-of-line; used in cDefine
  324. !   syn region    cCppParen    transparent start='(' skip='\\$' excludenl end=')' end='$' contained contains=ALLBUT,@cParenGroup,cParen,cString
  325.     syn match    cParenError    ")"
  326.     syn match    cErrInParen    contained "[{}]"
  327.   else
  328. !   syn region    cParen        transparent start='(' end=')' contains=ALLBUT,@cParenGroup,cCppParen,cErrInBracket,cCppBracket,cCppString
  329. !   " cCppParen: same as cParen but ends at end-of-line; used in cDefine
  330. !   syn region    cCppParen    transparent start='(' skip='\\$' excludenl end=')' end='$' contained contains=ALLBUT,@cParenGroup,cErrInBracket,cParen,cBracket,cString
  331.     syn match    cParenError    "[\])]"
  332.     syn match    cErrInParen    contained "[\]{}]"
  333. !   syn region    cBracket    transparent start='\[' end=']' contains=ALLBUT,@cParenGroup,cErrInParen,cCppParen,cCppBracket,cCppString
  334. !   " cCppBracket: same as cParen but ends at end-of-line; used in cDefine
  335. !   syn region    cCppBracket    transparent start='\[' skip='\\$' excludenl end=']' end='$' contained contains=ALLBUT,@cParenGroup,cErrInParen,cParen,cBracket,cString
  336.     syn match    cErrInBracket    contained "[);{}]"
  337.   endif
  338.   
  339. ***************
  340. *** 145,151 ****
  341.     syn keyword cConstant EXIT_FAILURE EXIT_SUCCESS RAND_MAX
  342.   endif
  343.   
  344. ! syn region    cPreCondit    start="^\s*#\s*\(if\|ifdef\|ifndef\|elif\|else\)\>" skip="\\$" end="$" end="//"me=s-1 contains=cComment,cString,cCharacter,cNumbers,cCommentError,cSpaceError
  345.   syn match    cPreCondit    "^\s*#\s*\(else\|endif\)\>"
  346.   if !exists("c_no_if0")
  347.     syn region    cCppOut        start="^\s*#\s*if\s\+0\>" end=".\|$" contains=cCppOut2
  348. --- 157,163 ----
  349.     syn keyword cConstant EXIT_FAILURE EXIT_SUCCESS RAND_MAX
  350.   endif
  351.   
  352. ! syn region    cPreCondit    start="^\s*#\s*\(if\|ifdef\|ifndef\|elif\)\>" skip="\\$" end="$" end="//"me=s-1 contains=cComment,cCppString,cCharacter,cCppParen,cParenError,cNumbers,cCommentError,cSpaceError
  353.   syn match    cPreCondit    "^\s*#\s*\(else\|endif\)\>"
  354.   if !exists("c_no_if0")
  355.     syn region    cCppOut        start="^\s*#\s*if\s\+0\>" end=".\|$" contains=cCppOut2
  356. ***************
  357. *** 156,167 ****
  358.   syn match    cIncluded    contained "<[^>]*>"
  359.   syn match    cInclude    "^\s*#\s*include\>\s*["<]" contains=cIncluded
  360.   "syn match cLineSkip    "\\$"
  361. ! syn cluster    cPreProcGroup    contains=cPreCondit,cIncluded,cInclude,cDefine,cErrInParen,cErrInBracket,cUserLabel,cSpecial,cOctalZero,cCppOut,cCppOut2,cCppSkip,cFormat,cNumber,cFloat,cOctal,cOctalError,cNumbersCom
  362.   syn region    cDefine        start="^\s*#\s*\(define\|undef\)\>" skip="\\$" end="$" contains=ALLBUT,@cPreProcGroup
  363. ! syn region    cPreProc    start="^\s*#\s*\(pragma\>\|line\>\|warning\>\|warn\>\|error\>\)" skip="\\$" end="$" contains=ALLBUT,@cPreProcGroup
  364.   
  365.   " Highlight User Labels
  366. ! syn cluster    cMultiGroup    contains=cIncluded,cSpecial,@cCommentGroup,cUserCont,cUserLabel,cBitField,cOctalZero,cCppOut,cCppOut2,cCppSkip,cFormat,cNumber,cFloat,cOctal,cOctalError,cNumbersCom
  367.   syn region    cMulti        transparent start='?' skip='::' end=':' contains=ALLBUT,@cMultiGroup
  368.   " Avoid matching foo::bar() in C++ by requiring that the next char is not ':'
  369.   syn cluster    cLabelGroup    contains=cUserLabel
  370. --- 168,179 ----
  371.   syn match    cIncluded    contained "<[^>]*>"
  372.   syn match    cInclude    "^\s*#\s*include\>\s*["<]" contains=cIncluded
  373.   "syn match cLineSkip    "\\$"
  374. ! syn cluster    cPreProcGroup    contains=cPreCondit,cIncluded,cInclude,cDefine,cErrInParen,cErrInBracket,cUserLabel,cSpecial,cOctalZero,cCppOut,cCppOut2,cCppSkip,cFormat,cNumber,cFloat,cOctal,cOctalError,cNumbersCom,cString,cCommentSkip,cCommentString,cComment2String,@cCommentGroup,cParen,cBracket
  375.   syn region    cDefine        start="^\s*#\s*\(define\|undef\)\>" skip="\\$" end="$" contains=ALLBUT,@cPreProcGroup
  376. ! syn region    cPreProc    start="^\s*#\s*\(pragma\>\|line\>\|warning\>\|warn\>\|error\>\)" skip="\\$" end="$" keepend contains=ALLBUT,@cPreProcGroup
  377.   
  378.   " Highlight User Labels
  379. ! syn cluster    cMultiGroup    contains=cIncluded,cSpecial,cCommentSkip,cCommentString,cComment2String,@cCommentGroup,cUserCont,cUserLabel,cBitField,cOctalZero,cCppOut,cCppOut2,cCppSkip,cFormat,cNumber,cFloat,cOctal,cOctalError,cNumbersCom,cCppParen,cCppBracket,cCppString
  380.   syn region    cMulti        transparent start='?' skip='::' end=':' contains=ALLBUT,@cMultiGroup
  381.   " Avoid matching foo::bar() in C++ by requiring that the next char is not ':'
  382.   syn cluster    cLabelGroup    contains=cUserLabel
  383. *** ../vim-5.5.31/src/version.c    Sun Oct 24 19:27:14 1999
  384. --- src/version.c    Sun Oct 24 19:28:17 1999
  385. ***************
  386. *** 420,420 ****
  387. --- 420,421 ----
  388.   {   /* Add new patch number below this line */
  389. +     32,
  390.  
  391. --
  392. OLD WOMAN: King of the WHO?
  393. ARTHUR:    The Britons.
  394. OLD WOMAN: Who are the Britons?
  395.                  "Monty Python and the Holy Grail" PYTHON (MONTY) PICTURES LTD
  396.  
  397. --/-/---- Bram Moolenaar ---- Bram@moolenaar.net ---- Bram@vim.org ---\-\--
  398.   \ \    www.vim.org/iccf      www.moolenaar.net       www.vim.org    / /
  399.