home *** CD-ROM | disk | FTP | other *** search
/ vim.ftp.fu-berlin.de / 2015-02-03.vim.ftp.fu-berlin.de.tar / vim.ftp.fu-berlin.de / patches / 7.3 / 7.3.819 < prev    next >
Encoding:
Internet Message Format  |  2013-02-14  |  16.0 KB
  1. To: vim_dev@googlegroups.com
  2. Subject: Patch 7.3.819
  3. Fcc: outbox
  4. From: Bram Moolenaar <Bram@moolenaar.net>
  5. Mime-Version: 1.0
  6. Content-Type: text/plain; charset=UTF-8
  7. Content-Transfer-Encoding: 8bit
  8. ------------
  9.  
  10. Patch 7.3.819
  11. Problem:    Compiling without +eval and with Python isn't working.
  12. Solution:   Add the eval feature when building with Python.
  13. Files:        src/if_py_both.h, src/feature.h, src/eval.c, src/ex_docmd.c,
  14.         src/normal.c, src/gui_gtk_x11.c
  15.  
  16.  
  17. *** ../vim-7.3.818/src/if_py_both.h    2012-12-05 16:30:03.000000000 +0100
  18. --- src/if_py_both.h    2013-02-14 19:22:59.000000000 +0100
  19. ***************
  20. *** 310,316 ****
  21.       return result;
  22.   }
  23.   
  24. - #ifdef FEAT_EVAL
  25.   /*
  26.    * Function to translate a typval_T into a PyObject; this will recursively
  27.    * translate lists/dictionaries into their Python equivalents.
  28. --- 310,315 ----
  29. ***************
  30. *** 425,436 ****
  31.   
  32.       return result;
  33.   }
  34. - #endif
  35.   
  36.       static PyObject *
  37.   VimEval(PyObject *self UNUSED, PyObject *args UNUSED)
  38.   {
  39. - #ifdef FEAT_EVAL
  40.       char    *expr;
  41.       typval_T    *our_tv;
  42.       PyObject    *result;
  43. --- 424,433 ----
  44. ***************
  45. *** 466,475 ****
  46.       Py_END_ALLOW_THREADS
  47.   
  48.       return result;
  49. - #else
  50. -     PyErr_SetVim(_("expressions disabled at compile time"));
  51. -     return NULL;
  52. - #endif
  53.   }
  54.   
  55.   static PyObject *ConvertToPyObject(typval_T *);
  56. --- 463,468 ----
  57. ***************
  58. *** 477,483 ****
  59.       static PyObject *
  60.   VimEvalPy(PyObject *self UNUSED, PyObject *args UNUSED)
  61.   {
  62. - #ifdef FEAT_EVAL
  63.       char    *expr;
  64.       typval_T    *our_tv;
  65.       PyObject    *result;
  66. --- 470,475 ----
  67. ***************
  68. *** 506,515 ****
  69.       Py_END_ALLOW_THREADS
  70.   
  71.       return result;
  72. - #else
  73. -     PyErr_SetVim(_("expressions disabled at compile time"));
  74. -     return NULL;
  75. - #endif
  76.   }
  77.   
  78.       static PyObject *
  79. --- 498,503 ----
  80. ***************
  81. *** 946,952 ****
  82.   }
  83.   
  84.       static PyObject *
  85. ! DictionaryListKeys(PyObject *self)
  86.   {
  87.       dict_T    *dict = ((DictionaryObject *)(self))->dict;
  88.       long_u    todo = dict->dv_hashtab.ht_used;
  89. --- 934,940 ----
  90.   }
  91.   
  92.       static PyObject *
  93. ! DictionaryListKeys(PyObject *self UNUSED)
  94.   {
  95.       dict_T    *dict = ((DictionaryObject *)(self))->dict;
  96.       long_u    todo = dict->dv_hashtab.ht_used;
  97. ***************
  98. *** 2549,2555 ****
  99.       return 0;
  100.   }
  101.   
  102. - #ifdef FEAT_EVAL
  103.   typedef int (*pytotvfunc)(PyObject *, typval_T *, PyObject *);
  104.   
  105.       static int
  106. --- 2537,2542 ----
  107. ***************
  108. *** 2781,2784 ****
  109.           return NULL;
  110.       }
  111.   }
  112. - #endif
  113. --- 2768,2770 ----
  114. *** ../vim-7.3.818/src/feature.h    2013-01-23 13:40:54.000000000 +0100
  115. --- src/feature.h    2013-02-14 19:25:33.000000000 +0100
  116. ***************
  117. *** 392,397 ****
  118. --- 392,404 ----
  119.   #endif
  120.   
  121.   /*
  122. +  * +python and +python3 require FEAT_EVAL.
  123. +  */
  124. + #if !defined(FEAT_EVAL) && (defined(FEAT_PYTHON3) || defined(FEAT_PYTHON))
  125. + # define FEAT_EVAL
  126. + #endif
  127. + 
  128. + /*
  129.    * +profile        Profiling for functions and scripts.
  130.    */
  131.   #if defined(FEAT_HUGE) \
  132. *** ../vim-7.3.818/src/eval.c    2013-02-13 17:34:59.000000000 +0100
  133. --- src/eval.c    2013-02-14 19:38:09.000000000 +0100
  134. ***************
  135. *** 917,923 ****
  136. --- 917,925 ----
  137.       hash_clear(&compat_hashtab);
  138.   
  139.       free_scriptnames();
  140. + # if defined(FEAT_CMDL_COMPL)
  141.       free_locales();
  142. + # endif
  143.   
  144.       /* global variables */
  145.       vars_clear(&globvarht);
  146. ***************
  147. *** 1561,1568 ****
  148.   }
  149.   
  150.   
  151. - #if (defined(FEAT_USR_CMDS) && defined(FEAT_CMDL_COMPL)) \
  152. -     || defined(FEAT_COMPL_FUNC) || defined(PROTO)
  153.   /*
  154.    * Call some vimL function and return the result in "*rettv".
  155.    * Uses argv[argc] for the function arguments.  Only Number and String
  156. --- 1563,1568 ----
  157. ***************
  158. *** 1640,1692 ****
  159.       return ret;
  160.   }
  161.   
  162. - # if (defined(FEAT_USR_CMDS) && defined(FEAT_CMDL_COMPL)) || defined(PROTO)
  163.   /*
  164. !  * Call vimL function "func" and return the result as a string.
  165. !  * Returns NULL when calling the function fails.
  166.    * Uses argv[argc] for the function arguments.
  167.    */
  168. !     void *
  169. ! call_func_retstr(func, argc, argv, safe)
  170.       char_u      *func;
  171.       int        argc;
  172.       char_u      **argv;
  173.       int        safe;        /* use the sandbox */
  174.   {
  175.       typval_T    rettv;
  176. !     char_u    *retval;
  177.   
  178.       /* All arguments are passed as strings, no conversion to number. */
  179.       if (call_vim_function(func, argc, argv, safe, TRUE, &rettv) == FAIL)
  180. !     return NULL;
  181.   
  182. !     retval = vim_strsave(get_tv_string(&rettv));
  183.       clear_tv(&rettv);
  184.       return retval;
  185.   }
  186. - # endif
  187.   
  188. ! # if defined(FEAT_COMPL_FUNC) || defined(PROTO)
  189.   /*
  190. !  * Call vimL function "func" and return the result as a number.
  191. !  * Returns -1 when calling the function fails.
  192.    * Uses argv[argc] for the function arguments.
  193.    */
  194. !     long
  195. ! call_func_retnr(func, argc, argv, safe)
  196.       char_u      *func;
  197.       int        argc;
  198.       char_u      **argv;
  199.       int        safe;        /* use the sandbox */
  200.   {
  201.       typval_T    rettv;
  202. !     long    retval;
  203.   
  204.       /* All arguments are passed as strings, no conversion to number. */
  205.       if (call_vim_function(func, argc, argv, safe, TRUE, &rettv) == FAIL)
  206. !     return -1;
  207.   
  208. !     retval = get_tv_number_chk(&rettv, NULL);
  209.       clear_tv(&rettv);
  210.       return retval;
  211.   }
  212. --- 1640,1693 ----
  213.       return ret;
  214.   }
  215.   
  216.   /*
  217. !  * Call vimL function "func" and return the result as a number.
  218. !  * Returns -1 when calling the function fails.
  219.    * Uses argv[argc] for the function arguments.
  220.    */
  221. !     long
  222. ! call_func_retnr(func, argc, argv, safe)
  223.       char_u      *func;
  224.       int        argc;
  225.       char_u      **argv;
  226.       int        safe;        /* use the sandbox */
  227.   {
  228.       typval_T    rettv;
  229. !     long    retval;
  230.   
  231.       /* All arguments are passed as strings, no conversion to number. */
  232.       if (call_vim_function(func, argc, argv, safe, TRUE, &rettv) == FAIL)
  233. !     return -1;
  234.   
  235. !     retval = get_tv_number_chk(&rettv, NULL);
  236.       clear_tv(&rettv);
  237.       return retval;
  238.   }
  239.   
  240. ! #if (defined(FEAT_USR_CMDS) && defined(FEAT_CMDL_COMPL)) \
  241. !     || defined(FEAT_COMPL_FUNC) || defined(PROTO)
  242. ! 
  243. ! # if (defined(FEAT_USR_CMDS) && defined(FEAT_CMDL_COMPL)) || defined(PROTO)
  244.   /*
  245. !  * Call vimL function "func" and return the result as a string.
  246. !  * Returns NULL when calling the function fails.
  247.    * Uses argv[argc] for the function arguments.
  248.    */
  249. !     void *
  250. ! call_func_retstr(func, argc, argv, safe)
  251.       char_u      *func;
  252.       int        argc;
  253.       char_u      **argv;
  254.       int        safe;        /* use the sandbox */
  255.   {
  256.       typval_T    rettv;
  257. !     char_u    *retval;
  258.   
  259.       /* All arguments are passed as strings, no conversion to number. */
  260.       if (call_vim_function(func, argc, argv, safe, TRUE, &rettv) == FAIL)
  261. !     return NULL;
  262.   
  263. !     retval = vim_strsave(get_tv_string(&rettv));
  264.       clear_tv(&rettv);
  265.       return retval;
  266.   }
  267. ***************
  268. *** 1720,1726 ****
  269.   }
  270.   #endif
  271.   
  272. - 
  273.   /*
  274.    * Save the current function call pointer, and set it to NULL.
  275.    * Used when executing autocommands and for ":source".
  276. --- 1721,1726 ----
  277. ***************
  278. *** 9330,9336 ****
  279.    */
  280.       static void
  281.   f_cindent(argvars, rettv)
  282. !     typval_T    *argvars;
  283.       typval_T    *rettv;
  284.   {
  285.   #ifdef FEAT_CINDENT
  286. --- 9330,9336 ----
  287.    */
  288.       static void
  289.   f_cindent(argvars, rettv)
  290. !     typval_T    *argvars UNUSED;
  291.       typval_T    *rettv;
  292.   {
  293.   #ifdef FEAT_CINDENT
  294. ***************
  295. *** 10379,10387 ****
  296.   
  297.       static void
  298.   findfilendir(argvars, rettv, find_what)
  299. !     typval_T    *argvars;
  300.       typval_T    *rettv;
  301. !     int        find_what;
  302.   {
  303.   #ifdef FEAT_SEARCHPATH
  304.       char_u    *fname;
  305. --- 10379,10387 ----
  306.   
  307.       static void
  308.   findfilendir(argvars, rettv, find_what)
  309. !     typval_T    *argvars UNUSED;
  310.       typval_T    *rettv;
  311. !     int        find_what UNUSED;
  312.   {
  313.   #ifdef FEAT_SEARCHPATH
  314.       char_u    *fname;
  315. ***************
  316. *** 10751,10759 ****
  317.    */
  318.       static void
  319.   foldclosed_both(argvars, rettv, end)
  320. !     typval_T    *argvars;
  321.       typval_T    *rettv;
  322. !     int        end;
  323.   {
  324.   #ifdef FEAT_FOLDING
  325.       linenr_T    lnum;
  326. --- 10751,10759 ----
  327.    */
  328.       static void
  329.   foldclosed_both(argvars, rettv, end)
  330. !     typval_T    *argvars UNUSED;
  331.       typval_T    *rettv;
  332. !     int        end UNUSED;
  333.   {
  334.   #ifdef FEAT_FOLDING
  335.       linenr_T    lnum;
  336. ***************
  337. *** 10802,10809 ****
  338.    */
  339.       static void
  340.   f_foldlevel(argvars, rettv)
  341. !     typval_T    *argvars;
  342. !     typval_T    *rettv;
  343.   {
  344.   #ifdef FEAT_FOLDING
  345.       linenr_T    lnum;
  346. --- 10802,10809 ----
  347.    */
  348.       static void
  349.   f_foldlevel(argvars, rettv)
  350. !     typval_T    *argvars UNUSED;
  351. !     typval_T    *rettv UNUSED;
  352.   {
  353.   #ifdef FEAT_FOLDING
  354.       linenr_T    lnum;
  355. ***************
  356. *** 11583,11589 ****
  357.       static void
  358.   f_getmatches(argvars, rettv)
  359.       typval_T    *argvars UNUSED;
  360. !     typval_T    *rettv;
  361.   {
  362.   #ifdef FEAT_SEARCH_EXTRA
  363.       dict_T    *dict;
  364. --- 11583,11589 ----
  365.       static void
  366.   f_getmatches(argvars, rettv)
  367.       typval_T    *argvars UNUSED;
  368. !     typval_T    *rettv UNUSED;
  369.   {
  370.   #ifdef FEAT_SEARCH_EXTRA
  371.       dict_T    *dict;
  372. ***************
  373. *** 13589,13595 ****
  374.    */
  375.       static void
  376.   f_lispindent(argvars, rettv)
  377. !     typval_T    *argvars;
  378.       typval_T    *rettv;
  379.   {
  380.   #ifdef FEAT_LISP
  381. --- 13589,13595 ----
  382.    */
  383.       static void
  384.   f_lispindent(argvars, rettv)
  385. !     typval_T    *argvars UNUSED;
  386.       typval_T    *rettv;
  387.   {
  388.   #ifdef FEAT_LISP
  389. ***************
  390. *** 13983,13990 ****
  391.    */
  392.       static void
  393.   f_matchadd(argvars, rettv)
  394. !     typval_T    *argvars;
  395. !     typval_T    *rettv;
  396.   {
  397.   #ifdef FEAT_SEARCH_EXTRA
  398.       char_u    buf[NUMBUFLEN];
  399. --- 13983,13990 ----
  400.    */
  401.       static void
  402.   f_matchadd(argvars, rettv)
  403. !     typval_T    *argvars UNUSED;
  404. !     typval_T    *rettv UNUSED;
  405.   {
  406.   #ifdef FEAT_SEARCH_EXTRA
  407.       char_u    buf[NUMBUFLEN];
  408. ***************
  409. *** 14021,14027 ****
  410.    */
  411.       static void
  412.   f_matcharg(argvars, rettv)
  413. !     typval_T    *argvars;
  414.       typval_T    *rettv;
  415.   {
  416.       if (rettv_list_alloc(rettv) == OK)
  417. --- 14021,14027 ----
  418.    */
  419.       static void
  420.   f_matcharg(argvars, rettv)
  421. !     typval_T    *argvars UNUSED;
  422.       typval_T    *rettv;
  423.   {
  424.       if (rettv_list_alloc(rettv) == OK)
  425. ***************
  426. *** 14053,14060 ****
  427.    */
  428.       static void
  429.   f_matchdelete(argvars, rettv)
  430. !     typval_T    *argvars;
  431. !     typval_T    *rettv;
  432.   {
  433.   #ifdef FEAT_SEARCH_EXTRA
  434.       rettv->vval.v_number = match_delete(curwin,
  435. --- 14053,14060 ----
  436.    */
  437.       static void
  438.   f_matchdelete(argvars, rettv)
  439. !     typval_T    *argvars UNUSED;
  440. !     typval_T    *rettv UNUSED;
  441.   {
  442.   #ifdef FEAT_SEARCH_EXTRA
  443.       rettv->vval.v_number = match_delete(curwin,
  444. ***************
  445. *** 14871,14878 ****
  446.    */
  447.       static void
  448.   f_reltime(argvars, rettv)
  449. !     typval_T    *argvars;
  450. !     typval_T    *rettv;
  451.   {
  452.   #ifdef FEAT_RELTIME
  453.       proftime_T    res;
  454. --- 14871,14878 ----
  455.    */
  456.       static void
  457.   f_reltime(argvars, rettv)
  458. !     typval_T    *argvars UNUSED;
  459. !     typval_T    *rettv UNUSED;
  460.   {
  461.   #ifdef FEAT_RELTIME
  462.       proftime_T    res;
  463. ***************
  464. *** 14920,14926 ****
  465.    */
  466.       static void
  467.   f_reltimestr(argvars, rettv)
  468. !     typval_T    *argvars;
  469.       typval_T    *rettv;
  470.   {
  471.   #ifdef FEAT_RELTIME
  472. --- 14920,14926 ----
  473.    */
  474.       static void
  475.   f_reltimestr(argvars, rettv)
  476. !     typval_T    *argvars UNUSED;
  477.       typval_T    *rettv;
  478.   {
  479.   #ifdef FEAT_RELTIME
  480. ***************
  481. *** 15965,15971 ****
  482.       int        flags;        /* SP_SETPCMARK and other SP_ values */
  483.       pos_T    *match_pos;
  484.       linenr_T    lnum_stop;  /* stop at this line if not zero */
  485. !     long    time_limit; /* stop after this many msec */
  486.   {
  487.       char_u    *save_cpo;
  488.       char_u    *pat, *pat2 = NULL, *pat3 = NULL;
  489. --- 15965,15971 ----
  490.       int        flags;        /* SP_SETPCMARK and other SP_ values */
  491.       pos_T    *match_pos;
  492.       linenr_T    lnum_stop;  /* stop at this line if not zero */
  493. !     long    time_limit UNUSED; /* stop after this many msec */
  494.   {
  495.       char_u    *save_cpo;
  496.       char_u    *pat, *pat2 = NULL, *pat3 = NULL;
  497. ***************
  498. *** 16390,16397 ****
  499.    */
  500.       static void
  501.   f_setmatches(argvars, rettv)
  502. !     typval_T    *argvars;
  503. !     typval_T    *rettv;
  504.   {
  505.   #ifdef FEAT_SEARCH_EXTRA
  506.       list_T    *l;
  507. --- 16390,16397 ----
  508.    */
  509.       static void
  510.   f_setmatches(argvars, rettv)
  511. !     typval_T    *argvars UNUSED;
  512. !     typval_T    *rettv UNUSED;
  513.   {
  514.   #ifdef FEAT_SEARCH_EXTRA
  515.       list_T    *l;
  516. ***************
  517. *** 18463,18469 ****
  518.    */
  519.       static void
  520.   f_undofile(argvars, rettv)
  521. !     typval_T    *argvars;
  522.       typval_T    *rettv;
  523.   {
  524.       rettv->v_type = VAR_STRING;
  525. --- 18463,18469 ----
  526.    */
  527.       static void
  528.   f_undofile(argvars, rettv)
  529. !     typval_T    *argvars UNUSED;
  530.       typval_T    *rettv;
  531.   {
  532.       rettv->v_type = VAR_STRING;
  533. *** ../vim-7.3.818/src/ex_docmd.c    2012-12-05 19:13:11.000000000 +0100
  534. --- src/ex_docmd.c    2013-02-14 20:50:56.000000000 +0100
  535. ***************
  536. *** 1734,1739 ****
  537. --- 1734,1741 ----
  538.   #ifdef FEAT_EVAL
  539.           /* avoid that a function call in 'statusline' does this */
  540.           && !getline_equal(fgetline, cookie, get_func_line)
  541. + #endif
  542. + #ifdef FEAT_AUTOCMD
  543.           /* avoid that an autocommand, e.g. QuitPre, does this */
  544.           && !getline_equal(fgetline, cookie, getnextac)
  545.   #endif
  546. ***************
  547. *** 5375,5381 ****
  548. --- 5377,5385 ----
  549.   #endif
  550.       return FAIL;
  551.   }
  552. + #endif
  553.   
  554. + #if defined(FEAT_USR_CMDS) || defined(FEAT_EVAL) || defined(PROTO)
  555.   /*
  556.    * List of names for completion for ":command" with the EXPAND_ flag.
  557.    * Must be alphabetical for completion.
  558. ***************
  559. *** 5430,5436 ****
  560. --- 5434,5442 ----
  561.       {EXPAND_USER_VARS, "var"},
  562.       {0, NULL}
  563.   };
  564. + #endif
  565.   
  566. + #if defined(FEAT_USR_CMDS) || defined(PROTO)
  567.       static void
  568.   uc_list(name, name_len)
  569.       char_u    *name;
  570. ***************
  571. *** 6375,6384 ****
  572.       int        vallen;
  573.       int        *complp;
  574.       long    *argt;
  575. !     char_u    **compl_arg;
  576.   {
  577.       char_u    *arg = NULL;
  578.       size_t    arglen = 0;
  579.       int        i;
  580.       int        valend = vallen;
  581.   
  582. --- 6381,6392 ----
  583.       int        vallen;
  584.       int        *complp;
  585.       long    *argt;
  586. !     char_u    **compl_arg UNUSED;
  587.   {
  588.       char_u    *arg = NULL;
  589. + # if defined(FEAT_EVAL) && defined(FEAT_CMDL_COMPL)
  590.       size_t    arglen = 0;
  591. + # endif
  592.       int        i;
  593.       int        valend = vallen;
  594.   
  595. ***************
  596. *** 6388,6394 ****
  597. --- 6396,6404 ----
  598.       if (value[i] == ',')
  599.       {
  600.           arg = &value[i + 1];
  601. + # if defined(FEAT_EVAL) && defined(FEAT_CMDL_COMPL)
  602.           arglen = vallen - i - 1;
  603. + # endif
  604.           valend = i;
  605.           break;
  606.       }
  607. *** ../vim-7.3.818/src/normal.c    2013-01-24 21:00:15.000000000 +0100
  608. --- src/normal.c    2013-02-14 19:33:36.000000000 +0100
  609. ***************
  610. *** 2292,2298 ****
  611. --- 2292,2300 ----
  612.   {
  613.   #ifdef FEAT_EVAL
  614.       char_u    *(argv[1]);
  615. + # ifdef FEAT_VIRTUALEDIT
  616.       int        save_virtual_op = virtual_op;
  617. + # endif
  618.   
  619.       if (*p_opfunc == NUL)
  620.       EMSG(_("E774: 'operatorfunc' is empty"));
  621. ***************
  622. *** 2312,2324 ****
  623. --- 2314,2330 ----
  624.       else
  625.           argv[0] = (char_u *)"char";
  626.   
  627. + # ifdef FEAT_VIRTUALEDIT
  628.       /* Reset virtual_op so that 'virtualedit' can be changed in the
  629.        * function. */
  630.       virtual_op = MAYBE;
  631. + # endif
  632.   
  633.       (void)call_func_retnr(p_opfunc, 1, argv, FALSE);
  634.   
  635. + # ifdef FEAT_VIRTUALEDIT
  636.       virtual_op = save_virtual_op;
  637. + # endif
  638.       }
  639.   #else
  640.       EMSG(_("E775: Eval feature not available"));
  641. *** ../vim-7.3.818/src/gui_gtk_x11.c    2013-01-23 16:00:05.000000000 +0100
  642. --- src/gui_gtk_x11.c    2013-02-14 19:38:42.000000000 +0100
  643. ***************
  644. *** 5164,5171 ****
  645.       return FAIL;
  646.   }
  647.   
  648. ! #if defined(FEAT_TITLE) \
  649. !     || defined(PROTO)
  650.   /*
  651.    * Return the text window-id and display.  Only required for X-based GUI's
  652.    */
  653. --- 5164,5170 ----
  654.       return FAIL;
  655.   }
  656.   
  657. ! #if defined(FEAT_TITLE) || defined(FEAT_EVAL) || defined(PROTO)
  658.   /*
  659.    * Return the text window-id and display.  Only required for X-based GUI's
  660.    */
  661. *** ../vim-7.3.818/src/version.c    2013-02-14 20:58:30.000000000 +0100
  662. --- src/version.c    2013-02-14 22:09:41.000000000 +0100
  663. ***************
  664. *** 727,728 ****
  665. --- 727,730 ----
  666.   {   /* Add new patch number below this line */
  667. + /**/
  668. +     819,
  669.   /**/
  670.  
  671. -- 
  672. (letter from Mark to Mike, about the film's probable certificate)
  673.       For an 'A' we would have to: Lose as many shits as possible; Take Jesus
  674.       Christ out, if possible; Loose "I fart in your general direction"; Lose
  675.       "the oral sex"; Lose "oh, fuck off"; Lose "We make castanets out of your
  676.       testicles"
  677.                  "Monty Python and the Holy Grail" PYTHON (MONTY) PICTURES LTD
  678.  
  679.  /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
  680. ///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
  681. \\\  an exciting new programming language -- http://www.Zimbu.org        ///
  682.  \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///
  683.