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.1.221 < prev    next >
Encoding:
Internet Message Format  |  2002-10-12  |  50.7 KB
  1. To: vim-dev@vim.org
  2. Subject: Patch 6.1.221
  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.1.221
  11. Problem:    Changing case may not work properly, depending on the current
  12.         locale.
  13. Solution:   Add the 'casemap' option to let the user chose how changing case
  14.         is to be done.
  15.         Also fix lowering case when an UTF-8 character doesn't keep the
  16.         same byte length.
  17. Files:        runtime/doc/options.txt, src/ascii.h, src/auto/configure,
  18.         src/buffer.c, src/charset.c, src/config.h.in, src/configure.in,
  19.         src/diff.c, src/edit.c, src/eval.c, src/ex_cmds2.c,
  20.         src/ex_docmd.c, src/ex_getln.c, src/fileio.c, src/gui_amiga.c
  21.         src/gui_mac.c, src/gui_photon.c, src/gui_w48.c, src/gui_beos.cc,
  22.         src/macros.h, src/main.c, src/mbyte.c, src/menu.c, src/message.c,
  23.         src/misc1.c, src/misc2.c, src/option.c, src/os_msdos.c,
  24.         src/os_mswin.c, src/proto/charset.pro, src/regexp.c, src/option.h,
  25.         src/syntax.c
  26.  
  27.  
  28. *** ../vim61.220/runtime/doc/options.txt    Mon Sep 23 21:32:08 2002
  29. --- runtime/doc/options.txt    Sun Oct 13 19:46:59 2002
  30. ***************
  31. *** 1,4 ****
  32. ! *options.txt*   For Vim version 6.1.  Last change: 2002 Sep 19
  33.   
  34.   
  35.             VIM REFERENCE MANUAL    by Bram Moolenaar
  36. --- 1,4 ----
  37. ! *options.txt*   For Vim version 6.1.  Last change: 2002 Oct 13
  38.   
  39.   
  40.             VIM REFERENCE MANUAL    by Bram Moolenaar
  41. ***************
  42. *** 997,1002 ****
  43. --- 999,1019 ----
  44.               file name.  It is not modified in response to a |:cd|
  45.               command.
  46.   
  47. +                         *'casemap'* *'cmp'*
  48. + 'casemap' 'cmp'        string    (default: "internal,keepascii")
  49. +             global
  50. +             {not in Vi}
  51. +     Specifies details about changing the case of letters  It may contain
  52. +     these words, separated by a comma:
  53. +     internal    Use internal case mapping functions, the current
  54. +             locale does not change the case mapping  This only
  55. +             matters when 'encoding' is a Unicode encoding.  When
  56. +             "internal" is omitted, the towupper() and towlower()
  57. +             system library functions are used when available.
  58. +     keepascii    For the ASCII characters (0x00 to 0x7f) use the US
  59. +             case mapping, the current locale is not effective.
  60. +             This probably only matters for Turkish.
  61. + 
  62.                           *'cdpath'* *'cd'* *E344* *E346*
  63.   'cdpath' 'cd'        string    (default: equivalent to $CDPATH or ",,")
  64.               global
  65. *** ../vim61.220/src/ascii.h    Wed Sep  5 20:31:02 2001
  66. --- src/ascii.h    Sun Oct  6 20:29:01 2002
  67. ***************
  68. *** 41,47 ****
  69.   
  70.   #define POUND        0xA3
  71.   
  72. ! #define Ctrl_chr(x)    (TO_UPPER(x) ^ 0x40) /* '?' -> DEL, '@' -> ^@, etc. */
  73.   #define Meta(x)        ((x) | 0x80)
  74.   
  75.   #define CTRL_F_STR    "\006"
  76. --- 41,47 ----
  77.   
  78.   #define POUND        0xA3
  79.   
  80. ! #define Ctrl_chr(x)    (TOUPPER_ASC(x) ^ 0x40) /* '?' -> DEL, '@' -> ^@, etc. */
  81.   #define Meta(x)        ((x) | 0x80)
  82.   
  83.   #define CTRL_F_STR    "\006"
  84. *** ../vim61.220/src/auto/configure    Mon Sep 23 21:35:44 2002
  85. --- src/auto/configure    Sun Oct  6 20:55:40 2002
  86. ***************
  87. *** 5868,5882 ****
  88.       memset nanosleep opendir putenv qsort readlink select setenv \
  89.       setpgid setsid sigaltstack sigstack sigset sigsetjmp sigaction \
  90.       sigvec strcasecmp strerror strftime stricmp strncasecmp strnicmp \
  91. !     strpbrk strtol tgetent usleep utime utimes
  92.   do
  93.   echo $ac_n "checking for $ac_func""... $ac_c" 1>&6
  94. ! echo "configure:5830: checking for $ac_func" >&5
  95.   if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then
  96.     echo $ac_n "(cached) $ac_c" 1>&6
  97.   else
  98.     cat > conftest.$ac_ext <<EOF
  99. ! #line 5835 "configure"
  100.   #include "confdefs.h"
  101.   /* System header to define __stub macros and hopefully few prototypes,
  102.       which can conflict with char $ac_func(); below.  */
  103. --- 5868,5882 ----
  104.       memset nanosleep opendir putenv qsort readlink select setenv \
  105.       setpgid setsid sigaltstack sigstack sigset sigsetjmp sigaction \
  106.       sigvec strcasecmp strerror strftime stricmp strncasecmp strnicmp \
  107. !     strpbrk strtol tgetent towlower towupper usleep utime utimes
  108.   do
  109.   echo $ac_n "checking for $ac_func""... $ac_c" 1>&6
  110. ! echo "configure:5875: checking for $ac_func" >&5
  111.   if eval "test \"`echo '$''{'ac_cv_func_$ac_func'+set}'`\" = set"; then
  112.     echo $ac_n "(cached) $ac_c" 1>&6
  113.   else
  114.     cat > conftest.$ac_ext <<EOF
  115. ! #line 5880 "configure"
  116.   #include "confdefs.h"
  117.   /* System header to define __stub macros and hopefully few prototypes,
  118.       which can conflict with char $ac_func(); below.  */
  119. *** ../vim61.220/src/buffer.c    Sun Oct 13 18:48:35 2002
  120. --- src/buffer.c    Sun Oct 13 18:22:22 2002
  121. ***************
  122. *** 3215,3221 ****
  123.           {
  124.           sprintf((char *)tmp, ",%s", wp->w_buffer->b_p_ft);
  125.           for (t = tmp; *t != 0; t++)
  126. !             *t = TO_UPPER(*t);
  127.           str = tmp;
  128.           }
  129.           break;
  130. --- 3215,3221 ----
  131.           {
  132.           sprintf((char *)tmp, ",%s", wp->w_buffer->b_p_ft);
  133.           for (t = tmp; *t != 0; t++)
  134. !             *t = TOUPPER_LOC(*t);
  135.           str = tmp;
  136.           }
  137.           break;
  138. *** ../vim61.220/src/charset.c    Sat Aug  3 14:16:11 2002
  139. --- src/charset.c    Mon Oct  7 21:31:00 2002
  140. ***************
  141. *** 385,420 ****
  142.   
  143.   #if defined(FEAT_SYN_HL) || defined(FEAT_INS_EXPAND) || defined(PROTO)
  144.   /*
  145. !  * Convert the string "p" to do ignore-case comparing.
  146. !  * It's done in-place.
  147.    */
  148. !     void
  149. ! str_foldcase(p)
  150. !     char_u    *p;
  151.   {
  152. !     while (*p != NUL)
  153.       {
  154.   #ifdef FEAT_MBYTE
  155. !     if (has_mbyte && MB_BYTE2LEN(*p) > 1)
  156.       {
  157.           if (enc_utf8)
  158.           {
  159.           int    c, lc;
  160.   
  161. !         c = utf_ptr2char(p);
  162.           lc = utf_tolower(c);
  163. !         if (c != lc && utf_char2len(c) == utf_char2len(lc))
  164. !             (void)utf_char2bytes(c, p);
  165.           }
  166. !         p += (*mb_ptr2len_check)(p);    /* skip multi-byte char */
  167.       }
  168.       else
  169.   #endif
  170.       {
  171. !         *p = TO_LOWER(*p);
  172. !         ++p;
  173.       }
  174.       }
  175.   }
  176.   #endif
  177.   
  178. --- 385,465 ----
  179.   
  180.   #if defined(FEAT_SYN_HL) || defined(FEAT_INS_EXPAND) || defined(PROTO)
  181.   /*
  182. !  * Convert the string "p[len]" to do ignore-case comparing.  Uses the current
  183. !  * locale.  Returns an allocated string (NULL for out-of-memory).
  184.    */
  185. !     char_u *
  186. ! str_foldcase(str, len)
  187. !     char_u    *str;
  188. !     int        len;
  189.   {
  190. !     garray_T    ga;
  191. !     int        i;
  192. ! 
  193. ! #define GA_CHAR(i)  ((char_u *)ga.ga_data)[i]
  194. ! #define GA_PTR(i)   ((char_u *)ga.ga_data + i)
  195. ! 
  196. !     /* Copy "str" into allocated memory, unmodified. */
  197. !     ga_init2(&ga, 1, 10);
  198. !     if (ga_grow(&ga, len + 1) == FAIL)
  199. !     return NULL;
  200. !     mch_memmove(ga.ga_data, str, len);
  201. !     GA_CHAR(len) = NUL;
  202. !     ga.ga_len = len;
  203. !     ga.ga_room -= len;
  204. ! 
  205. !     /* Make each character lower case. */
  206. !     i = 0;
  207. !     while (GA_CHAR(i) != NUL)
  208.       {
  209.   #ifdef FEAT_MBYTE
  210. !     if (enc_utf8 || (has_mbyte && MB_BYTE2LEN(GA_CHAR(i)) > 1))
  211.       {
  212.           if (enc_utf8)
  213.           {
  214.           int    c, lc;
  215.   
  216. !         c = utf_ptr2char(GA_PTR(i));
  217.           lc = utf_tolower(c);
  218. !         if (c != lc)
  219. !         {
  220. !             int        ol = utf_char2len(c);
  221. !             int        nl = utf_char2len(lc);
  222. ! 
  223. !             /* If the byte length changes need to shift the following
  224. !              * characters forward or backward. */
  225. !             if (ol != nl)
  226. !             {
  227. !             if (nl > ol)
  228. !                 if (ga_grow(&ga, nl - ol) == FAIL)
  229. !                 {
  230. !                 /* out of memory, keep old char */
  231. !                 lc = c;
  232. !                 nl = ol;
  233. !                 }
  234. !             if (ol != nl)
  235. !             {
  236. !                 mch_memmove(GA_PTR(i) + nl, GA_PTR(i) + ol,
  237. !                           STRLEN(GA_PTR(i) + ol) + 1);
  238. !                 ga.ga_len += nl - ol;
  239. !                 ga.ga_room -= nl - ol;
  240. !             }
  241. !             }
  242. !             (void)utf_char2bytes(lc, GA_PTR(i));
  243. !         }
  244.           }
  245. !         /* skip to next multi-byte char */
  246. !         i += (*mb_ptr2len_check)(GA_PTR(i));
  247.       }
  248.       else
  249.   #endif
  250.       {
  251. !         GA_CHAR(i) = TOLOWER_LOC(GA_CHAR(i));
  252. !         ++i;
  253.       }
  254.       }
  255. + 
  256. +     return (char_u *)ga.ga_data;
  257.   }
  258.   #endif
  259.   
  260. *** ../vim61.220/src/config.h.in    Sun Jul 21 20:30:30 2002
  261. --- src/config.h.in    Sun Oct  6 20:13:55 2002
  262. ***************
  263. *** 186,191 ****
  264. --- 174,181 ----
  265.   #undef HAVE_SYSCTL
  266.   #undef HAVE_SYSINFO
  267.   #undef HAVE_TGETENT
  268. + #undef HAVE_TOWLOWER
  269. + #undef HAVE_TOWUPPER
  270.   #undef HAVE_USLEEP
  271.   #undef HAVE_UTIME
  272.   #undef HAVE_BIND_TEXTDOMAIN_CODESET
  273. *** ../vim61.220/src/configure.in    Mon Sep 23 21:35:44 2002
  274. --- src/configure.in    Sun Oct  6 20:13:08 2002
  275. ***************
  276. *** 1747,1753 ****
  277.       memset nanosleep opendir putenv qsort readlink select setenv \
  278.       setpgid setsid sigaltstack sigstack sigset sigsetjmp sigaction \
  279.       sigvec strcasecmp strerror strftime stricmp strncasecmp strnicmp \
  280. !     strpbrk strtol tgetent usleep utime utimes)
  281.   
  282.   dnl fstatfs() can take 2 to 4 arguments, try to use st_blksize if possible
  283.   AC_MSG_CHECKING(for st_blksize)
  284. --- 1747,1753 ----
  285.       memset nanosleep opendir putenv qsort readlink select setenv \
  286.       setpgid setsid sigaltstack sigstack sigset sigsetjmp sigaction \
  287.       sigvec strcasecmp strerror strftime stricmp strncasecmp strnicmp \
  288. !     strpbrk strtol tgetent towlower towupper usleep utime utimes)
  289.   
  290.   dnl fstatfs() can take 2 to 4 arguments, try to use st_blksize if possible
  291.   AC_MSG_CHECKING(for st_blksize)
  292. *** ../vim61.220/src/diff.c    Mon Sep 30 19:35:18 2002
  293. --- src/diff.c    Sun Oct  6 20:40:44 2002
  294. ***************
  295. *** 1382,1388 ****
  296.   #endif
  297.           {
  298.           if (*p1 != *p2 && (!(diff_flags & DIFF_ICASE)
  299. !                        || TO_LOWER(*p1) != TO_LOWER(*p2)))
  300.               break;
  301.           ++p1;
  302.           ++p2;
  303. --- 1382,1388 ----
  304.   #endif
  305.           {
  306.           if (*p1 != *p2 && (!(diff_flags & DIFF_ICASE)
  307. !                      || TOLOWER_LOC(*p1) != TOLOWER_LOC(*p2)))
  308.               break;
  309.           ++p1;
  310.           ++p2;
  311. *** ../vim61.220/src/edit.c    Sun Oct 13 16:05:33 2002
  312. --- src/edit.c    Sun Oct 13 15:22:09 2002
  313. ***************
  314. *** 1793,1799 ****
  315.           {
  316.               /* Rule 1 is satisfied */
  317.               for (idx = completion_length; idx < len; ++idx)
  318. !             IObuff[idx] = TO_LOWER(IObuff[idx]);
  319.               break;
  320.           }
  321.           }
  322. --- 1799,1805 ----
  323.           {
  324.               /* Rule 1 is satisfied */
  325.               for (idx = completion_length; idx < len; ++idx)
  326. !             IObuff[idx] = TOLOWER_LOC(IObuff[idx]);
  327.               break;
  328.           }
  329.           }
  330. ***************
  331. *** 1812,1818 ****
  332.           {
  333.               /* Rule 2 is satisfied */
  334.               for (idx = completion_length; idx < len; ++idx)
  335. !             IObuff[idx] = TO_UPPER(IObuff[idx]);
  336.               break;
  337.           }
  338.           was_letter = isalpha(original_text[idx]);
  339. --- 1818,1824 ----
  340.           {
  341.               /* Rule 2 is satisfied */
  342.               for (idx = completion_length; idx < len; ++idx)
  343. !             IObuff[idx] = TOUPPER_LOC(IObuff[idx]);
  344.               break;
  345.           }
  346.           was_letter = isalpha(original_text[idx]);
  347. ***************
  348. *** 3113,3123 ****
  349.               tmp_ptr += ++temp;
  350.               temp = complete_col - temp;
  351.           }
  352. !         complete_pat = vim_strnsave(tmp_ptr, temp);
  353.           if (complete_pat == NULL)
  354.               return FAIL;
  355. -         if (p_ic)
  356. -             str_foldcase(complete_pat);
  357.           }
  358.           else if (continue_status & CONT_ADDING)
  359.           {
  360. --- 3119,3130 ----
  361.               tmp_ptr += ++temp;
  362.               temp = complete_col - temp;
  363.           }
  364. !         if (p_ic)
  365. !             complete_pat = str_foldcase(tmp_ptr, temp);
  366. !         else
  367. !             complete_pat = vim_strnsave(tmp_ptr, temp);
  368.           if (complete_pat == NULL)
  369.               return FAIL;
  370.           }
  371.           else if (continue_status & CONT_ADDING)
  372.           {
  373. ***************
  374. *** 3211,3221 ****
  375.           temp = (int)complete_col - (int)(tmp_ptr - line);
  376.           if (temp < 0)    /* cursor in indent: empty pattern */
  377.           temp = 0;
  378. !         complete_pat = vim_strnsave(tmp_ptr, temp);
  379.           if (complete_pat == NULL)
  380.           return FAIL;
  381. -         if (p_ic)
  382. -         str_foldcase(complete_pat);
  383.       }
  384.       else if (ctrl_x_mode == CTRL_X_FILES)
  385.       {
  386. --- 3218,3229 ----
  387.           temp = (int)complete_col - (int)(tmp_ptr - line);
  388.           if (temp < 0)    /* cursor in indent: empty pattern */
  389.           temp = 0;
  390. !         if (p_ic)
  391. !         complete_pat = str_foldcase(tmp_ptr, temp);
  392. !         else
  393. !         complete_pat = vim_strnsave(tmp_ptr, temp);
  394.           if (complete_pat == NULL)
  395.           return FAIL;
  396.       }
  397.       else if (ctrl_x_mode == CTRL_X_FILES)
  398.       {
  399. ***************
  400. *** 5495,5501 ****
  401.   #endif
  402.               /* TODO: multi-byte */
  403.               if (keytyped == (int)p[-1] || (icase && keytyped < 256
  404. !                    && TO_LOWER(keytyped) == TO_LOWER((int)p[-1])))
  405.           {
  406.               line = ml_get_cursor();
  407.               if ((curwin->w_cursor.col == (colnr_T)(p - look)
  408. --- 5503,5509 ----
  409.   #endif
  410.               /* TODO: multi-byte */
  411.               if (keytyped == (int)p[-1] || (icase && keytyped < 256
  412. !              && TOLOWER_LOC(keytyped) == TOLOWER_LOC((int)p[-1])))
  413.           {
  414.               line = ml_get_cursor();
  415.               if ((curwin->w_cursor.col == (colnr_T)(p - look)
  416. *** ../vim61.220/src/eval.c    Sat Oct 12 21:16:50 2002
  417. --- src/eval.c    Fri Oct 11 19:44:18 2002
  418. ***************
  419. *** 3169,3177 ****
  420.           def = get_var_number(&argvars[2]);
  421.           if (argvars[3].var_type != VAR_UNKNOWN)
  422.           {
  423. !         /* avoid that TO_UPPER calls get_var_string_buf() twice */
  424.           c = *get_var_string_buf(&argvars[3], buf2);
  425. !         switch (TO_UPPER(c))
  426.           {
  427.               case 'E': type = VIM_ERROR; break;
  428.               case 'Q': type = VIM_QUESTION; break;
  429. --- 3169,3177 ----
  430.           def = get_var_number(&argvars[2]);
  431.           if (argvars[3].var_type != VAR_UNKNOWN)
  432.           {
  433. !         /* avoid that TOUPPER_ASC calls get_var_string_buf() twice */
  434.           c = *get_var_string_buf(&argvars[3], buf2);
  435. !         switch (TOUPPER_ASC(c))
  436.           {
  437.               case 'E': type = VIM_ERROR; break;
  438.               case 'Q': type = VIM_QUESTION; break;
  439. ***************
  440. *** 6086,6092 ****
  441.       if (argvars[2].var_type != VAR_UNKNOWN)
  442.       {
  443.       mode = get_var_string_buf(&argvars[2], modebuf);
  444. !     modec = TO_LOWER(mode[0]);
  445.       if (modec != 't' && modec != 'c'
  446.   #ifdef FEAT_GUI
  447.           && modec != 'g'
  448. --- 6086,6092 ----
  449.       if (argvars[2].var_type != VAR_UNKNOWN)
  450.       {
  451.       mode = get_var_string_buf(&argvars[2], modebuf);
  452. !     modec = TOLOWER_ASC(mode[0]);
  453.       if (modec != 't' && modec != 'c'
  454.   #ifdef FEAT_GUI
  455.           && modec != 'g'
  456. ***************
  457. *** 6108,6117 ****
  458.       }
  459.   
  460.   
  461. !     switch (TO_LOWER(what[0]))
  462.       {
  463.       case 'b':
  464. !         if (TO_LOWER(what[1]) == 'g')        /* bg[#] */
  465.               p = highlight_color(id, what, modec);
  466.           else                    /* bold */
  467.               p = highlight_has_attr(id, HL_BOLD, modec);
  468. --- 6108,6117 ----
  469.       }
  470.   
  471.   
  472. !     switch (TOLOWER_ASC(what[0]))
  473.       {
  474.       case 'b':
  475. !         if (TOLOWER_ASC(what[1]) == 'g')    /* bg[#] */
  476.               p = highlight_color(id, what, modec);
  477.           else                    /* bold */
  478.               p = highlight_has_attr(id, HL_BOLD, modec);
  479. ***************
  480. *** 6122,6128 ****
  481.           break;
  482.   
  483.       case 'i':
  484. !         if (TO_LOWER(what[1]) == 'n')        /* inverse */
  485.               p = highlight_has_attr(id, HL_INVERSE, modec);
  486.           else                    /* italic */
  487.               p = highlight_has_attr(id, HL_ITALIC, modec);
  488. --- 6122,6128 ----
  489.           break;
  490.   
  491.       case 'i':
  492. !         if (TOLOWER_ASC(what[1]) == 'n')    /* inverse */
  493.               p = highlight_has_attr(id, HL_INVERSE, modec);
  494.           else                    /* italic */
  495.               p = highlight_has_attr(id, HL_ITALIC, modec);
  496. ***************
  497. *** 6318,6324 ****
  498.           else
  499.   #endif
  500.           {
  501. !         *p = TO_LOWER(*p); /* note that tolower() can be a macro */
  502.           ++p;
  503.           }
  504.       }
  505. --- 6318,6324 ----
  506.           else
  507.   #endif
  508.           {
  509. !         *p = TOLOWER_LOC(*p); /* note that tolower() can be a macro */
  510.           ++p;
  511.           }
  512.       }
  513. ***************
  514. *** 6361,6367 ****
  515.           else
  516.   #endif
  517.           {
  518. !         *p = TO_UPPER(*p); /* note that toupper() can be a macro */
  519.           p++;
  520.           }
  521.       }
  522. --- 6361,6367 ----
  523.           else
  524.   #endif
  525.           {
  526. !         *p = TOUPPER_LOC(*p); /* note that toupper() can be a macro */
  527.           p++;
  528.           }
  529.       }
  530. ***************
  531. *** 8019,8025 ****
  532.   eval_fname_sid(p)
  533.       char_u    *p;
  534.   {
  535. !     return (*p == 's' || TO_UPPER(p[2]) == 'I');
  536.   }
  537.   
  538.   /*
  539. --- 8019,8025 ----
  540.   eval_fname_sid(p)
  541.       char_u    *p;
  542.   {
  543. !     return (*p == 's' || TOUPPER_ASC(p[2]) == 'I');
  544.   }
  545.   
  546.   /*
  547. *** ../vim61.220/src/ex_cmds2.c    Sat Oct 12 17:26:38 2002
  548. --- src/ex_cmds2.c    Sat Oct 12 17:22:00 2002
  549. ***************
  550. *** 2720,2726 ****
  551.   prt_use_number()
  552.   {
  553.       return (printer_opts[OPT_PRINT_NUMBER].present
  554. !         && TO_LOWER(printer_opts[OPT_PRINT_NUMBER].string[0]) == 'y');
  555.   }
  556.   
  557.   /*
  558. --- 2720,2726 ----
  559.   prt_use_number()
  560.   {
  561.       return (printer_opts[OPT_PRINT_NUMBER].present
  562. !         && TOLOWER_ASC(printer_opts[OPT_PRINT_NUMBER].string[0]) == 'y');
  563.   }
  564.   
  565.   /*
  566. ***************
  567. *** 2897,2905 ****
  568.   
  569.   #ifdef FEAT_SYN_HL
  570.       if (printer_opts[OPT_PRINT_SYNTAX].present
  571. !         && TO_LOWER(printer_opts[OPT_PRINT_SYNTAX].string[0]) != 'a')
  572.       settings.do_syntax =
  573. !           (TO_LOWER(printer_opts[OPT_PRINT_SYNTAX].string[0]) == 'y');
  574.       else
  575.       settings.do_syntax = settings.has_color;
  576.   #endif
  577. --- 2897,2905 ----
  578.   
  579.   #ifdef FEAT_SYN_HL
  580.       if (printer_opts[OPT_PRINT_SYNTAX].present
  581. !         && TOLOWER_ASC(printer_opts[OPT_PRINT_SYNTAX].string[0]) != 'a')
  582.       settings.do_syntax =
  583. !            (TOLOWER_ASC(printer_opts[OPT_PRINT_SYNTAX].string[0]) == 'y');
  584.       else
  585.       settings.do_syntax = settings.has_color;
  586.   #endif
  587. ***************
  588. *** 2930,2936 ****
  589.   #endif
  590.   
  591.       jobsplit = (printer_opts[OPT_PRINT_JOBSPLIT].present
  592. !           && TO_LOWER(printer_opts[OPT_PRINT_JOBSPLIT].string[0]) == 'y');
  593.   
  594.       if (!mch_print_begin(&settings))
  595.       goto print_fail_no_begin;
  596. --- 2930,2936 ----
  597.   #endif
  598.   
  599.       jobsplit = (printer_opts[OPT_PRINT_JOBSPLIT].present
  600. !        && TOLOWER_ASC(printer_opts[OPT_PRINT_JOBSPLIT].string[0]) == 'y');
  601.   
  602.       if (!mch_print_begin(&settings))
  603.       goto print_fail_no_begin;
  604. ***************
  605. *** 3232,3238 ****
  606.        * line.
  607.        */
  608.       if (line[col] == NUL || (printer_opts[OPT_PRINT_WRAP].present
  609. !           && TO_LOWER(printer_opts[OPT_PRINT_WRAP].string[0]) == 'n'))
  610.       return 0;
  611.       return col;
  612.   }
  613. --- 3232,3238 ----
  614.        * line.
  615.        */
  616.       if (line[col] == NUL || (printer_opts[OPT_PRINT_WRAP].present
  617. !            && TOLOWER_ASC(printer_opts[OPT_PRINT_WRAP].string[0]) == 'n'))
  618.       return 0;
  619.       return col;
  620.   }
  621. ***************
  622. *** 3976,3982 ****
  623.        * Find the size of the paper and set the margins.
  624.        */
  625.       prt_portrait = (!printer_opts[OPT_PRINT_PORTRAIT].present
  626. !           || TO_LOWER(printer_opts[OPT_PRINT_PORTRAIT].string[0]) == 'y');
  627.       if (printer_opts[OPT_PRINT_PAPER].present)
  628.       {
  629.       paper_name = (char *)printer_opts[OPT_PRINT_PAPER].string;
  630. --- 3976,3982 ----
  631.        * Find the size of the paper and set the margins.
  632.        */
  633.       prt_portrait = (!printer_opts[OPT_PRINT_PORTRAIT].present
  634. !        || TOLOWER_ASC(printer_opts[OPT_PRINT_PORTRAIT].string[0]) == 'y');
  635.       if (printer_opts[OPT_PRINT_PAPER].present)
  636.       {
  637.       paper_name = (char *)printer_opts[OPT_PRINT_PAPER].string;
  638. ***************
  639. *** 4055,4061 ****
  640.       psettings->n_uncollated_copies = 1;
  641.       prt_num_copies = 1;
  642.       prt_collate = (!printer_opts[OPT_PRINT_COLLATE].present
  643. !         || TO_LOWER(printer_opts[OPT_PRINT_COLLATE].string[0]) == 'y');
  644.       if (prt_collate)
  645.       {
  646.       /* TODO: Get number of collated copies wanted. */
  647. --- 4055,4061 ----
  648.       psettings->n_uncollated_copies = 1;
  649.       prt_num_copies = 1;
  650.       prt_collate = (!printer_opts[OPT_PRINT_COLLATE].present
  651. !         || TOLOWER_ASC(printer_opts[OPT_PRINT_COLLATE].string[0]) == 'y');
  652.       if (prt_collate)
  653.       {
  654.       /* TODO: Get number of collated copies wanted. */
  655. *** ../vim61.220/src/ex_docmd.c    Fri Oct 11 20:38:35 2002
  656. --- src/ex_docmd.c    Fri Oct 11 20:34:46 2002
  657. ***************
  658. *** 3565,3571 ****
  659.       {
  660.       /* Make 'fileencoding' lower case. */
  661.       for (p = eap->cmd + eap->force_enc; *p != NUL; ++p)
  662. !         *p = TO_LOWER(*p);
  663.       }
  664.   #endif
  665.   
  666. --- 3565,3571 ----
  667.       {
  668.       /* Make 'fileencoding' lower case. */
  669.       for (p = eap->cmd + eap->force_enc; *p != NUL; ++p)
  670. !         *p = TOLOWER_ASC(*p);
  671.       }
  672.   #endif
  673.   
  674. *** ../vim61.220/src/ex_getln.c    Sun Oct 13 16:05:33 2002
  675. --- src/ex_getln.c    Sun Oct 13 15:35:07 2002
  676. ***************
  677. *** 2570,2577 ****
  678.               || xp->xp_context == EXPAND_FILES
  679.               || xp->xp_context == EXPAND_BUFFERS)
  680.           {
  681. !             if (TO_LOWER(cmd_files[i][len]) !=
  682. !                            TO_LOWER(cmd_files[0][len]))
  683.               break;
  684.           }
  685.           else
  686. --- 2570,2577 ----
  687.               || xp->xp_context == EXPAND_FILES
  688.               || xp->xp_context == EXPAND_BUFFERS)
  689.           {
  690. !             if (TOLOWER_LOC(cmd_files[i][len]) !=
  691. !                            TOLOWER_LOC(cmd_files[0][len]))
  692.               break;
  693.           }
  694.           else
  695. *** ../vim61.220/src/fileio.c    Sun Oct 13 18:48:35 2002
  696. --- src/fileio.c    Sun Oct 13 18:42:11 2002
  697. ***************
  698. *** 4494,4500 ****
  699.        * a floppy from "A:\dir" to "B:\dir".
  700.        */
  701.       else if (len > 3
  702. !         && TO_UPPER(full_path[0]) == TO_UPPER(dir_name[0])
  703.           && full_path[1] == ':'
  704.           && vim_ispathsep(full_path[2]))
  705.       p = full_path + 2;
  706. --- 4669,4675 ----
  707.        * a floppy from "A:\dir" to "B:\dir".
  708.        */
  709.       else if (len > 3
  710. !         && TOUPPER_LOC(full_path[0]) == TOUPPER_LOC(dir_name[0])
  711.           && full_path[1] == ':'
  712.           && vim_ispathsep(full_path[2]))
  713.       p = full_path + 2;
  714. *** ../vim61.220/src/gui_amiga.c    Sat May  4 22:23:07 2002
  715. --- src/gui_amiga.c    Sun Oct  6 20:44:33 2002
  716. ***************
  717. *** 142,148 ****
  718.   {
  719.       if (isdigit(c))
  720.       return c - '0';
  721. !     c = TO_LOWER(c);
  722.       if (c >= 'a' && c <= 'f')
  723.       return c - 'a' + 10;
  724.       return -1000;
  725. --- 142,148 ----
  726.   {
  727.       if (isdigit(c))
  728.       return c - '0';
  729. !     c = TOLOWER_ASC(c);
  730.       if (c >= 'a' && c <= 'f')
  731.       return c - 'a' + 10;
  732.       return -1000;
  733. *** ../vim61.220/src/gui_mac.c    Fri Sep 27 19:30:44 2002
  734. --- src/gui_mac.c    Sun Oct  6 20:44:52 2002
  735. ***************
  736. *** 3061,3067 ****
  737.   {
  738.       if (isdigit(c))
  739.       return c - '0';
  740. !     c = TO_LOWER(c);
  741.       if (c >= 'a' && c <= 'f')
  742.       return c - 'a' + 10;
  743.       return -1000;
  744. --- 3061,3067 ----
  745.   {
  746.       if (isdigit(c))
  747.       return c - '0';
  748. !     c = TOLOWER_ASC(c);
  749.       if (c >= 'a' && c <= 'f')
  750.       return c - 'a' + 10;
  751.       return -1000;
  752. *** ../vim61.220/src/gui_photon.c    Sat May  4 22:23:07 2002
  753. --- src/gui_photon.c    Sun Oct  6 20:45:01 2002
  754. ***************
  755. *** 1980,1986 ****
  756.   {
  757.       if (vim_isdigit(c))
  758.       return( c - '0' );
  759. !     c = TO_LOWER(c);
  760.       if (c >= 'a' && c <= 'f')
  761.       return( c - 'a' + 10 );
  762.       return( -1000 );
  763. --- 1980,1986 ----
  764.   {
  765.       if (vim_isdigit(c))
  766.       return( c - '0' );
  767. !     c = TOLOWER_ASC(c);
  768.       if (c >= 'a' && c <= 'f')
  769.       return( c - 'a' + 10 );
  770.       return( -1000 );
  771. *** ../vim61.220/src/gui_w48.c    Mon Sep 16 22:00:32 2002
  772. --- src/gui_w48.c    Tue Oct  8 20:55:33 2002
  773. ***************
  774. *** 1146,1152 ****
  775.   {
  776.       if (vim_isdigit(c))
  777.       return c - '0';
  778. !     c = TO_LOWER(c);
  779.       if (c >= 'a' && c <= 'f')
  780.       return c - 'a' + 10;
  781.       return -1000;
  782. --- 1146,1152 ----
  783.   {
  784.       if (vim_isdigit(c))
  785.       return c - '0';
  786. !     c = TOLOWER_ASC(c);
  787.       if (c >= 'a' && c <= 'f')
  788.       return c - 'a' + 10;
  789.       return -1000;
  790. *** ../vim61.220/src/gui_beos.cc    Sat May  4 22:23:07 2002
  791. --- src/gui_beos.cc    Sun Oct  6 20:53:33 2002
  792. ***************
  793. *** 2455,2461 ****
  794.   {
  795.       if (isdigit(c))
  796.       return c - '0';
  797. !     c = TO_LOWER(c);
  798.       if (c >= 'a' && c <= 'f')
  799.       return c - 'a' + 10;
  800.       return -1000;
  801. --- 2455,2461 ----
  802.   {
  803.       if (isdigit(c))
  804.       return c - '0';
  805. !     c = TOLOWER_ASC(c);
  806.       if (c >= 'a' && c <= 'f')
  807.       return c - 'a' + 10;
  808.       return -1000;
  809. *** ../vim61.220/src/macros.h    Sun Jul 21 20:30:31 2002
  810. --- src/macros.h    Sun Oct  6 21:52:17 2002
  811. ***************
  812. *** 51,74 ****
  813.   #define bufempty() (curbuf->b_ml.ml_line_count == 1 && *ml_get((linenr_T)1) == NUL)
  814.   
  815.   /*
  816.    * On some systems toupper()/tolower() only work on lower/uppercase characters
  817. !  * Careful: Only call TO_UPPER() and TO_LOWER() with a character in the range
  818. !  * 0 - 255.  toupper()/tolower() on some systems can't handle others.
  819.    * Note: for UTF-8 use utf_toupper() and utf_tolower().
  820.    */
  821.   #ifdef MSWIN
  822. ! #  define TO_UPPER(c)    toupper_tab[(c) & 255]
  823. ! #  define TO_LOWER(c)    tolower_tab[(c) & 255]
  824.   #else
  825.   # ifdef BROKEN_TOUPPER
  826. ! #  define TO_UPPER(c)    (islower(c) ? toupper(c) : (c))
  827. ! #  define TO_LOWER(c)    (isupper(c) ? tolower(c) : (c))
  828.   # else
  829. ! #  define TO_UPPER    toupper
  830. ! #  define TO_LOWER    tolower
  831.   # endif
  832.   #endif
  833.   
  834.   /*
  835.    * MB_ISLOWER() and MB_ISUPPER() are to be used on multi-byte characters.  But
  836.    * don't use them for negative values or values above 0x100 for DBCS.
  837. --- 51,84 ----
  838.   #define bufempty() (curbuf->b_ml.ml_line_count == 1 && *ml_get((linenr_T)1) == NUL)
  839.   
  840.   /*
  841. +  * toupper() and tolower() that use the current locale.
  842.    * On some systems toupper()/tolower() only work on lower/uppercase characters
  843. !  * Careful: Only call TOUPPER_LOC() and TOLOWER_LOC() with a character in the
  844. !  * range 0 - 255.  toupper()/tolower() on some systems can't handle others.
  845.    * Note: for UTF-8 use utf_toupper() and utf_tolower().
  846.    */
  847.   #ifdef MSWIN
  848. ! #  define TOUPPER_LOC(c)    toupper_tab[(c) & 255]
  849. ! #  define TOLOWER_LOC(c)    tolower_tab[(c) & 255]
  850.   #else
  851.   # ifdef BROKEN_TOUPPER
  852. ! #  define TOUPPER_LOC(c)    (islower(c) ? toupper(c) : (c))
  853. ! #  define TOLOWER_LOC(c)    (isupper(c) ? tolower(c) : (c))
  854.   # else
  855. ! #  define TOUPPER_LOC        toupper
  856. ! #  define TOLOWER_LOC        tolower
  857.   # endif
  858.   #endif
  859.   
  860. + /* toupper() and tolower() for ASCII only and ignore the current locale. */
  861. + #ifdef EBCDIC
  862. + # define TOUPPER_ASC(c)    (islower(c) ? toupper(c) : (c))
  863. + # define TOLOWER_ASC(c)    (isupper(c) ? tolower(c) : (c))
  864. + #else
  865. + # define TOUPPER_ASC(c)    (((c) < 'a' || (c) > 'z') ? (c) : (c) - ('a' - 'A'))
  866. + # define TOLOWER_ASC(c)    (((c) < 'A' || (c) > 'Z') ? (c) : (c) + ('a' - 'A'))
  867. + #endif
  868. + 
  869.   /*
  870.    * MB_ISLOWER() and MB_ISUPPER() are to be used on multi-byte characters.  But
  871.    * don't use them for negative values or values above 0x100 for DBCS.
  872. ***************
  873. *** 76,88 ****
  874.   #ifdef FEAT_MBYTE
  875.   # define MB_ISLOWER(c)    (enc_utf8 && (c) > 0x80 ? utf_islower(c) : islower(c))
  876.   # define MB_ISUPPER(c)    (enc_utf8 && (c) > 0x80 ? utf_isupper(c) : isupper(c))
  877. ! # define MB_TOLOWER(c)    (enc_utf8 && (c) > 0x80 ? utf_tolower(c) : TO_LOWER(c))
  878. ! # define MB_TOUPPER(c)    (enc_utf8 && (c) > 0x80 ? utf_toupper(c) : TO_UPPER(c))
  879.   #else
  880.   # define MB_ISLOWER(c)    islower(c)
  881.   # define MB_ISUPPER(c)    isupper(c)
  882. ! # define MB_TOLOWER(c)    TO_LOWER(c)
  883. ! # define MB_TOUPPER(c)    TO_UPPER(c)
  884.   #endif
  885.   
  886.   /* Like isalpha() but reject non-ASCII characters.  Can't be used with a
  887. --- 86,98 ----
  888.   #ifdef FEAT_MBYTE
  889.   # define MB_ISLOWER(c)    (enc_utf8 && (c) > 0x80 ? utf_islower(c) : islower(c))
  890.   # define MB_ISUPPER(c)    (enc_utf8 && (c) > 0x80 ? utf_isupper(c) : isupper(c))
  891. ! # define MB_TOLOWER(c)    (enc_utf8 && (c) > 0x80 ? utf_tolower(c) : TOLOWER_LOC(c))
  892. ! # define MB_TOUPPER(c)    (enc_utf8 && (c) > 0x80 ? utf_toupper(c) : TOUPPER_LOC(c))
  893.   #else
  894.   # define MB_ISLOWER(c)    islower(c)
  895.   # define MB_ISUPPER(c)    isupper(c)
  896. ! # define MB_TOLOWER(c)    TOLOWER_LOC(c)
  897. ! # define MB_TOUPPER(c)    TOUPPER_LOC(c)
  898.   #endif
  899.   
  900.   /* Like isalpha() but reject non-ASCII characters.  Can't be used with a
  901. *** ../vim61.220/src/main.c    Mon Sep 23 21:12:18 2002
  902. --- src/main.c    Sun Oct  6 20:45:54 2002
  903. ***************
  904. *** 411,425 ****
  905.       /* TODO: On MacOS X default to gui if argv[0] ends in:
  906.        *       /vim.app/Contents/MacOS/Vim */
  907.   
  908. !     if (TO_LOWER(initstr[0]) == 'r')
  909.       {
  910.       restricted = TRUE;
  911.       ++initstr;
  912.       }
  913.   
  914.       /* Avoid using evim mode for "editor". */
  915. !     if (TO_LOWER(initstr[0]) == 'e'
  916. !         && (TO_LOWER(initstr[1]) == 'v' || TO_LOWER(initstr[1]) == 'g'))
  917.       {
  918.   #ifdef FEAT_GUI
  919.       gui.starting = TRUE;
  920. --- 411,426 ----
  921.       /* TODO: On MacOS X default to gui if argv[0] ends in:
  922.        *       /vim.app/Contents/MacOS/Vim */
  923.   
  924. !     if (TOLOWER_ASC(initstr[0]) == 'r')
  925.       {
  926.       restricted = TRUE;
  927.       ++initstr;
  928.       }
  929.   
  930.       /* Avoid using evim mode for "editor". */
  931. !     if (TOLOWER_ASC(initstr[0]) == 'e'
  932. !         && (TOLOWER_ASC(initstr[1]) == 'v'
  933. !                        || TOLOWER_ASC(initstr[1]) == 'g'))
  934.       {
  935.   #ifdef FEAT_GUI
  936.       gui.starting = TRUE;
  937. ***************
  938. *** 428,434 ****
  939.       ++initstr;
  940.       }
  941.   
  942. !     if (TO_LOWER(initstr[0]) == 'g')
  943.       {
  944.       main_start_gui();
  945.   #ifdef FEAT_GUI
  946. --- 429,435 ----
  947.       ++initstr;
  948.       }
  949.   
  950. !     if (TOLOWER_ASC(initstr[0]) == 'g')
  951.       {
  952.       main_start_gui();
  953.   #ifdef FEAT_GUI
  954. ***************
  955. *** 506,515 ****
  956.           if (c == '/')
  957.           {
  958.           c = argv[0][argv_idx++];
  959. !         c = TO_UPPER(c);
  960.           }
  961.           else
  962. !         c = TO_LOWER(c);
  963.   #endif
  964.           switch (c)
  965.           {
  966. --- 507,516 ----
  967.           if (c == '/')
  968.           {
  969.           c = argv[0][argv_idx++];
  970. !         c = TOUPPER_ASC(c);
  971.           }
  972.           else
  973. !         c = TOLOWER_ASC(c);
  974.   #endif
  975.           switch (c)
  976.           {
  977. ***************
  978. *** 2688,2694 ****
  979.           /* Guess that when the server name starts with "g" it's a GUI
  980.            * server, which we can bring to the foreground here.
  981.            * Foreground() in the server doesn't work very well. */
  982. !         if (argtype != ARGTYPE_SEND && TO_UPPER(*sname) == 'G')
  983.               SetForegroundWindow(srv);
  984.   # endif
  985.   
  986. --- 2689,2695 ----
  987.           /* Guess that when the server name starts with "g" it's a GUI
  988.            * server, which we can bring to the foreground here.
  989.            * Foreground() in the server doesn't work very well. */
  990. !         if (argtype != ARGTYPE_SEND && TOUPPER_ASC(*sname) == 'G')
  991.               SetForegroundWindow(srv);
  992.   # endif
  993.   
  994. *** ../vim61.220/src/mbyte.c    Sat Oct 12 15:48:03 2002
  995. --- src/mbyte.c    Sat Oct 12 15:33:10 2002
  996. ***************
  997. *** 1771,1778 ****
  998.   utf_toupper(a)
  999.       int        a;
  1000.   {
  1001.       if (a < 128)
  1002. !     return toupper(a);
  1003.       return utf_convert(a, toUpper, sizeof(toUpper));
  1004.   }
  1005.   
  1006. --- 1771,1791 ----
  1007.   utf_toupper(a)
  1008.       int        a;
  1009.   {
  1010. +     /* If 'casemap' contains "keepascii" use ASCII style toupper(). */
  1011. +     if (a < 128 && (cmp_flags & CMP_KEEPASCII))
  1012. +     return TOUPPER_ASC(a);
  1013. + 
  1014. + #if defined(HAVE_TOWUPPER) && defined(__STDC__ISO_10646__)
  1015. +     /* If towupper() is availble and handles Unicode, use it. */
  1016. +     if (!(cmp_flags & CMP_INTERNAL))
  1017. +     return towupper(a);
  1018. + #endif
  1019. + 
  1020. +     /* For characters below 128 use locale sensitive toupper(). */
  1021.       if (a < 128)
  1022. !     return TOUPPER_LOC(a);
  1023. ! 
  1024. !     /* For any other characters use the above mapping table. */
  1025.       return utf_convert(a, toUpper, sizeof(toUpper));
  1026.   }
  1027.   
  1028. ***************
  1029. *** 1791,1798 ****
  1030.   utf_tolower(a)
  1031.       int        a;
  1032.   {
  1033.       if (a < 128)
  1034. !     return tolower(a);
  1035.       return utf_convert(a, toLower, sizeof(toLower));
  1036.   }
  1037.   
  1038. --- 1804,1824 ----
  1039.   utf_tolower(a)
  1040.       int        a;
  1041.   {
  1042. +     /* If 'casemap' contains "keepascii" use ASCII style tolower(). */
  1043. +     if (a < 128 && (cmp_flags & CMP_KEEPASCII))
  1044. +     return TOLOWER_ASC(a);
  1045. + 
  1046. + #if defined(HAVE_TOWLOWER) && defined(__STDC__ISO_10646__)
  1047. +     /* If towlower() is availble and handles Unicode, use it. */
  1048. +     if (!(cmp_flags & CMP_INTERNAL))
  1049. +     return towlower(a);
  1050. + #endif
  1051. + 
  1052. +     /* For characters below 128 use locale sensitive tolower(). */
  1053.       if (a < 128)
  1054. !     return TOLOWER_LOC(a);
  1055. ! 
  1056. !     /* For any other characters use the above mapping table. */
  1057.       return utf_convert(a, toLower, sizeof(toLower));
  1058.   }
  1059.   
  1060. ***************
  1061. *** 1830,1836 ****
  1062.           /* Single byte: first check normally, then with ignore case. */
  1063.           if (s1[i] != s2[i])
  1064.           {
  1065. !         cdiff = TO_LOWER(s1[i]) - TO_LOWER(s2[i]);
  1066.           if (cdiff != 0)
  1067.               return cdiff;
  1068.           }
  1069. --- 1856,1862 ----
  1070.           /* Single byte: first check normally, then with ignore case. */
  1071.           if (s1[i] != s2[i])
  1072.           {
  1073. !         cdiff = TOLOWER_LOC(s1[i]) - TOLOWER_LOC(s2[i]);
  1074.           if (cdiff != 0)
  1075.               return cdiff;
  1076.           }
  1077. ***************
  1078. *** 2319,2325 ****
  1079.           if (*s == '_')
  1080.           *p++ = '-';
  1081.           else
  1082. !         *p++ = TO_LOWER(*s);
  1083.       }
  1084.       *p = NUL;
  1085.   
  1086. --- 2345,2351 ----
  1087.           if (*s == '_')
  1088.           *p++ = '-';
  1089.           else
  1090. !         *p++ = TOLOWER_ASC(*s);
  1091.       }
  1092.       *p = NUL;
  1093.   
  1094. ***************
  1095. *** 2445,2451 ****
  1096.       if (s[i] == '_' || s[i] == '-')
  1097.           buf[i] = '-';
  1098.       else if (isalnum((int)s[i]))
  1099. !         buf[i] = TO_LOWER(s[i]);
  1100.       else
  1101.           break;
  1102.       }
  1103. --- 2471,2477 ----
  1104.       if (s[i] == '_' || s[i] == '-')
  1105.           buf[i] = '-';
  1106.       else if (isalnum((int)s[i]))
  1107. !         buf[i] = TOLOWER_ASC(s[i]);
  1108.       else
  1109.           break;
  1110.       }
  1111. *** ../vim61.220/src/menu.c    Mon Feb 11 15:31:34 2002
  1112. --- src/menu.c    Sun Oct 13 15:43:15 2002
  1113. ***************
  1114. *** 1824,1833 ****
  1115.       vimmenu_T    *menu;
  1116.   
  1117.       if (key < 256)
  1118. !     key = TO_LOWER(key);
  1119.       for (menu = root_menu; menu != NULL; menu = menu->next)
  1120.       if (menu->mnemonic == key
  1121. !         || (menu->mnemonic < 256 && TO_LOWER(menu->mnemonic) == key))
  1122.           return TRUE;
  1123.       return FALSE;
  1124.   }
  1125. --- 1833,1842 ----
  1126.       vimmenu_T    *menu;
  1127.   
  1128.       if (key < 256)
  1129. !     key = TOLOWER_LOC(key);
  1130.       for (menu = root_menu; menu != NULL; menu = menu->next)
  1131.       if (menu->mnemonic == key
  1132. !         || (menu->mnemonic < 256 && TOLOWER_LOC(menu->mnemonic) == key))
  1133.           return TRUE;
  1134.       return FALSE;
  1135.   }
  1136. *** ../vim61.220/src/message.c    Mon Sep 16 22:00:32 2002
  1137. --- src/message.c    Sun Oct  6 20:47:55 2002
  1138. ***************
  1139. *** 2294,2300 ****
  1140.               continue;
  1141.           for (retval = 0; hotkeys[retval]; retval++)
  1142.           {
  1143. !             if (hotkeys[retval] == TO_LOWER(c))
  1144.               break;
  1145.           }
  1146.           if (hotkeys[retval])
  1147. --- 2294,2300 ----
  1148.               continue;
  1149.           for (retval = 0; hotkeys[retval]; retval++)
  1150.           {
  1151. !             if (hotkeys[retval] == TOLOWER_LOC(c))
  1152.               break;
  1153.           }
  1154.           if (hotkeys[retval])
  1155. ***************
  1156. *** 2386,2392 ****
  1157.       p = confirm_msg + 1 + STRLEN(message);
  1158.       q = hotk;
  1159.       r = buttons;
  1160. !     *q = (char_u)TO_LOWER(*r);    /* define lowercase hotkey */
  1161.   
  1162.       /* Remember where the choices start, displaying starts here when "q" typed
  1163.        * at the more prompt. */
  1164. --- 2386,2392 ----
  1165.       p = confirm_msg + 1 + STRLEN(message);
  1166.       q = hotk;
  1167.       r = buttons;
  1168. !     *q = (char_u)TOLOWER_LOC(*r);    /* define lowercase hotkey */
  1169.   
  1170.       /* Remember where the choices start, displaying starts here when "q" typed
  1171.        * at the more prompt. */
  1172. ***************
  1173. *** 2399,2405 ****
  1174.       {
  1175.           *p++ = ',';
  1176.           *p++ = ' ';        /* '\n' -> ', ' */
  1177. !         *(++q) = (char_u)TO_LOWER(*(r + 1)); /* next hotkey */
  1178.           if (dfltbutton)
  1179.           --dfltbutton;
  1180.       }
  1181. --- 2399,2405 ----
  1182.       {
  1183.           *p++ = ',';
  1184.           *p++ = ' ';        /* '\n' -> ', ' */
  1185. !         *(++q) = (char_u)TOLOWER_LOC(*(r + 1)); /* next hotkey */
  1186.           if (dfltbutton)
  1187.           --dfltbutton;
  1188.       }
  1189. ***************
  1190. *** 2414,2420 ****
  1191.           *p++ = (dfltbutton == 1) ? '[' : '(';
  1192.           *p++ = *r;
  1193.           *p++ = (dfltbutton == 1) ? ']' : ')';
  1194. !         *q = (char_u)TO_LOWER(*r);    /* define lowercase hotkey */
  1195.           }
  1196.       }
  1197.       else
  1198. --- 2414,2420 ----
  1199.           *p++ = (dfltbutton == 1) ? '[' : '(';
  1200.           *p++ = *r;
  1201.           *p++ = (dfltbutton == 1) ? ']' : ')';
  1202. !         *q = (char_u)TOLOWER_LOC(*r);    /* define lowercase hotkey */
  1203.           }
  1204.       }
  1205.       else
  1206. *** ../vim61.220/src/misc1.c    Mon Sep 16 22:00:32 2002
  1207. --- src/misc1.c    Sun Oct  6 20:48:36 2002
  1208. ***************
  1209. *** 2925,2931 ****
  1210.                   ))
  1211.               {
  1212.   #ifdef OS2        /* env vars only in uppercase */
  1213. !             *var++ = TO_UPPER(*tail);
  1214.               tail++;        /* toupper() may be a macro! */
  1215.   #else
  1216.               *var++ = *tail++;
  1217. --- 2925,2931 ----
  1218.                   ))
  1219.               {
  1220.   #ifdef OS2        /* env vars only in uppercase */
  1221. !             *var++ = TOUPPER_LOC(*tail);
  1222.               tail++;        /* toupper() may be a macro! */
  1223.   #else
  1224.               *var++ = *tail++;
  1225. ***************
  1226. *** 3789,3795 ****
  1227.   {
  1228.       while (len > 0 && *x && *y)
  1229.       {
  1230. !     if (TO_LOWER(*x) != TO_LOWER(*y)
  1231.           && !(*x == '/' && *y == '\\')
  1232.           && !(*x == '\\' && *y == '/'))
  1233.           break;
  1234. --- 3789,3795 ----
  1235.   {
  1236.       while (len > 0 && *x && *y)
  1237.       {
  1238. !     if (TOLOWER_LOC(*x) != TOLOWER_LOC(*y)
  1239.           && !(*x == '/' && *y == '\\')
  1240.           && !(*x == '\\' && *y == '/'))
  1241.           break;
  1242. ***************
  1243. *** 6553,6559 ****
  1244.       else
  1245.   #  endif
  1246.       while (*s)
  1247. !         *d++ = TO_LOWER(*s++);
  1248.       *d = NUL;
  1249.   }
  1250.   # endif
  1251. --- 6553,6559 ----
  1252.       else
  1253.   #  endif
  1254.       while (*s)
  1255. !         *d++ = TOLOWER_LOC(*s++);
  1256.       *d = NUL;
  1257.   }
  1258.   # endif
  1259. *** ../vim61.220/src/misc2.c    Mon Sep 30 22:29:09 2002
  1260. --- src/misc2.c    Sun Oct  6 20:50:36 2002
  1261. ***************
  1262. *** 1281,1287 ****
  1263.   
  1264.   #if (!defined(HAVE_STRCASECMP) && !defined(HAVE_STRICMP)) || defined(PROTO)
  1265.   /*
  1266. !  * Compare two strings, ignoring case.
  1267.    * return 0 for match, < 0 for smaller, > 0 for bigger
  1268.    */
  1269.       int
  1270. --- 1281,1288 ----
  1271.   
  1272.   #if (!defined(HAVE_STRCASECMP) && !defined(HAVE_STRICMP)) || defined(PROTO)
  1273.   /*
  1274. !  * Compare two strings, ignoring case, using current locale.
  1275. !  * Doesn't work for multi-byte characters.
  1276.    * return 0 for match, < 0 for smaller, > 0 for bigger
  1277.    */
  1278.       int
  1279. ***************
  1280. *** 1293,1299 ****
  1281.   
  1282.       for (;;)
  1283.       {
  1284. !     i = (int)TO_LOWER(*s1) - (int)TO_LOWER(*s2);
  1285.       if (i != 0)
  1286.           return i;                /* this character different */
  1287.       if (*s1 == NUL)
  1288. --- 1294,1300 ----
  1289.   
  1290.       for (;;)
  1291.       {
  1292. !     i = (int)TOLOWER_LOC(*s1) - (int)TOLOWER_LOC(*s2);
  1293.       if (i != 0)
  1294.           return i;                /* this character different */
  1295.       if (*s1 == NUL)
  1296. ***************
  1297. *** 1307,1313 ****
  1298.   
  1299.   #if (!defined(HAVE_STRNCASECMP) && !defined(HAVE_STRNICMP)) || defined(PROTO)
  1300.   /*
  1301. !  * Compare two strings, for length "len", ignoring case.
  1302.    * return 0 for match, < 0 for smaller, > 0 for bigger
  1303.    */
  1304.       int
  1305. --- 1308,1315 ----
  1306.   
  1307.   #if (!defined(HAVE_STRNCASECMP) && !defined(HAVE_STRNICMP)) || defined(PROTO)
  1308.   /*
  1309. !  * Compare two strings, for length "len", ignoring case, using current locale.
  1310. !  * Doesn't work for multi-byte characters.
  1311.    * return 0 for match, < 0 for smaller, > 0 for bigger
  1312.    */
  1313.       int
  1314. ***************
  1315. *** 1320,1326 ****
  1316.   
  1317.       while (len > 0)
  1318.       {
  1319. !     i = (int)TO_LOWER(*s1) - (int)TO_LOWER(*s2);
  1320.       if (i != 0)
  1321.           return i;                /* this character different */
  1322.       if (*s1 == NUL)
  1323. --- 1322,1328 ----
  1324.   
  1325.       while (len > 0)
  1326.       {
  1327. !     i = (int)TOLOWER_LOC(*s1) - (int)TOLOWER_LOC(*s2);
  1328.       if (i != 0)
  1329.           return i;                /* this character different */
  1330.       if (*s1 == NUL)
  1331. ***************
  1332. *** 1934,1946 ****
  1333.   {
  1334.       int        i;
  1335.   
  1336. !     if (c > 0 && c <= 255)    /* avoid TO_UPPER() with number > 255 */
  1337. !     {
  1338. !     c = TO_UPPER(c);
  1339. !     for (i = 0; mod_mask_table[i].mod_mask != 0; i++)
  1340. !         if (c == mod_mask_table[i].name)
  1341. !         return mod_mask_table[i].mod_flag;
  1342. !     }
  1343.       return 0;
  1344.   }
  1345.   
  1346. --- 1936,1945 ----
  1347.   {
  1348.       int        i;
  1349.   
  1350. !     c = TOUPPER_ASC(c);
  1351. !     for (i = 0; mod_mask_table[i].mod_mask != 0; i++)
  1352. !     if (c == mod_mask_table[i].name)
  1353. !         return mod_mask_table[i].mod_flag;
  1354.       return 0;
  1355.   }
  1356.   
  1357. ***************
  1358. *** 2288,2294 ****
  1359.   #endif
  1360.       if ((modifiers & MOD_MASK_SHIFT) && ASCII_ISALPHA(key))
  1361.       {
  1362. !     key = TO_UPPER(key);
  1363.       modifiers &= ~MOD_MASK_SHIFT;
  1364.       }
  1365.       if ((modifiers & MOD_MASK_CTRL)
  1366. --- 2287,2293 ----
  1367.   #endif
  1368.       if ((modifiers & MOD_MASK_SHIFT) && ASCII_ISALPHA(key))
  1369.       {
  1370. !     key = TOUPPER_ASC(key);
  1371.       modifiers &= ~MOD_MASK_SHIFT;
  1372.       }
  1373.       if ((modifiers & MOD_MASK_CTRL)
  1374. ***************
  1375. *** 2372,2378 ****
  1376.       {
  1377.           table_name = key_names_table[i].name;
  1378.           for (j = 0; vim_isIDc(name[j]) && table_name[j] != NUL; j++)
  1379. !         if (TO_LOWER(table_name[j]) != TO_LOWER(name[j]))
  1380.               break;
  1381.           if (!vim_isIDc(name[j]) && table_name[j] == NUL)
  1382.           return key_names_table[i].key;
  1383. --- 2371,2377 ----
  1384.       {
  1385.           table_name = key_names_table[i].name;
  1386.           for (j = 0; vim_isIDc(name[j]) && table_name[j] != NUL; j++)
  1387. !         if (TOLOWER_ASC(table_name[j]) != TOLOWER_ASC(name[j]))
  1388.               break;
  1389.           if (!vim_isIDc(name[j]) && table_name[j] == NUL)
  1390.           return key_names_table[i].key;
  1391. ***************
  1392. *** 2796,2802 ****
  1393.               len = 1;
  1394.               else
  1395.               len = 2;
  1396. !             if (len == 1 && TO_LOWER(modep[0]) == 'a')
  1397.               all_idx = SHAPE_IDX_COUNT - 1;
  1398.               else
  1399.               {
  1400. --- 2795,2801 ----
  1401.               len = 1;
  1402.               else
  1403.               len = 2;
  1404. !             if (len == 1 && TOLOWER_ASC(modep[0]) == 'a')
  1405.               all_idx = SHAPE_IDX_COUNT - 1;
  1406.               else
  1407.               {
  1408. ***************
  1409. *** 2893,2899 ****
  1410.                       return (char_u *)N_("Illegal percentage");
  1411.                   if (round == 2)
  1412.                   {
  1413. !                     if (TO_LOWER(i) == 'v')
  1414.                       shape_table[idx].shape = SHAPE_VER;
  1415.                       else
  1416.                       shape_table[idx].shape = SHAPE_HOR;
  1417. --- 2892,2898 ----
  1418.                       return (char_u *)N_("Illegal percentage");
  1419.                   if (round == 2)
  1420.                   {
  1421. !                     if (TOLOWER_ASC(i) == 'v')
  1422.                       shape_table[idx].shape = SHAPE_VER;
  1423.                       else
  1424.                       shape_table[idx].shape = SHAPE_HOR;
  1425. ***************
  1426. *** 4466,4472 ****
  1427.       {
  1428.       if (s1[i] != s2[i]
  1429.   #ifdef CASE_INSENSITIVE_FILENAME
  1430. !         && TO_UPPER(s1[i]) != TO_UPPER(s2[i])
  1431.   #endif
  1432.           )
  1433.       {
  1434. --- 4465,4471 ----
  1435.       {
  1436.       if (s1[i] != s2[i]
  1437.   #ifdef CASE_INSENSITIVE_FILENAME
  1438. !         && TOUPPER_LOC(s1[i]) != TOUPPER_LOC(s2[i])
  1439.   #endif
  1440.           )
  1441.       {
  1442. ***************
  1443. *** 5217,5223 ****
  1444.   
  1445.       if (
  1446.   #ifdef CASE_INSENSITIVE_FILENAME
  1447. !         TO_UPPER(p[i]) != TO_UPPER(q[i])
  1448.   #else
  1449.           p[i] != q[i]
  1450.   #endif
  1451. --- 5216,5222 ----
  1452.   
  1453.       if (
  1454.   #ifdef CASE_INSENSITIVE_FILENAME
  1455. !         TOUPPER_LOC(p[i]) != TOUPPER_LOC(q[i])
  1456.   #else
  1457.           p[i] != q[i]
  1458.   #endif
  1459. *** ../vim61.220/src/option.c    Mon Sep 23 21:32:08 2002
  1460. --- src/option.c    Sun Oct  6 20:50:46 2002
  1461. ***************
  1462. *** 455,460 ****
  1463. --- 455,464 ----
  1464.                   {(char_u *)0L, (char_u *)0L}
  1465.   #endif
  1466.                   },
  1467. +     {"casemap",        "cmp",   P_STRING|P_VI_DEF|P_COMMA|P_NODUP,
  1468. +                 (char_u *)&p_cmp, PV_NONE,
  1469. +                 {(char_u *)"internal,keepascii", (char_u *)0L}
  1470. +                 },
  1471.       {"cdpath",        "cd",   P_STRING|P_EXPAND|P_VI_DEF|P_COMMA|P_NODUP,
  1472.   #ifdef FEAT_SEARCHPATH
  1473.                   (char_u *)&p_cdpath, PV_NONE,
  1474. ***************
  1475. *** 3407,3413 ****
  1476.                   i = 1;
  1477.   #ifdef HAVE_STRTOL
  1478.                   value = strtol((char *)arg, NULL, 0);
  1479. !                 if (arg[i] == '0' && TO_LOWER(arg[i + 1]) == 'x')
  1480.                   i += 2;
  1481.   #else
  1482.                   value = atol((char *)arg);
  1483. --- 3413,3419 ----
  1484.                   i = 1;
  1485.   #ifdef HAVE_STRTOL
  1486.                   value = strtol((char *)arg, NULL, 0);
  1487. !                 if (arg[i] == '0' && TOLOWER_ASC(arg[i + 1]) == 'x')
  1488.                   i += 2;
  1489.   #else
  1490.                   value = atol((char *)arg);
  1491. ***************
  1492. *** 4031,4036 ****
  1493. --- 4037,4043 ----
  1494.       /* initialize the table for 'iskeyword' et.al. */
  1495.       (void)init_chartab();
  1496.   
  1497. +     (void)opt_strings_flags(p_cmp, p_cmp_values, &cmp_flags, TRUE);
  1498.   #ifdef FEAT_SESSION
  1499.       (void)opt_strings_flags(p_ssop, p_ssop_values, &ssop_flags, TRUE);
  1500.       (void)opt_strings_flags(p_vop, p_ssop_values, &vop_flags, TRUE);
  1501. ***************
  1502. *** 5162,5167 ****
  1503. --- 5169,5181 ----
  1504.           errmsg = e_invarg;
  1505.       }
  1506.       else if (check_opt_strings(p_bs, p_bs_values, TRUE) != OK)
  1507. +         errmsg = e_invarg;
  1508. +     }
  1509. + 
  1510. +     /* 'casemap' */
  1511. +     else if (varp == &p_cmp)
  1512. +     {
  1513. +     if (opt_strings_flags(p_cmp, p_cmp_values, &cmp_flags, TRUE) != OK)
  1514.           errmsg = e_invarg;
  1515.       }
  1516.   
  1517. *** ../vim61.220/src/os_msdos.c    Sun Aug 18 15:48:20 2002
  1518. --- src/os_msdos.c    Sun Oct  6 20:51:08 2002
  1519. ***************
  1520. *** 2241,2247 ****
  1521.       return 0;
  1522.       if (path[1] == ':')            /* has a drive name */
  1523.       {
  1524. !     if (change_drive(TO_LOWER(path[0]) - 'a' + 1))
  1525.           return -1;            /* invalid drive name */
  1526.       path += 2;
  1527.       }
  1528. --- 2241,2247 ----
  1529.       return 0;
  1530.       if (path[1] == ':')            /* has a drive name */
  1531.       {
  1532. !     if (change_drive(TOLOWER_ASC(path[0]) - 'a' + 1))
  1533.           return -1;            /* invalid drive name */
  1534.       path += 2;
  1535.       }
  1536. *** ../vim61.220/src/os_mswin.c    Mon Mar 11 21:46:49 2002
  1537. --- src/os_mswin.c    Sun Oct  6 20:51:28 2002
  1538. ***************
  1539. *** 576,582 ****
  1540.       /* If we can change to the drive, skip that part of the path.  If we
  1541.        * can't then the current directory may be invalid, try using chdir()
  1542.        * with the whole path. */
  1543. !     if (_chdrive(TO_LOWER(path[0]) - 'a' + 1) == 0)
  1544.           path += 2;
  1545.       }
  1546.   
  1547. --- 576,582 ----
  1548.       /* If we can change to the drive, skip that part of the path.  If we
  1549.        * can't then the current directory may be invalid, try using chdir()
  1550.        * with the whole path. */
  1551. !     if (_chdrive(TOLOWER_ASC(path[0]) - 'a' + 1) == 0)
  1552.           path += 2;
  1553.       }
  1554.   
  1555. *** ../vim61.220/src/proto/charset.pro    Fri Mar 22 21:41:06 2002
  1556. --- src/proto/charset.pro    Sun Oct  6 21:57:38 2002
  1557. ***************
  1558. *** 3,9 ****
  1559.   int buf_init_chartab __ARGS((buf_T *buf, int global));
  1560.   void trans_characters __ARGS((char_u *buf, int bufsize));
  1561.   char_u *transstr __ARGS((char_u *s));
  1562. ! void str_foldcase __ARGS((char_u *p));
  1563.   char_u *transchar __ARGS((int c));
  1564.   char_u *transchar_byte __ARGS((int c));
  1565.   void transchar_nonprint __ARGS((char_u *buf, int c));
  1566. --- 3,9 ----
  1567.   int buf_init_chartab __ARGS((buf_T *buf, int global));
  1568.   void trans_characters __ARGS((char_u *buf, int bufsize));
  1569.   char_u *transstr __ARGS((char_u *s));
  1570. ! char_u *str_foldcase __ARGS((char_u *str, int len));
  1571.   char_u *transchar __ARGS((int c));
  1572.   char_u *transchar_byte __ARGS((int c));
  1573.   void transchar_nonprint __ARGS((char_u *buf, int c));
  1574. *** ../vim61.220/src/regexp.c    Mon Sep 30 22:22:34 2002
  1575. --- src/regexp.c    Sun Oct  6 20:52:05 2002
  1576. ***************
  1577. *** 2845,2851 ****
  1578.               (enc_utf8 && utf_fold(prog->regstart) == utf_fold(c)))
  1579.               || (c < 255 && prog->regstart < 255 &&
  1580.   #endif
  1581. !                 TO_LOWER(prog->regstart) == TO_LOWER(c)))))
  1582.           retval = regtry(prog, col);
  1583.       else
  1584.           retval = 0;
  1585. --- 2847,2853 ----
  1586.               (enc_utf8 && utf_fold(prog->regstart) == utf_fold(c)))
  1587.               || (c < 255 && prog->regstart < 255 &&
  1588.   #endif
  1589. !                 TOLOWER_LOC(prog->regstart) == TOLOWER_LOC(c)))))
  1590.           retval = regtry(prog, col);
  1591.       else
  1592.           retval = 0;
  1593. ***************
  1594. *** 3432,3438 ****
  1595.   #ifdef FEAT_MBYTE
  1596.                   !enc_utf8 &&
  1597.   #endif
  1598. !                 TO_LOWER(*opnd) != TO_LOWER(*reginput))))
  1599.               return FALSE;
  1600.           if (*opnd == NUL)
  1601.           {
  1602. --- 3434,3440 ----
  1603.   #ifdef FEAT_MBYTE
  1604.                   !enc_utf8 &&
  1605.   #endif
  1606. !                 TOLOWER_LOC(*opnd) != TOLOWER_LOC(*reginput))))
  1607.               return FALSE;
  1608.           if (*opnd == NUL)
  1609.           {
  1610. ***************
  1611. *** 3886,3894 ****
  1612.               if (ireg_ic)
  1613.               {
  1614.               if (isupper(nextb))
  1615. !                 nextb_ic = TO_LOWER(nextb);
  1616.               else
  1617. !                 nextb_ic = TO_UPPER(nextb);
  1618.               }
  1619.               else
  1620.               nextb_ic = nextb;
  1621. --- 3888,3896 ----
  1622.               if (ireg_ic)
  1623.               {
  1624.               if (isupper(nextb))
  1625. !                 nextb_ic = TOLOWER_LOC(nextb);
  1626.               else
  1627. !                 nextb_ic = TOUPPER_LOC(nextb);
  1628.               }
  1629.               else
  1630.               nextb_ic = nextb;
  1631. ***************
  1632. *** 4407,4414 ****
  1633.            * would have been used for it. */
  1634.           if (ireg_ic)
  1635.           {
  1636. !         cu = TO_UPPER(*opnd);
  1637. !         cl = TO_LOWER(*opnd);
  1638.           while (count < maxcount && (*scan == cu || *scan == cl))
  1639.           {
  1640.               count++;
  1641. --- 4409,4416 ----
  1642.            * would have been used for it. */
  1643.           if (ireg_ic)
  1644.           {
  1645. !         cu = TOUPPER_LOC(*opnd);
  1646. !         cl = TOLOWER_LOC(*opnd);
  1647.           while (count < maxcount && (*scan == cu || *scan == cl))
  1648.           {
  1649.               count++;
  1650. ***************
  1651. *** 5206,5214 ****
  1652.       else
  1653.   #endif
  1654.        if (isupper(c))
  1655. !     cc = TO_LOWER(c);
  1656.       else if (islower(c))
  1657. !     cc = TO_UPPER(c);
  1658.       else
  1659.       return vim_strchr(s, c);
  1660.   
  1661. --- 5208,5216 ----
  1662.       else
  1663.   #endif
  1664.        if (isupper(c))
  1665. !     cc = TOLOWER_LOC(c);
  1666.       else if (islower(c))
  1667. !     cc = TOUPPER_LOC(c);
  1668.       else
  1669.       return vim_strchr(s, c);
  1670.   
  1671. ***************
  1672. *** 5266,5272 ****
  1673.       char_u *d;
  1674.       int c;
  1675.   {
  1676. !     *d = TO_UPPER(c);
  1677.   
  1678.       return (fptr)NULL;
  1679.   }
  1680. --- 5268,5274 ----
  1681.       char_u *d;
  1682.       int c;
  1683.   {
  1684. !     *d = TOUPPER_LOC(c);
  1685.   
  1686.       return (fptr)NULL;
  1687.   }
  1688. ***************
  1689. *** 5276,5282 ****
  1690.       char_u *d;
  1691.       int c;
  1692.   {
  1693. !     *d = TO_UPPER(c);
  1694.   
  1695.       return (fptr)do_Upper;
  1696.   }
  1697. --- 5278,5284 ----
  1698.       char_u *d;
  1699.       int c;
  1700.   {
  1701. !     *d = TOUPPER_LOC(c);
  1702.   
  1703.       return (fptr)do_Upper;
  1704.   }
  1705. ***************
  1706. *** 5286,5292 ****
  1707.       char_u *d;
  1708.       int c;
  1709.   {
  1710. !     *d = TO_LOWER(c);
  1711.   
  1712.       return (fptr)NULL;
  1713.   }
  1714. --- 5288,5294 ----
  1715.       char_u *d;
  1716.       int c;
  1717.   {
  1718. !     *d = TOLOWER_LOC(c);
  1719.   
  1720.       return (fptr)NULL;
  1721.   }
  1722. ***************
  1723. *** 5296,5302 ****
  1724.       char_u    *d;
  1725.       int        c;
  1726.   {
  1727. !     *d = TO_LOWER(c);
  1728.   
  1729.       return (fptr)do_Lower;
  1730.   }
  1731. --- 5298,5304 ----
  1732.       char_u    *d;
  1733.       int        c;
  1734.   {
  1735. !     *d = TOLOWER_LOC(c);
  1736.   
  1737.       return (fptr)do_Lower;
  1738.   }
  1739. *** ../vim61.220/src/option.h    Sun Jul 28 22:02:42 2002
  1740. --- src/option.h    Sun Oct  6 20:57:57 2002
  1741. ***************
  1742. *** 309,314 ****
  1743. --- 309,321 ----
  1744.   #ifdef FEAT_LINEBREAK
  1745.   EXTERN char_u    *p_breakat;    /* 'breakat' */
  1746.   #endif
  1747. + EXTERN char_u    *p_cmp;        /* 'casemap' */
  1748. + EXTERN unsigned    cmp_flags;
  1749. + #ifdef IN_OPTION_C
  1750. + static char *(p_cmp_values[]) = {"internal", "keepascii", NULL};
  1751. + #endif
  1752. + #define CMP_INTERNAL        0x001
  1753. + #define CMP_KEEPASCII        0x002
  1754.   #ifdef FEAT_MBYTE
  1755.   EXTERN char_u    *p_enc;        /* 'encoding' */
  1756.   EXTERN int    p_deco;        /* 'delcombine' */
  1757. *** ../vim61.220/src/syntax.c    Sat Sep 28 15:15:20 2002
  1758. --- src/syntax.c    Sun Oct  6 21:54:54 2002
  1759. ***************
  1760. *** 2946,2952 ****
  1761.           ktab = syn_buf->b_keywtab[syn_khash(keyword)];
  1762.       else /* round == 2, ignore case */
  1763.       {
  1764. !         str_foldcase(keyword);
  1765.           ktab = syn_buf->b_keywtab_ic[syn_khash(keyword)];
  1766.       }
  1767.   
  1768. --- 2948,2960 ----
  1769.           ktab = syn_buf->b_keywtab[syn_khash(keyword)];
  1770.       else /* round == 2, ignore case */
  1771.       {
  1772. !         p = str_foldcase(keyword, STRLEN(keyword));
  1773. !         if (p != NULL)
  1774. !         {
  1775. !         STRNCPY(keyword, p, MAXKEYWLEN);
  1776. !         keyword[MAXKEYWLEN] = NUL;
  1777. !         vim_free(p);
  1778. !         }
  1779.           ktab = syn_buf->b_keywtab_ic[syn_khash(keyword)];
  1780.       }
  1781.   
  1782. ***************
  1783. *** 3904,3914 ****
  1784.       keyentry_T    *ktab;
  1785.       keyentry_T    ***ktabpp;
  1786.       int        hash;
  1787.   
  1788. !     ktab = (keyentry_T *)alloc((int)(sizeof(keyentry_T) + STRLEN(name)));
  1789.       if (ktab == NULL)
  1790.       return;
  1791. !     STRCPY(ktab->keyword, name);
  1792.       ktab->k_syn.id = id;
  1793.       ktab->k_syn.inc_tag = current_syn_inc_tag;
  1794.       ktab->flags = flags;
  1795. --- 3912,3931 ----
  1796.       keyentry_T    *ktab;
  1797.       keyentry_T    ***ktabpp;
  1798.       int        hash;
  1799. +     char_u    *name_ic = name;
  1800.   
  1801. !     if (curbuf->b_syn_ic)
  1802. !     {
  1803. !     name_ic = str_foldcase(name, STRLEN(name));
  1804. !     if (name_ic == NULL)
  1805. !         name_ic = name;
  1806. !     }
  1807. !     ktab = (keyentry_T *)alloc((int)(sizeof(keyentry_T) + STRLEN(name_ic)));
  1808.       if (ktab == NULL)
  1809.       return;
  1810. !     STRCPY(ktab->keyword, name_ic);
  1811. !     if (name_ic != name)
  1812. !     vim_free(name_ic);
  1813.       ktab->k_syn.id = id;
  1814.       ktab->k_syn.inc_tag = current_syn_inc_tag;
  1815.       ktab->flags = flags;
  1816. ***************
  1817. *** 3918,3927 ****
  1818.       ktab->next_list = copy_id_list(next_list);
  1819.   
  1820.       if (curbuf->b_syn_ic)
  1821. -     {
  1822. -     str_foldcase(ktab->keyword);
  1823.       ktabpp = &curbuf->b_keywtab_ic;
  1824. -     }
  1825.       else
  1826.       ktabpp = &curbuf->b_keywtab;
  1827.   
  1828. --- 3935,3941 ----
  1829. ***************
  1830. *** 4047,4053 ****
  1831.       {
  1832.           if (!isalpha(arg[llen]))
  1833.           break;
  1834. !         lowname[llen] = TO_LOWER(arg[llen]);
  1835.       }
  1836.   
  1837.       for (fidx = sizeof(flagtab) / sizeof(struct flag); --fidx >= 0; )
  1838. --- 4061,4067 ----
  1839.       {
  1840.           if (!isalpha(arg[llen]))
  1841.           break;
  1842. !         lowname[llen] = TOLOWER_ASC(arg[llen]);
  1843.       }
  1844.   
  1845.       for (fidx = sizeof(flagtab) / sizeof(struct flag); --fidx >= 0; )
  1846. ***************
  1847. *** 5383,5389 ****
  1848.               || STRCMP(name + 1, "TOP") == 0
  1849.               || STRCMP(name + 1, "CONTAINED") == 0)
  1850.           {
  1851. !         if (TO_UPPER(**arg) != 'C')
  1852.           {
  1853.               EMSG2(_("E407: %s not allowed here"), name + 1);
  1854.               failed = TRUE;
  1855. --- 5397,5403 ----
  1856.               || STRCMP(name + 1, "TOP") == 0
  1857.               || STRCMP(name + 1, "CONTAINED") == 0)
  1858.           {
  1859. !         if (TOUPPER_ASC(**arg) != 'C')
  1860.           {
  1861.               EMSG2(_("E407: %s not allowed here"), name + 1);
  1862.               failed = TRUE;
  1863. ***************
  1864. *** 6533,6539 ****
  1865.   #endif
  1866.   
  1867.           /* reduce calls to STRICMP a bit, it can be slow */
  1868. !         off = TO_UPPER(*arg);
  1869.           for (i = (sizeof(color_names) / sizeof(char *)); --i >= 0; )
  1870.               if (off == color_names[i][0]
  1871.                    && STRICMP(arg + 1, color_names[i] + 1) == 0)
  1872. --- 6547,6553 ----
  1873.   #endif
  1874.   
  1875.           /* reduce calls to STRICMP a bit, it can be slow */
  1876. !         off = TOUPPER_ASC(*arg);
  1877.           for (i = (sizeof(color_names) / sizeof(char *)); --i >= 0; )
  1878.               if (off == color_names[i][0]
  1879.                    && STRICMP(arg + 1, color_names[i] + 1) == 0)
  1880. ***************
  1881. *** 7557,7563 ****
  1882.       if (id <= 0 || id > highlight_ga.ga_len)
  1883.       return NULL;
  1884.   
  1885. !     if (TO_LOWER(what[0]) == 'f')
  1886.       fg = TRUE;
  1887.       else
  1888.       fg = FALSE;
  1889. --- 7571,7577 ----
  1890.       if (id <= 0 || id > highlight_ga.ga_len)
  1891.       return NULL;
  1892.   
  1893. !     if (TOLOWER_ASC(what[0]) == 'f')
  1894.       fg = TRUE;
  1895.       else
  1896.       fg = FALSE;
  1897. *** ../vim61.220/src/version.c    Sun Oct 13 18:48:35 2002
  1898. --- src/version.c    Sun Oct 13 19:50:11 2002
  1899. ***************
  1900. *** 608,609 ****
  1901. --- 608,611 ----
  1902.   {   /* Add new patch number below this line */
  1903. + /**/
  1904. +     221,
  1905.   /**/
  1906.  
  1907. -- 
  1908. hundred-and-one symptoms of being an internet addict:
  1909. 212. Your Internet group window has more icons than your Accessories window.
  1910.  
  1911.  ///  Bram Moolenaar -- Bram@moolenaar.net -- http://www.moolenaar.net  \\\
  1912. ///          Creator of Vim - Vi IMproved -- http://www.vim.org          \\\
  1913. \\\           Project leader for A-A-P -- http://www.a-a-p.org           ///
  1914.  \\\ Lord Of The Rings helps Uganda - http://iccf-holland.org/lotr.html ///
  1915.