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 / 6.0.261 < prev    next >
Encoding:
Internet Message Format  |  2002-02-21  |  4.2 KB
  1. To: vim-dev@vim.org
  2. Subject: Patch 6.0.261
  3. Fcc: outbox
  4. From: Bram Moolenaar <Bram@moolenaar.net>
  5. MIME-Version: 1.0
  6. Content-Type: text/plain; charset=ISO-8859-1
  7. Content-Transfer-Encoding: 8bit
  8. ------------
  9.  
  10. Patch 6.0.261
  11. Problem:    nr2char() and char2nr() don't work with multi-byte characters.
  12. Solution:   Use 'encoding' for these functions. (Yasuhiro Matsumoto)
  13. Files:        runtime/doc/eval.txt, src/eval.c
  14.  
  15.  
  16. *** ../vim60.260/runtime/doc/eval.txt    Mon Feb 18 12:58:16 2002
  17. --- runtime/doc/eval.txt    Fri Feb 22 14:14:08 2002
  18. ***************
  19. *** 1,4 ****
  20. ! *eval.txt*      For Vim version 6.0.  Last change: 2002 Feb 18
  21.   
  22.   
  23.             VIM REFERENCE MANUAL    by Bram Moolenaar
  24. --- 1,4 ----
  25. ! *eval.txt*      For Vim version 6.0.  Last change: 2002 Feb 22
  26.   
  27.   
  28.             VIM REFERENCE MANUAL    by Bram Moolenaar
  29. ***************
  30. *** 969,978 ****
  31.           feature}
  32.   
  33.   char2nr({expr})                        *char2nr()*
  34. !         Return ASCII value of the first char in {expr}.  Examples: >
  35.               char2nr(" ")        returns 32
  36.               char2nr("ABC")        returns 65
  37. ! <
  38.   cindent({lnum})                        *cindent()*
  39.           Get the amount of indent for line {lnum} according the C
  40.           indenting rules, as with 'cindent'.
  41. --- 991,1003 ----
  42.           feature}
  43.   
  44.   char2nr({expr})                        *char2nr()*
  45. !         Return number value of the first char in {expr}.  Examples: >
  46.               char2nr(" ")        returns 32
  47.               char2nr("ABC")        returns 65
  48. ! <        The current 'encoding' is used.  Example for "utf-8": >
  49. !             char2nr("ß")        returns 225
  50. !             char2nr("ß"[0])        returns 195
  51. ! 
  52.   cindent({lnum})                        *cindent()*
  53.           Get the amount of indent for line {lnum} according the C
  54.           indenting rules, as with 'cindent'.
  55. ***************
  56. *** 1874,1884 ****
  57.           See also |prevnonblank()|.
  58.   
  59.   nr2char({expr})                        *nr2char()*
  60. !         Return a string with a single character, which has the ASCII
  61.           value {expr}.  Examples: >
  62.               nr2char(64)        returns "@"
  63.               nr2char(32)        returns " "
  64. ! <
  65.   prevnonblank({lnum})                    *prevnonblank()*
  66.           Return the line number of the first line at or above {lnum}
  67.           that is not blank.  Example: >
  68. --- 1893,1905 ----
  69.           See also |prevnonblank()|.
  70.   
  71.   nr2char({expr})                        *nr2char()*
  72. !         Return a string with a single character, which has the number
  73.           value {expr}.  Examples: >
  74.               nr2char(64)        returns "@"
  75.               nr2char(32)        returns " "
  76. ! <        The current 'encoding' is used.  Example for "utf-8": >
  77. !             nr2char(300)        returns I with bow character
  78. ! 
  79.   prevnonblank({lnum})                    *prevnonblank()*
  80.           Return the line number of the first line at or above {lnum}
  81.           that is not blank.  Example: >
  82. *** ../vim60.260/src/eval.c    Thu Feb 21 16:37:34 2002
  83. --- src/eval.c    Fri Feb 22 14:03:05 2002
  84. ***************
  85. *** 3047,3052 ****
  86. --- 3047,3058 ----
  87.       VAR        argvars;
  88.       VAR        retvar;
  89.   {
  90. + #ifdef FEAT_MBYTE
  91. +     if (has_mbyte)
  92. +     retvar->var_val.var_number =
  93. +                   (*mb_ptr2char)(get_var_string(&argvars[0]));
  94. +     else
  95. + #endif
  96.       retvar->var_val.var_number = get_var_string(&argvars[0])[0];
  97.   }
  98.   
  99. ***************
  100. *** 5126,5136 ****
  101.       VAR        argvars;
  102.       VAR        retvar;
  103.   {
  104. !     char_u    buf[2];
  105.   
  106. !     buf[0] = (char_u)get_var_number(&argvars[0]);
  107.       retvar->var_type = VAR_STRING;
  108. !     retvar->var_val.var_string = vim_strnsave(buf, 1);
  109.   }
  110.   
  111.   /*
  112. --- 5132,5150 ----
  113.       VAR        argvars;
  114.       VAR        retvar;
  115.   {
  116. !     char_u    buf[NUMBUFLEN];
  117.   
  118. ! #ifdef FEAT_MBYTE
  119. !     if (has_mbyte)
  120. !     buf[(*mb_char2bytes)((int)get_var_number(&argvars[0]), buf)] = NUL;
  121. !     else
  122. ! #endif
  123. !     {
  124. !     buf[0] = (char_u)get_var_number(&argvars[0]);
  125. !     buf[1] = NUL;
  126. !     }
  127.       retvar->var_type = VAR_STRING;
  128. !     retvar->var_val.var_string = vim_strsave(buf);
  129.   }
  130.   
  131.   /*
  132. *** ../vim60.260/src/version.c    Fri Feb 22 12:33:04 2002
  133. --- src/version.c    Fri Feb 22 13:06:17 2002
  134. ***************
  135. *** 608,609 ****
  136. --- 608,611 ----
  137.   {   /* Add new patch number below this line */
  138. + /**/
  139. +     261,
  140.   /**/
  141.  
  142. -- 
  143. The average life of an organization chart is six months.  You can safely
  144. ignore any order from your boss that would take six months to complete.
  145.                 (Scott Adams - The Dilbert principle)
  146.  
  147.  ///  Bram Moolenaar -- Bram@moolenaar.net -- http://www.moolenaar.net  \\\
  148. ///   Creator of Vim -- http://vim.sf.net -- ftp://ftp.vim.org/pub/vim   \\\
  149. \\\           Project leader for A-A-P -- http://www.a-a-p.org           ///
  150.  \\\  Help me helping AIDS orphans in Uganda - http://iccf-holland.org  ///
  151.