vim: src/beval.c annotate

annotate src/beval.c @ 30140:3b42bdfff7cb v9.0.0406

patch 9.0.0406: deferred functions not invoked when partial func exits Commit: https://github.com/vim/vim/commit/9667b2c888351b04751bdb43cba0d4ffc8c13ab1 Author: Bram Moolenaar <Bram@vim.org> Date: Wed Sep 7 17:28:09 2022 +0100 patch 9.0.0406: deferred functions not invoked when partial func exits Problem: Deferred functions not invoked when partial func exits. Solution: Create a funccall_T when calling a :def function.

author	Bram Moolenaar <Bram@vim.org>
date	Wed, 07 Sep 2022 18:30:03 +0200
parents	057c26b5c33a
children	2650a01b8bbc

rev	line source
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	2 *
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	4 * Visual Workshop integration by Gordon Prieur
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	5 *
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	6 * Do ":help uganda" in Vim to read copying and usage conditions.
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	7 * Do ":help credits" in Vim to see a list of people who contributed.
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	8 * See README.txt for an overview of the Vim source code.
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	9 */
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	10
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	11 #include "vim.h"
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	12
18763 49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name Bram Moolenaar <Bram@vim.org> parents: 18757 diff changeset	13 #if defined(FEAT_BEVAL) \|\| defined(FEAT_PROP_POPUP) \|\| defined(PROTO)
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	14 /*
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	15 * Find text under the mouse position "row" / "col".
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	16 * If "getword" is TRUE the returned text in "*textp" is not the whole line but
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	17 * the relevant word in allocated memory.
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	18 * Return OK if found.
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	19 * Return FAIL if not found, no text at the mouse position.
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	20 */
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	21 int
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	22 find_word_under_cursor(
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	23 int mouserow,
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	24 int mousecol,
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	25 int getword,
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	26 int flags, // flags for find_ident_at_pos()
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	27 win_T **winp, // can be NULL
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	28 linenr_T *lnump, // can be NULL
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	29 char_u **textp,
17316 8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	30 int *colp, // column where mouse hovers, can be NULL
8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	31 int *startcolp) // column where text starts, can be NULL
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	32 {
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	33 int row = mouserow;
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	34 int col = mousecol;
17316 8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	35 int scol;
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	36 win_T *wp;
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	37 char_u *lbuf;
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	38 linenr_T lnum;
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	39
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	40 *textp = NULL;
17041 5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 16429 diff changeset	41 wp = mouse_find_win(&row, &col, FAIL_POPUP);
12981 d52a3969ce4f patch 8.0.1367 Christian Brabandt <cb@256bit.org> parents: 12883 diff changeset	42 if (wp != NULL && row >= 0 && row < wp->w_height && col < wp->w_width)
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	43 {
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	44 // Found a window and the cursor is in the text. Now find the line
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	45 // number.
17506 74b6674b99fd patch 8.1.1751: when redrawing popups plines_win() may be called often Bram Moolenaar <Bram@vim.org> parents: 17419 diff changeset	46 if (!mouse_comp_pos(wp, &row, &col, &lnum, NULL))
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	47 {
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	48 // Not past end of the file.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	49 lbuf = ml_get_buf(wp->w_buffer, lnum, FALSE);
29451 057c26b5c33a patch 9.0.0067: cannot show virtual text Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	50 if (col <= win_linetabsize(wp, lnum, lbuf, (colnr_T)MAXCOL))
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	51 {
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	52 // Not past end of line.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	53 if (getword)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	54 {
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	55 // For Netbeans we get the relevant part of the line
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	56 // instead of the whole line.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	57 int len;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	58 pos_T spos = NULL, epos = NULL;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	59
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	60 if (VIsual_active)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	61 {
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	62 if (LT_POS(VIsual, curwin->w_cursor))
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	63 {
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	64 spos = &VIsual;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	65 epos = &curwin->w_cursor;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	66 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	67 else
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	68 {
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	69 spos = &curwin->w_cursor;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	70 epos = &VIsual;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	71 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	72 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	73
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	74 col = vcol2col(wp, lnum, col);
17419 e685de8a1ac6 patch 8.1.1708: Coverity warns for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17415 diff changeset	75 scol = col;
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	76
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	77 if (VIsual_active
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	78 && wp->w_buffer == curwin->w_buffer
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	79 && (lnum == spos->lnum
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	80 ? col >= (int)spos->col
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	81 : lnum > spos->lnum)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	82 && (lnum == epos->lnum
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	83 ? col <= (int)epos->col
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	84 : lnum < epos->lnum))
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	85 {
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	86 // Visual mode and pointing to the line with the
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	87 // Visual selection: return selected text, with a
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	88 // maximum of one line.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	89 if (spos->lnum != epos->lnum \|\| spos->col == epos->col)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	90 return FAIL;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	91
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	92 lbuf = ml_get_buf(curwin->w_buffer, VIsual.lnum, FALSE);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	93 len = epos->col - spos->col;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	94 if (*p_sel != 'e')
18251 c8a53c0daeed patch 8.1.2120: some MB_ macros are more complicated than necessary Bram Moolenaar <Bram@vim.org> parents: 17506 diff changeset	95 len += mb_ptr2len(lbuf + epos->col);
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	96 lbuf = vim_strnsave(lbuf + spos->col, len);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	97 lnum = spos->lnum;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	98 col = spos->col;
17419 e685de8a1ac6 patch 8.1.1708: Coverity warns for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17415 diff changeset	99 scol = col;
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	100 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	101 else
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	102 {
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	103 // Find the word under the cursor.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	104 ++emsg_off;
17316 8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	105 len = find_ident_at_pos(wp, lnum, (colnr_T)col,
8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	106 &lbuf, &scol, flags);
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	107 --emsg_off;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	108 if (len == 0)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	109 return FAIL;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	110 lbuf = vim_strnsave(lbuf, len);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	111 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	112 }
19908 473ceb7f65e2 patch 8.2.0510: Coverity complains about using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	113 else
473ceb7f65e2 patch 8.2.0510: Coverity complains about using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 18763 diff changeset	114 scol = col;
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	115
17292 8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	116 if (winp != NULL)
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	117 *winp = wp;
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	118 if (lnump != NULL)
8a095d343c59 patch 8.1.1645: cannot use a popup window for a balloon Bram Moolenaar <Bram@vim.org> parents: 17041 diff changeset	119 *lnump = lnum;
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	120 *textp = lbuf;
17316 8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	121 if (colp != NULL)
8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	122 *colp = col;
8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	123 if (startcolp != NULL)
8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	124 *startcolp = scol;
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	125 return OK;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	126 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	127 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	128 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	129 return FAIL;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	130 }
17298 3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	131 #endif
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	132
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	133 #if defined(FEAT_BEVAL) \|\| defined(PROTO)
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	134
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	135 /*
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	136 * Get the text and position to be evaluated for "beval".
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	137 * If "getword" is TRUE the returned text is not the whole line but the
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	138 * relevant word in allocated memory.
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	139 * Returns OK or FAIL.
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	140 */
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	141 int
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	142 get_beval_info(
17302 e0d727872758 patch 8.1.1650: warning for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17298 diff changeset	143 BalloonEval *beval,
e0d727872758 patch 8.1.1650: warning for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17298 diff changeset	144 int getword,
e0d727872758 patch 8.1.1650: warning for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17298 diff changeset	145 win_T **winp,
e0d727872758 patch 8.1.1650: warning for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17298 diff changeset	146 linenr_T *lnump,
e0d727872758 patch 8.1.1650: warning for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17298 diff changeset	147 char_u **textp,
e0d727872758 patch 8.1.1650: warning for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17298 diff changeset	148 int *colp)
17298 3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	149 {
17302 e0d727872758 patch 8.1.1650: warning for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17298 diff changeset	150 int row = mouse_row;
e0d727872758 patch 8.1.1650: warning for using uninitialized variable Bram Moolenaar <Bram@vim.org> parents: 17298 diff changeset	151 int col = mouse_col;
17298 3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	152
26443 fee1e854e183 patch 8.2.3752: build error when using Photon GUI Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	153 # ifdef FEAT_BEVAL_GUI
17298 3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	154 if (gui.in_use)
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	155 {
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	156 row = Y_2_ROW(beval->y);
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	157 col = X_2_COL(beval->x);
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	158 }
26443 fee1e854e183 patch 8.2.3752: build error when using Photon GUI Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	159 # endif
17298 3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	160 if (find_word_under_cursor(row, col, getword,
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	161 FIND_IDENT + FIND_STRING + FIND_EVAL,
17316 8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	162 winp, lnump, textp, colp, NULL) == OK)
17298 3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	163 {
26443 fee1e854e183 patch 8.2.3752: build error when using Photon GUI Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	164 # ifdef FEAT_VARTABS
17298 3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	165 vim_free(beval->vts);
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	166 beval->vts = tabstop_copy((*winp)->w_buffer->b_p_vts_array);
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	167 if ((*winp)->w_buffer->b_p_vts_array != NULL && beval->vts == NULL)
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	168 {
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	169 if (getword)
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	170 vim_free(*textp);
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	171 return FAIL;
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	172 }
26443 fee1e854e183 patch 8.2.3752: build error when using Photon GUI Bram Moolenaar <Bram@vim.org> parents: 20996 diff changeset	173 # endif
17298 3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	174 beval->ts = (*winp)->w_buffer->b_p_ts;
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	175 return OK;
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	176 }
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	177
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	178 return FAIL;
3d90ae62deca patch 8.1.1648: MS-Windows: build error with normal feaures Bram Moolenaar <Bram@vim.org> parents: 17292 diff changeset	179 }
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	180
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	181 /*
12883 058e93aee621 patch 8.0.1318: terminal balloon only shows one line Christian Brabandt <cb@256bit.org> parents: 12871 diff changeset	182 * Show a balloon with "mesg" or "list".
17041 5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 16429 diff changeset	183 * Hide the balloon when both are NULL.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	184 */
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	185 void
13353 8412df1479a3 patch 8.0.1550: various small problems in source files Christian Brabandt <cb@256bit.org> parents: 12981 diff changeset	186 post_balloon(BalloonEval beval UNUSED, char_u mesg, list_T *list UNUSED)
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	187 {
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	188 # ifdef FEAT_BEVAL_TERM
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	189 # ifdef FEAT_GUI
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	190 if (!gui.in_use)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	191 # endif
12883 058e93aee621 patch 8.0.1318: terminal balloon only shows one line Christian Brabandt <cb@256bit.org> parents: 12871 diff changeset	192 ui_post_balloon(mesg, list);
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	193 # endif
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	194 # ifdef FEAT_BEVAL_GUI
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	195 if (gui.in_use)
17041 5ed4965ebc7b patch 8.1.1520: popup windows are ignored when dealing with mouse position Bram Moolenaar <Bram@vim.org> parents: 16429 diff changeset	196 // GUI can't handle a list
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	197 gui_mch_post_balloon(beval, mesg);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	198 # endif
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	199 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	200
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	201 /*
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	202 * Returns TRUE if the balloon eval has been enabled:
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	203 * 'ballooneval' for the GUI and 'balloonevalterm' for the terminal.
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	204 * Also checks if the screen isn't scrolled up.
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	205 */
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	206 int
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	207 can_use_beval(void)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	208 {
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	209 return (0
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	210 #ifdef FEAT_BEVAL_GUI
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	211 \|\| (gui.in_use && p_beval)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	212 #endif
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	213 #ifdef FEAT_BEVAL_TERM
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	214 \|\| (
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	215 # ifdef FEAT_GUI
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	216 !gui.in_use &&
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	217 # endif
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	218 p_bevalterm)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	219 #endif
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	220 ) && msg_scrolled == 0;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	221 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	222
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	223 /*
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	224 * Common code, invoked when the mouse is resting for a moment.
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	225 */
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	226 void
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	227 general_beval_cb(BalloonEval *beval, int state UNUSED)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	228 {
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	229 #ifdef FEAT_EVAL
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	230 win_T *wp;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	231 int col;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	232 int use_sandbox;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	233 linenr_T lnum;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	234 char_u *text;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	235 static char_u *result = NULL;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	236 long winnr = 0;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	237 char_u *bexpr;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	238 buf_T *save_curbuf;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	239 size_t len;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	240 win_T *cw;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	241 #endif
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	242 static int recursive = FALSE;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	243
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18251 diff changeset	244 // Don't do anything when 'ballooneval' is off, messages scrolled the
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18251 diff changeset	245 // windows up or we have no beval area.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	246 if (!can_use_beval() \|\| beval == NULL)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	247 return;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	248
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18251 diff changeset	249 // Don't do this recursively. Happens when the expression evaluation
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18251 diff changeset	250 // takes a long time and invokes something that checks for CTRL-C typed.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	251 if (recursive)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	252 return;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	253 recursive = TRUE;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	254
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	255 #ifdef FEAT_EVAL
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	256 if (get_beval_info(beval, TRUE, &wp, &lnum, &text, &col) == OK)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	257 {
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	258 bexpr = (*wp->w_buffer->b_p_bexpr == NUL) ? p_bexpr
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	259 : wp->w_buffer->b_p_bexpr;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	260 if (*bexpr != NUL)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	261 {
27303 9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	262 sctx_T save_sctx = current_sctx;
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	263
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18251 diff changeset	264 // Convert window pointer to number.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	265 for (cw = firstwin; cw != wp; cw = cw->w_next)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	266 ++winnr;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	267
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	268 set_vim_var_nr(VV_BEVAL_BUFNR, (long)wp->w_buffer->b_fnum);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	269 set_vim_var_nr(VV_BEVAL_WINNR, winnr);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	270 set_vim_var_nr(VV_BEVAL_WINID, wp->w_id);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	271 set_vim_var_nr(VV_BEVAL_LNUM, (long)lnum);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	272 set_vim_var_nr(VV_BEVAL_COL, (long)(col + 1));
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	273 set_vim_var_string(VV_BEVAL_TEXT, text, -1);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	274 vim_free(text);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	275
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	276 /*
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	277 * Temporarily change the curbuf, so that we can determine whether
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	278 * the buffer-local balloonexpr option was set insecurely.
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	279 */
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	280 save_curbuf = curbuf;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	281 curbuf = wp->w_buffer;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	282 use_sandbox = was_set_insecurely((char_u *)"balloonexpr",
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	283 *curbuf->b_p_bexpr == NUL ? 0 : OPT_LOCAL);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	284 curbuf = save_curbuf;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	285 if (use_sandbox)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	286 ++sandbox;
29014 45c182c4f7e9 patch 8.2.5029: "textlock" is always zero Bram Moolenaar <Bram@vim.org> parents: 27303 diff changeset	287 ++textlock;
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	288
27303 9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	289 if (bexpr == p_bexpr)
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	290 {
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	291 sctx_T *sp = get_option_sctx("balloonexpr");
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	292
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	293 if (sp != NULL)
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	294 current_sctx = *sp;
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	295 }
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	296 else
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	297 current_sctx = curbuf->b_p_script_ctx[BV_BEXPR];
9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	298
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	299 vim_free(result);
20996 3af71cbcfdbe patch 8.2.1049: Vim9: leaking memory when using continuation line Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	300 result = eval_to_string(bexpr, TRUE);
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	301
18757 c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18251 diff changeset	302 // Remove one trailing newline, it is added when the result was a
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18251 diff changeset	303 // list and it's hardly ever useful. If the user really wants a
c469e1930456 patch 8.1.2368: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18251 diff changeset	304 // trailing newline he can add two and one remains.
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	305 if (result != NULL)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	306 {
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	307 len = STRLEN(result);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	308 if (len > 0 && result[len - 1] == NL)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	309 result[len - 1] = NUL;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	310 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	311
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	312 if (use_sandbox)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	313 --sandbox;
29014 45c182c4f7e9 patch 8.2.5029: "textlock" is always zero Bram Moolenaar <Bram@vim.org> parents: 27303 diff changeset	314 --textlock;
27303 9e0ac05f579a patch 8.2.4180: 'balloonexpr' is evaluated in the current script context Bram Moolenaar <Bram@vim.org> parents: 26466 diff changeset	315 current_sctx = save_sctx;
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	316
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	317 set_vim_var_string(VV_BEVAL_TEXT, NULL, -1);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	318 if (result != NULL && result[0] != NUL)
12883 058e93aee621 patch 8.0.1318: terminal balloon only shows one line Christian Brabandt <cb@256bit.org> parents: 12871 diff changeset	319 post_balloon(beval, result, NULL);
17310 1b0b90f1d95e patch 8.1.1654: GUI: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17302 diff changeset	320
1b0b90f1d95e patch 8.1.1654: GUI: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17302 diff changeset	321 // The 'balloonexpr' evaluation may show something on the screen
1b0b90f1d95e patch 8.1.1654: GUI: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17302 diff changeset	322 // that requires a screen update.
17316 8813e1626e0a patch 8.1.1657: Terminal: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17310 diff changeset	323 if (must_redraw)
26466 d413104a94c8 patch 8.2.3763: when editing the cmdline a callback may cause a scroll up Bram Moolenaar <Bram@vim.org> parents: 26443 diff changeset	324 redraw_after_callback(FALSE, FALSE);
17310 1b0b90f1d95e patch 8.1.1654: GUI: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17302 diff changeset	325
1b0b90f1d95e patch 8.1.1654: GUI: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17302 diff changeset	326 recursive = FALSE;
1b0b90f1d95e patch 8.1.1654: GUI: screen updates from 'balloonexpr' are not displayed Bram Moolenaar <Bram@vim.org> parents: 17302 diff changeset	327 return;
12871 1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	328 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	329 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	330 #endif
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	331 #ifdef FEAT_NETBEANS_INTG
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	332 if (bevalServers & BEVAL_NETBEANS)
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	333 netbeans_beval_cb(beval, state);
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	334 #endif
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	335
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	336 recursive = FALSE;
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	337 }
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	338
1a450ce6980c patch 8.0.1312: balloon_show() only works in terminal when compiled with GUI Christian Brabandt <cb@256bit.org> parents: diff changeset	339 #endif

Mercurial > vim

annotate src/beval.c @ 30140:3b42bdfff7cb v9.0.0406