Mercurial > vim

annotate src/evalwindow.c @ 30743:8f443f987f47 v9.0.0706

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 9.0.0706: :help in a narrow window always opens at the top Commit: https://github.com/vim/vim/commit/28f7e701b7857cfc5ab5531ee7ac26e2542ad662 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Oct 9 15:54:53 2022 +0100 patch 9.0.0706: :help in a narrow window always opens at the top Problem: :help in a narrow window always opens at the top. Solution: Respect 'splitbelow'. (closes https://github.com/vim/vim/issues/11319)
author Bram Moolenaar <Bram@vim.org>
date Sun, 09 Oct 2022 17:00:07 +0200
parents 101f08b49ed3
children 62a42d860d87
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1 /* vi:set ts=8 sts=4 sw=4 noet:
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
2 *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
3 * VIM - Vi IMproved by Bram Moolenaar
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
4 *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
5 * Do ":help uganda" in Vim to read copying and usage conditions.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
6 * Do ":help credits" in Vim to see a list of people who contributed.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
7 * See README.txt for an overview of the Vim source code.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
8 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
9
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
10 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
11 * evalwindow.c: Window related builtin functions
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
12 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
13
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
14 #include "vim.h"
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
15
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
16 #if defined(FEAT_EVAL) || defined(PROTO)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
17
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
18 static int
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
19 win_getid(typval_T *argvars)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
20 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
21 int winnr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
22 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
23
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
24 if (argvars[0].v_type == VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
25 return curwin->w_id;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
26 winnr = tv_get_number(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
27 if (winnr > 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
28 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
29 if (argvars[1].v_type == VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
30 wp = firstwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
31 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
32 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
33 tabpage_T *tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
34 int tabnr = tv_get_number(&argvars[1]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
35
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
36 FOR_ALL_TABPAGES(tp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
37 if (--tabnr == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
38 break;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
39 if (tp == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
40 return -1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
41 if (tp == curtab)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
42 wp = firstwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
43 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
44 wp = tp->tp_firstwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
45 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
46 for ( ; wp != NULL; wp = wp->w_next)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
47 if (--winnr == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
48 return wp->w_id;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
49 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
50 return 0;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
51 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
52
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
53 static void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
54 win_id2tabwin(typval_T *argvars, list_T *list)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
55 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
56 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
57 tabpage_T *tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
58 int winnr = 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
59 int tabnr = 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
60 int id = tv_get_number(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
61
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
62 FOR_ALL_TABPAGES(tp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
63 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
64 FOR_ALL_WINDOWS_IN_TAB(tp, wp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
65 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
66 if (wp->w_id == id)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
67 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
68 list_append_number(list, tabnr);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
69 list_append_number(list, winnr);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
70 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
71 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
72 ++winnr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
73 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
74 ++tabnr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
75 winnr = 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
76 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
77 list_append_number(list, 0);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
78 list_append_number(list, 0);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
79 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
80
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
81 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
82 * Return the window pointer of window "id".
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
83 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
84 win_T *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
85 win_id2wp(int id)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
86 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
87 return win_id2wp_tp(id, NULL);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
88 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
89
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
90 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
91 * Return the window and tab pointer of window "id".
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
92 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
93 win_T *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
94 win_id2wp_tp(int id, tabpage_T **tpp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
95 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
96 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
97 tabpage_T *tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
98
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
99 FOR_ALL_TAB_WINDOWS(tp, wp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
100 if (wp->w_id == id)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
101 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
102 if (tpp != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
103 *tpp = tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
104 return wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
105 }
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18259
diff changeset
106 #ifdef FEAT_PROP_POPUP
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
107 // popup windows are in separate lists
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
108 FOR_ALL_TABPAGES(tp)
19888
435726a03481 patch 8.2.0500: using the same loop in many places
Bram Moolenaar <Bram@vim.org>
parents: 19732
diff changeset
109 FOR_ALL_POPUPWINS_IN_TAB(tp, wp)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
110 if (wp->w_id == id)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
111 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
112 if (tpp != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
113 *tpp = tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
114 return wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
115 }
19888
435726a03481 patch 8.2.0500: using the same loop in many places
Bram Moolenaar <Bram@vim.org>
parents: 19732
diff changeset
116 FOR_ALL_POPUPWINS(wp)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
117 if (wp->w_id == id)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
118 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
119 if (tpp != NULL)
22063
0716b3299872 patch 8.2.1581: using line() for global popup window doesn't work
Bram Moolenaar <Bram@vim.org>
parents: 21703
diff changeset
120 *tpp = curtab; // any tabpage would do
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
121 return wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
122 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
123 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
124
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
125 return NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
126 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
127
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
128 static int
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
129 win_id2win(typval_T *argvars)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
130 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
131 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
132 int nr = 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
133 int id = tv_get_number(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
134
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
135 FOR_ALL_WINDOWS(wp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
136 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
137 if (wp->w_id == id)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
138 return nr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
139 ++nr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
140 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
141 return 0;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
142 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
143
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
144 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
145 win_findbuf(typval_T *argvars, list_T *list)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
146 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
147 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
148 tabpage_T *tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
149 int bufnr = tv_get_number(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
150
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
151 FOR_ALL_TAB_WINDOWS(tp, wp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
152 if (wp->w_buffer->b_fnum == bufnr)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
153 list_append_number(list, wp->w_id);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
154 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
155
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
156 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
157 * Find window specified by "vp" in tabpage "tp".
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
158 * Returns current window if "vp" is number zero.
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
159 * Returns NULL if not found.
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
160 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
161 win_T *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
162 find_win_by_nr(
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
163 typval_T *vp,
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
164 tabpage_T *tp) // NULL for current tab page
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
165 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
166 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
167 int nr = (int)tv_get_number_chk(vp, NULL);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
168
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
169 if (nr < 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
170 return NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
171 if (nr == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
172 return curwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
173
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
174 FOR_ALL_WINDOWS_IN_TAB(tp, wp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
175 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
176 if (nr >= LOWEST_WIN_ID)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
177 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
178 if (wp->w_id == nr)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
179 return wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
180 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
181 else if (--nr <= 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
182 break;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
183 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
184 if (nr >= LOWEST_WIN_ID)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
185 {
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18259
diff changeset
186 #ifdef FEAT_PROP_POPUP
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
187 // check tab-local popup windows
19114
3856047f2211 patch 8.2.0117: crash when using gettabwinvar() with invalid arguments
Bram Moolenaar <Bram@vim.org>
parents: 19065
diff changeset
188 for (wp = (tp == NULL ? curtab : tp)->tp_first_popupwin;
3856047f2211 patch 8.2.0117: crash when using gettabwinvar() with invalid arguments
Bram Moolenaar <Bram@vim.org>
parents: 19065
diff changeset
189 wp != NULL; wp = wp->w_next)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
190 if (wp->w_id == nr)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
191 return wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
192 // check global popup windows
19888
435726a03481 patch 8.2.0500: using the same loop in many places
Bram Moolenaar <Bram@vim.org>
parents: 19732
diff changeset
193 FOR_ALL_POPUPWINS(wp)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
194 if (wp->w_id == nr)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
195 return wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
196 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
197 return NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
198 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
199 return wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
200 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
201
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
202 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
203 * Find a window: When using a Window ID in any tab page, when using a number
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
204 * in the current tab page.
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18259
diff changeset
205 * Returns NULL when not found.
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
206 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
207 win_T *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
208 find_win_by_nr_or_id(typval_T *vp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
209 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
210 int nr = (int)tv_get_number_chk(vp, NULL);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
211
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
212 if (nr >= LOWEST_WIN_ID)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
213 return win_id2wp(tv_get_number(vp));
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
214 return find_win_by_nr(vp, NULL);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
215 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
216
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
217 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
218 * Find window specified by "wvp" in tabpage "tvp".
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
219 * Returns the tab page in 'ptp'
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
220 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
221 win_T *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
222 find_tabwin(
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
223 typval_T *wvp, // VAR_UNKNOWN for current window
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
224 typval_T *tvp, // VAR_UNKNOWN for current tab page
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
225 tabpage_T **ptp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
226 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
227 win_T *wp = NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
228 tabpage_T *tp = NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
229 long n;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
230
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
231 if (wvp->v_type != VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
232 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
233 if (tvp->v_type != VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
234 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
235 n = (long)tv_get_number(tvp);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
236 if (n >= 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
237 tp = find_tabpage(n);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
238 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
239 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
240 tp = curtab;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
241
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
242 if (tp != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
243 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
244 wp = find_win_by_nr(wvp, tp);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
245 if (wp == NULL && wvp->v_type == VAR_NUMBER
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
246 && wvp->vval.v_number != -1)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
247 // A window with the specified number is not found
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
248 tp = NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
249 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
250 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
251 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
252 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
253 wp = curwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
254 tp = curtab;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
255 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
256
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
257 if (ptp != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
258 *ptp = tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
259
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
260 return wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
261 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
262
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
263 /*
30001
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
264 * Get the layout of the given tab page for winlayout() and add it to "l".
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
265 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
266 static void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
267 get_framelayout(frame_T *fr, list_T *l, int outer)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
268 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
269 frame_T *child;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
270 list_T *fr_list;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
271 list_T *win_list;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
272
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
273 if (fr == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
274 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
275
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
276 if (outer)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
277 // outermost call from f_winlayout()
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
278 fr_list = l;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
279 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
280 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
281 fr_list = list_alloc();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
282 if (fr_list == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
283 return;
30001
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
284 if (list_append_list(l, fr_list) == FAIL)
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
285 {
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
286 vim_free(fr_list);
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
287 return;
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
288 }
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
289 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
290
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
291 if (fr->fr_layout == FR_LEAF)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
292 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
293 if (fr->fr_win != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
294 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
295 list_append_string(fr_list, (char_u *)"leaf", -1);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
296 list_append_number(fr_list, fr->fr_win->w_id);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
297 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
298 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
299 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
300 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
301 list_append_string(fr_list,
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
302 fr->fr_layout == FR_ROW ? (char_u *)"row" : (char_u *)"col", -1);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
303
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
304 win_list = list_alloc();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
305 if (win_list == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
306 return;
30001
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
307 if (list_append_list(fr_list, win_list) == FAIL)
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
308 {
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
309 vim_free(win_list);
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
310 return;
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
311 }
6c1a9d7a931f patch 9.0.0338: return value of list_append_list() not always checked
Bram Moolenaar <Bram@vim.org>
parents: 29994
diff changeset
312
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
313 child = fr->fr_child;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
314 while (child != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
315 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
316 get_framelayout(child, win_list, FALSE);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
317 child = child->fr_next;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
318 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
319 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
320 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
321
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
322 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
323 * Common code for tabpagewinnr() and winnr().
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
324 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
325 static int
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
326 get_winnr(tabpage_T *tp, typval_T *argvar)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
327 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
328 win_T *twin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
329 int nr = 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
330 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
331 char_u *arg;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
332
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
333 twin = (tp == curtab) ? curwin : tp->tp_curwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
334 if (argvar->v_type != VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
335 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
336 int invalid_arg = FALSE;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
337
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
338 arg = tv_get_string_chk(argvar);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
339 if (arg == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
340 nr = 0; // type error; errmsg already given
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
341 else if (STRCMP(arg, "$") == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
342 twin = (tp == curtab) ? lastwin : tp->tp_lastwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
343 else if (STRCMP(arg, "#") == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
344 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
345 twin = (tp == curtab) ? prevwin : tp->tp_prevwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
346 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
347 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
348 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
349 long count;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
350 char_u *endp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
351
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
352 // Extract the window count (if specified). e.g. winnr('3j')
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
353 count = strtol((char *)arg, (char **)&endp, 10);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
354 if (count <= 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
355 count = 1; // if count is not specified, default to 1
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
356 if (endp != NULL && *endp != '\0')
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
357 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
358 if (STRCMP(endp, "j") == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
359 twin = win_vert_neighbor(tp, twin, FALSE, count);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
360 else if (STRCMP(endp, "k") == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
361 twin = win_vert_neighbor(tp, twin, TRUE, count);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
362 else if (STRCMP(endp, "h") == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
363 twin = win_horz_neighbor(tp, twin, TRUE, count);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
364 else if (STRCMP(endp, "l") == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
365 twin = win_horz_neighbor(tp, twin, FALSE, count);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
366 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
367 invalid_arg = TRUE;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
368 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
369 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
370 invalid_arg = TRUE;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
371 }
19291
1d6bc6b31c2e patch 8.2.0204: crash when using winnr('j') in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19114
diff changeset
372 if (twin == NULL)
1d6bc6b31c2e patch 8.2.0204: crash when using winnr('j') in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19114
diff changeset
373 nr = 0;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
374
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
375 if (invalid_arg)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
376 {
25064
8f2262c72178 patch 8.2.3069: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 24180
diff changeset
377 semsg(_(e_invalid_expression_str), arg);
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
378 nr = 0;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
379 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
380 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
381
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
382 if (nr > 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
383 for (wp = (tp == curtab) ? firstwin : tp->tp_firstwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
384 wp != twin; wp = wp->w_next)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
385 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
386 if (wp == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
387 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
388 // didn't find it in this tabpage
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
389 nr = 0;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
390 break;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
391 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
392 ++nr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
393 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
394 return nr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
395 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
396
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
397 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
398 * Returns information about a window as a dictionary.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
399 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
400 static dict_T *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
401 get_win_info(win_T *wp, short tpnr, short winnr)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
402 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
403 dict_T *dict;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
404
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
405 dict = dict_alloc();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
406 if (dict == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
407 return NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
408
28546
65ff2409cba4 patch 8.2.4797: getwininfo() may get oudated values
Bram Moolenaar <Bram@vim.org>
parents: 28522
diff changeset
409 // make sure w_botline is valid
65ff2409cba4 patch 8.2.4797: getwininfo() may get oudated values
Bram Moolenaar <Bram@vim.org>
parents: 28522
diff changeset
410 validate_botline_win(wp);
65ff2409cba4 patch 8.2.4797: getwininfo() may get oudated values
Bram Moolenaar <Bram@vim.org>
parents: 28522
diff changeset
411
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
412 dict_add_number(dict, "tabnr", tpnr);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
413 dict_add_number(dict, "winnr", winnr);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
414 dict_add_number(dict, "winid", wp->w_id);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
415 dict_add_number(dict, "height", wp->w_height);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
416 dict_add_number(dict, "winrow", wp->w_winrow + 1);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
417 dict_add_number(dict, "topline", wp->w_topline);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
418 dict_add_number(dict, "botline", wp->w_botline - 1);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
419 #ifdef FEAT_MENU
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
420 dict_add_number(dict, "winbar", wp->w_winbar_height);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
421 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
422 dict_add_number(dict, "width", wp->w_width);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
423 dict_add_number(dict, "wincol", wp->w_wincol + 1);
26191
72c394673e00 patch 8.2.3627: difficult to know where the text starts in a window
Bram Moolenaar <Bram@vim.org>
parents: 26121
diff changeset
424 dict_add_number(dict, "textoff", win_col_off(wp));
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
425 dict_add_number(dict, "bufnr", wp->w_buffer->b_fnum);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
426
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
427 #ifdef FEAT_TERMINAL
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
428 dict_add_number(dict, "terminal", bt_terminal(wp->w_buffer));
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
429 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
430 #ifdef FEAT_QUICKFIX
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
431 dict_add_number(dict, "quickfix", bt_quickfix(wp->w_buffer));
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
432 dict_add_number(dict, "loclist",
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
433 (bt_quickfix(wp->w_buffer) && wp->w_llist_ref != NULL));
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
434 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
435
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
436 // Add a reference to window variables
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
437 dict_add_dict(dict, "variables", wp->w_vars);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
438
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
439 return dict;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
440 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
441
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
442 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
443 * Returns information (variables, options, etc.) about a tab page
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
444 * as a dictionary.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
445 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
446 static dict_T *
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
447 get_tabpage_info(tabpage_T *tp, int tp_idx)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
448 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
449 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
450 dict_T *dict;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
451 list_T *l;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
452
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
453 dict = dict_alloc();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
454 if (dict == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
455 return NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
456
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
457 dict_add_number(dict, "tabnr", tp_idx);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
458
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
459 l = list_alloc();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
460 if (l != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
461 {
19934
3ff714d765ba patch 8.2.0523: loops are repeated
Bram Moolenaar <Bram@vim.org>
parents: 19888
diff changeset
462 FOR_ALL_WINDOWS_IN_TAB(tp, wp)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
463 list_append_number(l, (varnumber_T)wp->w_id);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
464 dict_add_list(dict, "windows", l);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
465 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
466
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
467 // Make a reference to tabpage variables
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
468 dict_add_dict(dict, "variables", tp->tp_vars);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
469
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
470 return dict;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
471 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
472
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
473 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
474 * "gettabinfo()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
475 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
476 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
477 f_gettabinfo(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
478 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
479 tabpage_T *tp, *tparg = NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
480 dict_T *d;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
481 int tpnr = 0;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
482
29175
755ab148288b patch 8.2.5107: some callers of rettv_list_alloc() check for not OK
Bram Moolenaar <Bram@vim.org>
parents: 28809
diff changeset
483 if (rettv_list_alloc(rettv) == FAIL)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
484 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
485
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
486 if (in_vim9script() && check_for_opt_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
487 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
488
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
489 if (argvars[0].v_type != VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
490 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
491 // Information about one tab page
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
492 tparg = find_tabpage((int)tv_get_number_chk(&argvars[0], NULL));
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
493 if (tparg == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
494 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
495 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
496
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
497 // Get information about a specific tab page or all tab pages
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
498 FOR_ALL_TABPAGES(tp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
499 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
500 tpnr++;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
501 if (tparg != NULL && tp != tparg)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
502 continue;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
503 d = get_tabpage_info(tp, tpnr);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
504 if (d != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
505 list_append_dict(rettv->vval.v_list, d);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
506 if (tparg != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
507 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
508 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
509 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
510
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
511 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
512 * "getwininfo()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
513 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
514 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
515 f_getwininfo(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
516 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
517 tabpage_T *tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
518 win_T *wp = NULL, *wparg = NULL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
519 dict_T *d;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
520 short tabnr = 0, winnr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
521
29175
755ab148288b patch 8.2.5107: some callers of rettv_list_alloc() check for not OK
Bram Moolenaar <Bram@vim.org>
parents: 28809
diff changeset
522 if (rettv_list_alloc(rettv) == FAIL)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
523 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
524
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
525 if (in_vim9script() && check_for_opt_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
526 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
527
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
528 if (argvars[0].v_type != VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
529 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
530 wparg = win_id2wp(tv_get_number(&argvars[0]));
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
531 if (wparg == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
532 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
533 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
534
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
535 // Collect information about either all the windows across all the tab
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
536 // pages or one particular window.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
537 FOR_ALL_TABPAGES(tp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
538 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
539 tabnr++;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
540 winnr = 0;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
541 FOR_ALL_WINDOWS_IN_TAB(tp, wp)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
542 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
543 winnr++;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
544 if (wparg != NULL && wp != wparg)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
545 continue;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
546 d = get_win_info(wp, tabnr, winnr);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
547 if (d != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
548 list_append_dict(rettv->vval.v_list, d);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
549 if (wparg != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
550 // found information about a specific window
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
551 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
552 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
553 }
22357
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
554 #ifdef FEAT_PROP_POPUP
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
555 if (wparg != NULL)
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
556 {
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
557 tabnr = 0;
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
558 FOR_ALL_TABPAGES(tp)
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
559 {
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
560 tabnr++;
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
561 FOR_ALL_POPUPWINS_IN_TAB(tp, wp)
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
562 if (wp == wparg)
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
563 break;
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
564 }
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
565 d = get_win_info(wparg, tp == NULL ? 0 : tabnr, 0);
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
566 if (d != NULL)
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
567 list_append_dict(rettv->vval.v_list, d);
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
568 }
0e231e8e70f8 patch 8.2.1727: a popup created with "cursorline" will ignore "firstline"
Bram Moolenaar <Bram@vim.org>
parents: 22135
diff changeset
569 #endif
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
570 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
571
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
572 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
573 * "getwinpos({timeout})" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
574 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
575 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
576 f_getwinpos(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
577 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
578 int x = -1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
579 int y = -1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
580
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
581 if (rettv_list_alloc(rettv) == FAIL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
582 return;
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
583
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
584 if (in_vim9script() && check_for_opt_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
585 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
586
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
587 #if defined(FEAT_GUI) \
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
588 || (defined(HAVE_TGETENT) && defined(FEAT_TERMRESPONSE)) \
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
589 || defined(MSWIN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
590 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
591 varnumber_T timeout = 100;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
592
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
593 if (argvars[0].v_type != VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
594 timeout = tv_get_number(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
595
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
596 (void)ui_get_winpos(&x, &y, timeout);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
597 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
598 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
599 list_append_number(rettv->vval.v_list, (varnumber_T)x);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
600 list_append_number(rettv->vval.v_list, (varnumber_T)y);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
601 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
602
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
603
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
604 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
605 * "getwinposx()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
606 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
607 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
608 f_getwinposx(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
609 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
610 rettv->vval.v_number = -1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
611 #if defined(FEAT_GUI) \
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
612 || (defined(HAVE_TGETENT) && defined(FEAT_TERMRESPONSE)) \
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
613 || defined(MSWIN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
614
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
615 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
616 int x, y;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
617
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
618 if (ui_get_winpos(&x, &y, 100) == OK)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
619 rettv->vval.v_number = x;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
620 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
621 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
622 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
623
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
624 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
625 * "getwinposy()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
626 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
627 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
628 f_getwinposy(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
629 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
630 rettv->vval.v_number = -1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
631 #if defined(FEAT_GUI) \
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
632 || (defined(HAVE_TGETENT) && defined(FEAT_TERMRESPONSE)) \
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
633 || defined(MSWIN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
634 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
635 int x, y;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
636
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
637 if (ui_get_winpos(&x, &y, 100) == OK)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
638 rettv->vval.v_number = y;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
639 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
640 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
641 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
642
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
643 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
644 * "tabpagenr()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
645 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
646 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
647 f_tabpagenr(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
648 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
649 int nr = 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
650 char_u *arg;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
651
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
652 if (in_vim9script() && check_for_opt_string_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
653 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
654
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
655 if (argvars[0].v_type != VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
656 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
657 arg = tv_get_string_chk(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
658 nr = 0;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
659 if (arg != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
660 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
661 if (STRCMP(arg, "$") == 0)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
662 nr = tabpage_index(NULL) - 1;
21703
22583b9d4efd patch 8.2.1401: cannot jump to the last used tabpage
Bram Moolenaar <Bram@vim.org>
parents: 20889
diff changeset
663 else if (STRCMP(arg, "#") == 0)
22583b9d4efd patch 8.2.1401: cannot jump to the last used tabpage
Bram Moolenaar <Bram@vim.org>
parents: 20889
diff changeset
664 nr = valid_tabpage(lastused_tabpage) ?
22583b9d4efd patch 8.2.1401: cannot jump to the last used tabpage
Bram Moolenaar <Bram@vim.org>
parents: 20889
diff changeset
665 tabpage_index(lastused_tabpage) : 0;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
666 else
25064
8f2262c72178 patch 8.2.3069: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 24180
diff changeset
667 semsg(_(e_invalid_expression_str), arg);
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
668 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
669 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
670 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
671 nr = tabpage_index(curtab);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
672 rettv->vval.v_number = nr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
673 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
674
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
675 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
676 * "tabpagewinnr()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
677 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
678 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
679 f_tabpagewinnr(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
680 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
681 int nr = 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
682 tabpage_T *tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
683
25252
acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25064
diff changeset
684 if (in_vim9script()
acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25064
diff changeset
685 && (check_for_number_arg(argvars, 0) == FAIL
25302
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
686 || check_for_opt_string_arg(argvars, 1) == FAIL))
25252
acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25064
diff changeset
687 return;
acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25064
diff changeset
688
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
689 tp = find_tabpage((int)tv_get_number(&argvars[0]));
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
690 if (tp == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
691 nr = 0;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
692 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
693 nr = get_winnr(tp, &argvars[1]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
694 rettv->vval.v_number = nr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
695 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
696
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
697 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
698 * "win_execute()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
699 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
700 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
701 f_win_execute(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
702 {
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
703 int id;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
704 tabpage_T *tp;
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
705 win_T *wp;
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
706 switchwin_T switchwin;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
707
23596
9fa72351c18f patch 8.2.2340: win_execute() unexpectedly returns number zero when failing
Bram Moolenaar <Bram@vim.org>
parents: 23404
diff changeset
708 // Return an empty string if something fails.
9fa72351c18f patch 8.2.2340: win_execute() unexpectedly returns number zero when failing
Bram Moolenaar <Bram@vim.org>
parents: 23404
diff changeset
709 rettv->v_type = VAR_STRING;
9fa72351c18f patch 8.2.2340: win_execute() unexpectedly returns number zero when failing
Bram Moolenaar <Bram@vim.org>
parents: 23404
diff changeset
710 rettv->vval.v_string = NULL;
9fa72351c18f patch 8.2.2340: win_execute() unexpectedly returns number zero when failing
Bram Moolenaar <Bram@vim.org>
parents: 23404
diff changeset
711
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
712 if (in_vim9script()
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
713 && (check_for_number_arg(argvars, 0) == FAIL
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
714 || check_for_string_or_list_arg(argvars, 1) == FAIL
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
715 || check_for_opt_string_arg(argvars, 2) == FAIL))
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
716 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
717
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
718 id = (int)tv_get_number(argvars);
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
719 wp = win_id2wp_tp(id, &tp);
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
720 if (wp != NULL && tp != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
721 {
18259
f254dd2bc107 patch 8.1.2124: ruler is not updated if win_execute() moves cursor
Bram Moolenaar <Bram@vim.org>
parents: 18084
diff changeset
722 pos_T curpos = wp->w_cursor;
26784
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
723 char_u cwd[MAXPATHL];
27063
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
724 int cwd_status = FAIL;
26796
63be149f733c patch 8.2.3926: build failure without the 'autochdir' option
Bram Moolenaar <Bram@vim.org>
parents: 26784
diff changeset
725 #ifdef FEAT_AUTOCHDIR
26784
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
726 char_u autocwd[MAXPATHL];
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
727 int apply_acd = FALSE;
26796
63be149f733c patch 8.2.3926: build failure without the 'autochdir' option
Bram Moolenaar <Bram@vim.org>
parents: 26784
diff changeset
728 #endif
26784
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
729
27063
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
730 // Getting and setting directory can be slow on some systems, only do
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
731 // this when the current or target window/tab have a local directory or
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
732 // 'acd' is set.
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
733 if (curwin != wp
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
734 && (curwin->w_localdir != NULL
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
735 || wp->w_localdir != NULL
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
736 || (curtab != tp
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
737 && (curtab->tp_localdir != NULL
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
738 || tp->tp_localdir != NULL))
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
739 #ifdef FEAT_AUTOCHDIR
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
740 || p_acd
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
741 #endif
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
742 ))
3bad1cf600ed patch 8.2.4060: win_execute() slow on systems where getcwd()/chdir() is slow
Bram Moolenaar <Bram@vim.org>
parents: 27047
diff changeset
743 cwd_status = mch_dirname(cwd, MAXPATHL);
26784
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
744
26796
63be149f733c patch 8.2.3926: build failure without the 'autochdir' option
Bram Moolenaar <Bram@vim.org>
parents: 26784
diff changeset
745 #ifdef FEAT_AUTOCHDIR
26784
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
746 // If 'acd' is set, check we are using that directory. If yes, then
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
747 // apply 'acd' afterwards, otherwise restore the current directory.
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
748 if (cwd_status == OK && p_acd)
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
749 {
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
750 do_autochdir();
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
751 apply_acd = mch_dirname(autocwd, MAXPATHL) == OK
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
752 && STRCMP(cwd, autocwd) == 0;
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
753 }
26796
63be149f733c patch 8.2.3926: build failure without the 'autochdir' option
Bram Moolenaar <Bram@vim.org>
parents: 26784
diff changeset
754 #endif
18259
f254dd2bc107 patch 8.1.2124: ruler is not updated if win_execute() moves cursor
Bram Moolenaar <Bram@vim.org>
parents: 18084
diff changeset
755
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
756 if (switch_win_noblock(&switchwin, wp, tp, TRUE) == OK)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
757 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
758 check_cursor();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
759 execute_common(argvars, rettv, 1);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
760 }
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
761 restore_win_noblock(&switchwin, TRUE);
26796
63be149f733c patch 8.2.3926: build failure without the 'autochdir' option
Bram Moolenaar <Bram@vim.org>
parents: 26784
diff changeset
762 #ifdef FEAT_AUTOCHDIR
26784
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
763 if (apply_acd)
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
764 do_autochdir();
26796
63be149f733c patch 8.2.3926: build failure without the 'autochdir' option
Bram Moolenaar <Bram@vim.org>
parents: 26784
diff changeset
765 else
63be149f733c patch 8.2.3926: build failure without the 'autochdir' option
Bram Moolenaar <Bram@vim.org>
parents: 26784
diff changeset
766 #endif
63be149f733c patch 8.2.3926: build failure without the 'autochdir' option
Bram Moolenaar <Bram@vim.org>
parents: 26784
diff changeset
767 if (cwd_status == OK)
26784
c95a3f25b6b1 patch 8.2.3920: restoring directory after using another window is inefficient
Bram Moolenaar <Bram@vim.org>
parents: 26666
diff changeset
768 mch_chdir((char *)cwd);
18259
f254dd2bc107 patch 8.1.2124: ruler is not updated if win_execute() moves cursor
Bram Moolenaar <Bram@vim.org>
parents: 18084
diff changeset
769
f254dd2bc107 patch 8.1.2124: ruler is not updated if win_execute() moves cursor
Bram Moolenaar <Bram@vim.org>
parents: 18084
diff changeset
770 // Update the status line if the cursor moved.
f254dd2bc107 patch 8.1.2124: ruler is not updated if win_execute() moves cursor
Bram Moolenaar <Bram@vim.org>
parents: 18084
diff changeset
771 if (win_valid(wp) && !EQUAL_POS(curpos, wp->w_cursor))
f254dd2bc107 patch 8.1.2124: ruler is not updated if win_execute() moves cursor
Bram Moolenaar <Bram@vim.org>
parents: 18084
diff changeset
772 wp->w_redr_status = TRUE;
26994
8d9506f3542e patch 8.2.4026: ml_get error with specific win_execute() command
Bram Moolenaar <Bram@vim.org>
parents: 26978
diff changeset
773
8d9506f3542e patch 8.2.4026: ml_get error with specific win_execute() command
Bram Moolenaar <Bram@vim.org>
parents: 26978
diff changeset
774 // In case the command moved the cursor or changed the Visual area,
8d9506f3542e patch 8.2.4026: ml_get error with specific win_execute() command
Bram Moolenaar <Bram@vim.org>
parents: 26978
diff changeset
775 // check it is valid.
8d9506f3542e patch 8.2.4026: ml_get error with specific win_execute() command
Bram Moolenaar <Bram@vim.org>
parents: 26978
diff changeset
776 check_cursor();
8d9506f3542e patch 8.2.4026: ml_get error with specific win_execute() command
Bram Moolenaar <Bram@vim.org>
parents: 26978
diff changeset
777 if (VIsual_active)
8d9506f3542e patch 8.2.4026: ml_get error with specific win_execute() command
Bram Moolenaar <Bram@vim.org>
parents: 26978
diff changeset
778 check_pos(curbuf, &VIsual);
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
779 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
780 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
781
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
782 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
783 * "win_findbuf()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
784 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
785 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
786 f_win_findbuf(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
787 {
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
788 if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
789 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
790
29175
755ab148288b patch 8.2.5107: some callers of rettv_list_alloc() check for not OK
Bram Moolenaar <Bram@vim.org>
parents: 28809
diff changeset
791 if (rettv_list_alloc(rettv) == OK)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
792 win_findbuf(argvars, rettv->vval.v_list);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
793 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
794
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
795 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
796 * "win_getid()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
797 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
798 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
799 f_win_getid(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
800 {
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
801 if (in_vim9script()
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
802 && (check_for_opt_number_arg(argvars, 0) == FAIL
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
803 || (argvars[0].v_type != VAR_UNKNOWN
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
804 && check_for_opt_number_arg(argvars, 1) == FAIL)))
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
805 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
806
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
807 rettv->vval.v_number = win_getid(argvars);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
808 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
809
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
810 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
811 * "win_gotoid()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
812 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
813 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
814 f_win_gotoid(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
815 {
18084
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
816 win_T *wp;
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
817 tabpage_T *tp;
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
818 int id;
18084
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
819
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
820 if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
821 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
822
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
823 id = tv_get_number(&argvars[0]);
18084
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
824 if (cmdwin_type != 0)
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
825 {
25064
8f2262c72178 patch 8.2.3069: error messages are spread out
Bram Moolenaar <Bram@vim.org>
parents: 24180
diff changeset
826 emsg(_(e_invalid_in_cmdline_window));
18084
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
827 return;
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
828 }
28580
39df510f97c3 patch 8.2.4814: possible to leave a popup window with win_gotoid()
Bram Moolenaar <Bram@vim.org>
parents: 28546
diff changeset
829 #if defined(FEAT_PROP_POPUP) && defined(FEAT_TERMINAL)
39df510f97c3 patch 8.2.4814: possible to leave a popup window with win_gotoid()
Bram Moolenaar <Bram@vim.org>
parents: 28546
diff changeset
830 if (popup_is_popup(curwin) && curbuf->b_term != NULL)
39df510f97c3 patch 8.2.4814: possible to leave a popup window with win_gotoid()
Bram Moolenaar <Bram@vim.org>
parents: 28546
diff changeset
831 {
39df510f97c3 patch 8.2.4814: possible to leave a popup window with win_gotoid()
Bram Moolenaar <Bram@vim.org>
parents: 28546
diff changeset
832 emsg(_(e_not_allowed_for_terminal_in_popup_window));
39df510f97c3 patch 8.2.4814: possible to leave a popup window with win_gotoid()
Bram Moolenaar <Bram@vim.org>
parents: 28546
diff changeset
833 return;
39df510f97c3 patch 8.2.4814: possible to leave a popup window with win_gotoid()
Bram Moolenaar <Bram@vim.org>
parents: 28546
diff changeset
834 }
39df510f97c3 patch 8.2.4814: possible to leave a popup window with win_gotoid()
Bram Moolenaar <Bram@vim.org>
parents: 28546
diff changeset
835 #endif
18084
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
836 FOR_ALL_TAB_WINDOWS(tp, wp)
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
837 if (wp->w_id == id)
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
838 {
28522
da28696e5340 patch 8.2.4785: Visual mode not stopped if win_gotoid() goes to other buffer
Bram Moolenaar <Bram@vim.org>
parents: 28315
diff changeset
839 // When jumping to another buffer stop Visual mode.
da28696e5340 patch 8.2.4785: Visual mode not stopped if win_gotoid() goes to other buffer
Bram Moolenaar <Bram@vim.org>
parents: 28315
diff changeset
840 if (VIsual_active && wp->w_buffer != curbuf)
da28696e5340 patch 8.2.4785: Visual mode not stopped if win_gotoid() goes to other buffer
Bram Moolenaar <Bram@vim.org>
parents: 28315
diff changeset
841 end_visual_mode();
18084
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
842 goto_tabpage_win(tp, wp);
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
843 rettv->vval.v_number = 1;
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
844 return;
f4b51934d4f8 patch 8.1.2037: can call win_gotoid() in cmdline window
Bram Moolenaar <Bram@vim.org>
parents: 18049
diff changeset
845 }
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
846 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
847
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
848 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
849 * "win_id2tabwin()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
850 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
851 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
852 f_win_id2tabwin(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
853 {
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
854 if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
855 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
856
29175
755ab148288b patch 8.2.5107: some callers of rettv_list_alloc() check for not OK
Bram Moolenaar <Bram@vim.org>
parents: 28809
diff changeset
857 if (rettv_list_alloc(rettv) == OK)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
858 win_id2tabwin(argvars, rettv->vval.v_list);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
859 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
860
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
861 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
862 * "win_id2win()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
863 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
864 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
865 f_win_id2win(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
866 {
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
867 if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
868 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
869
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
870 rettv->vval.v_number = win_id2win(argvars);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
871 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
872
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
873 /*
27047
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
874 * "win_move_separator()" function
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
875 */
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
876 void
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
877 f_win_move_separator(typval_T *argvars, typval_T *rettv)
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
878 {
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
879 win_T *wp;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
880 int offset;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
881
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
882 rettv->vval.v_number = FALSE;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
883
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
884 if (in_vim9script()
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
885 && (check_for_number_arg(argvars, 0) == FAIL
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
886 || check_for_number_arg(argvars, 1) == FAIL))
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
887 return;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
888
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
889 wp = find_win_by_nr_or_id(&argvars[0]);
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
890 if (wp == NULL || win_valid_popup(wp))
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
891 return;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
892
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
893 offset = (int)tv_get_number(&argvars[1]);
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
894 win_drag_vsep_line(wp, offset);
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
895 rettv->vval.v_number = TRUE;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
896 }
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
897
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
898 /*
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
899 * "win_move_statusline()" function
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
900 */
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
901 void
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
902 f_win_move_statusline(typval_T *argvars, typval_T *rettv)
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
903 {
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
904 win_T *wp;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
905 int offset;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
906
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
907 rettv->vval.v_number = FALSE;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
908
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
909 if (in_vim9script()
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
910 && (check_for_number_arg(argvars, 0) == FAIL
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
911 || check_for_number_arg(argvars, 1) == FAIL))
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
912 return;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
913
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
914 wp = find_win_by_nr_or_id(&argvars[0]);
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
915 if (wp == NULL || win_valid_popup(wp))
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
916 return;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
917
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
918 offset = (int)tv_get_number(&argvars[1]);
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
919 win_drag_status_line(wp, offset);
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
920 rettv->vval.v_number = TRUE;
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
921 }
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
922
b94cdb5ef20e patch 8.2.4052: not easy to resize a window from a plugin
Bram Moolenaar <Bram@vim.org>
parents: 27028
diff changeset
923 /*
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
924 * "win_screenpos()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
925 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
926 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
927 f_win_screenpos(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
928 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
929 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
930
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
931 if (rettv_list_alloc(rettv) == FAIL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
932 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
933
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
934 if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
935 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
936
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
937 wp = find_win_by_nr_or_id(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
938 list_append_number(rettv->vval.v_list, wp == NULL ? 0 : wp->w_winrow + 1);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
939 list_append_number(rettv->vval.v_list, wp == NULL ? 0 : wp->w_wincol + 1);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
940 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
941
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
942 /*
18049
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
943 * Move the window wp into a new split of targetwin in a given direction
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
944 */
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
945 static void
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
946 win_move_into_split(win_T *wp, win_T *targetwin, int size, int flags)
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
947 {
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
948 int dir;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
949 int height = wp->w_height;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
950 win_T *oldwin = curwin;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
951
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
952 if (wp == targetwin)
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
953 return;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
954
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
955 // Jump to the target window
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
956 if (curwin != targetwin)
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
957 win_goto(targetwin);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
958
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
959 // Remove the old window and frame from the tree of frames
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
960 (void)winframe_remove(wp, &dir, NULL);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
961 win_remove(wp, NULL);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
962 last_status(FALSE); // may need to remove last status line
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
963 (void)win_comp_pos(); // recompute window positions
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
964
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
965 // Split a window on the desired side and put the old window there
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
966 (void)win_split_ins(size, flags, wp, dir);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
967
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
968 // If splitting horizontally, try to preserve height
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
969 if (size == 0 && !(flags & WSP_VERT))
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
970 {
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
971 win_setheight_win(height, wp);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
972 if (p_ea)
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
973 win_equal(wp, TRUE, 'v');
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
974 }
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
975
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
976 #if defined(FEAT_GUI)
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
977 // When 'guioptions' includes 'L' or 'R' may have to remove or add
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
978 // scrollbars. Have to update them anyway.
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
979 gui_may_update_scrollbars();
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
980 #endif
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
981
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
982 if (oldwin != curwin)
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
983 win_goto(oldwin);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
984 }
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
985
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
986 /*
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
987 * "win_splitmove()" function
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
988 */
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
989 void
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
990 f_win_splitmove(typval_T *argvars, typval_T *rettv)
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
991 {
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
992 win_T *wp;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
993 win_T *targetwin;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
994 int flags = 0, size = 0;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
995
25302
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
996 if (in_vim9script()
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
997 && (check_for_number_arg(argvars, 0) == FAIL
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
998 || check_for_number_arg(argvars, 1) == FAIL
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
999 || check_for_opt_dict_arg(argvars, 2) == FAIL))
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1000 return;
4d3c68196d05 patch 8.2.3188: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1001
18049
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1002 wp = find_win_by_nr_or_id(&argvars[0]);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1003 targetwin = find_win_by_nr_or_id(&argvars[1]);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1004
19065
ef3633932b0c patch 8.2.0093: win_splitmove() can make Vim hang
Bram Moolenaar <Bram@vim.org>
parents: 18763
diff changeset
1005 if (wp == NULL || targetwin == NULL || wp == targetwin
19732
e292acf16e26 patch 8.2.0422: crash when passing popup window to win_splitmove()
Bram Moolenaar <Bram@vim.org>
parents: 19398
diff changeset
1006 || !win_valid(wp) || !win_valid(targetwin)
e292acf16e26 patch 8.2.0422: crash when passing popup window to win_splitmove()
Bram Moolenaar <Bram@vim.org>
parents: 19398
diff changeset
1007 || win_valid_popup(wp) || win_valid_popup(targetwin))
18049
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1008 {
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
1009 emsg(_(e_invalid_window_number));
18049
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1010 rettv->vval.v_number = -1;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1011 return;
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1012 }
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1013
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1014 if (argvars[2].v_type != VAR_UNKNOWN)
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1015 {
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
1016 dict_T *d;
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
1017 dictitem_T *di;
18049
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1018
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1019 if (check_for_nonnull_dict_arg(argvars, 2) == FAIL)
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
1020 return;
18049
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1021
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
1022 d = argvars[2].vval.v_dict;
29442
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions
Bram Moolenaar <Bram@vim.org>
parents: 29175
diff changeset
1023 if (dict_get_bool(d, "vertical", FALSE))
28809
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
1024 flags |= WSP_VERT;
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
1025 if ((di = dict_find(d, (char_u *)"rightbelow", -1)) != NULL)
d0241e74bfdb patch 8.2.4928: various white space and cosmetic mistakes
Bram Moolenaar <Bram@vim.org>
parents: 28580
diff changeset
1026 flags |= tv_get_bool(&di->di_tv) ? WSP_BELOW : WSP_ABOVE;
29442
827d9f2b7a71 patch 9.0.0063: too many type casts for dict_get functions
Bram Moolenaar <Bram@vim.org>
parents: 29175
diff changeset
1027 size = (int)dict_get_number(d, "size");
18049
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1028 }
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1029
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1030 win_move_into_split(wp, targetwin, size, flags);
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1031 }
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1032
a9f1656f13c9 patch 8.1.2020: it is not easy to change the window layout
Bram Moolenaar <Bram@vim.org>
parents: 18010
diff changeset
1033 /*
19398
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1034 * "win_gettype(nr)" function
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1035 */
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1036 void
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1037 f_win_gettype(typval_T *argvars, typval_T *rettv)
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1038 {
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1039 win_T *wp = curwin;
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1040
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1041 rettv->v_type = VAR_STRING;
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1042 rettv->vval.v_string = NULL;
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1043
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1044 if (in_vim9script() && check_for_opt_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1045 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1046
19398
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1047 if (argvars[0].v_type != VAR_UNKNOWN)
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1048 {
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1049 wp = find_win_by_nr_or_id(&argvars[0]);
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1050 if (wp == NULL)
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1051 {
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1052 rettv->vval.v_string = vim_strsave((char_u *)"unknown");
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1053 return;
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1054 }
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1055 }
20879
0ab45b558621 patch 8.2.0991: cannot get window type for autocmd and preview window
Bram Moolenaar <Bram@vim.org>
parents: 19934
diff changeset
1056 if (wp == aucmd_win)
20889
27401f09fe9b patch 8.2.0996: using "aucmdwin" in win_gettype() is not ideal
Bram Moolenaar <Bram@vim.org>
parents: 20879
diff changeset
1057 rettv->vval.v_string = vim_strsave((char_u *)"autocmd");
20879
0ab45b558621 patch 8.2.0991: cannot get window type for autocmd and preview window
Bram Moolenaar <Bram@vim.org>
parents: 19934
diff changeset
1058 #if defined(FEAT_QUICKFIX)
0ab45b558621 patch 8.2.0991: cannot get window type for autocmd and preview window
Bram Moolenaar <Bram@vim.org>
parents: 19934
diff changeset
1059 else if (wp->w_p_pvw)
0ab45b558621 patch 8.2.0991: cannot get window type for autocmd and preview window
Bram Moolenaar <Bram@vim.org>
parents: 19934
diff changeset
1060 rettv->vval.v_string = vim_strsave((char_u *)"preview");
0ab45b558621 patch 8.2.0991: cannot get window type for autocmd and preview window
Bram Moolenaar <Bram@vim.org>
parents: 19934
diff changeset
1061 #endif
19398
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1062 #ifdef FEAT_PROP_POPUP
20879
0ab45b558621 patch 8.2.0991: cannot get window type for autocmd and preview window
Bram Moolenaar <Bram@vim.org>
parents: 19934
diff changeset
1063 else if (WIN_IS_POPUP(wp))
19398
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1064 rettv->vval.v_string = vim_strsave((char_u *)"popup");
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1065 #endif
20879
0ab45b558621 patch 8.2.0991: cannot get window type for autocmd and preview window
Bram Moolenaar <Bram@vim.org>
parents: 19934
diff changeset
1066 else if (wp == curwin && cmdwin_type != 0)
19398
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1067 rettv->vval.v_string = vim_strsave((char_u *)"command");
25435
6ad76124ddda patch 8.2.3254: win_gettype() does not recognize a quickfix window
Bram Moolenaar <Bram@vim.org>
parents: 25384
diff changeset
1068 #ifdef FEAT_QUICKFIX
6ad76124ddda patch 8.2.3254: win_gettype() does not recognize a quickfix window
Bram Moolenaar <Bram@vim.org>
parents: 25384
diff changeset
1069 else if (bt_quickfix(wp->w_buffer))
6ad76124ddda patch 8.2.3254: win_gettype() does not recognize a quickfix window
Bram Moolenaar <Bram@vim.org>
parents: 25384
diff changeset
1070 rettv->vval.v_string = vim_strsave((char_u *)
6ad76124ddda patch 8.2.3254: win_gettype() does not recognize a quickfix window
Bram Moolenaar <Bram@vim.org>
parents: 25384
diff changeset
1071 (wp->w_llist_ref != NULL ? "loclist" : "quickfix"));
6ad76124ddda patch 8.2.3254: win_gettype() does not recognize a quickfix window
Bram Moolenaar <Bram@vim.org>
parents: 25384
diff changeset
1072 #endif
6ad76124ddda patch 8.2.3254: win_gettype() does not recognize a quickfix window
Bram Moolenaar <Bram@vim.org>
parents: 25384
diff changeset
1073
19398
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1074 }
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1075
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1076 /*
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1077 * "getcmdwintype()" function
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1078 */
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1079 void
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1080 f_getcmdwintype(typval_T *argvars UNUSED, typval_T *rettv)
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1081 {
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1082 rettv->v_type = VAR_STRING;
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1083 rettv->vval.v_string = NULL;
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1084 rettv->vval.v_string = alloc(2);
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1085 if (rettv->vval.v_string != NULL)
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1086 {
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1087 rettv->vval.v_string[0] = cmdwin_type;
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1088 rettv->vval.v_string[1] = NUL;
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1089 }
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1090 }
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1091
f0033a10b613 patch 8.2.0257: cannot recognize a terminal in a popup window
Bram Moolenaar <Bram@vim.org>
parents: 19291
diff changeset
1092 /*
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1093 * "winbufnr(nr)" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1094 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1095 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1096 f_winbufnr(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1097 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1098 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1099
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1100 if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1101 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1102
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1103 wp = find_win_by_nr_or_id(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1104 if (wp == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1105 rettv->vval.v_number = -1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1106 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1107 rettv->vval.v_number = wp->w_buffer->b_fnum;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1108 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1109
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1110 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1111 * "wincol()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1112 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1113 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1114 f_wincol(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1115 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1116 validate_cursor();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1117 rettv->vval.v_number = curwin->w_wcol + 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1118 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1119
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1120 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1121 * "winheight(nr)" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1122 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1123 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1124 f_winheight(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1125 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1126 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1127
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1128 if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1129 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1130
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1131 wp = find_win_by_nr_or_id(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1132 if (wp == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1133 rettv->vval.v_number = -1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1134 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1135 rettv->vval.v_number = wp->w_height;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1136 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1137
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1138 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1139 * "winlayout()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1140 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1141 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1142 f_winlayout(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1143 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1144 tabpage_T *tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1145
29175
755ab148288b patch 8.2.5107: some callers of rettv_list_alloc() check for not OK
Bram Moolenaar <Bram@vim.org>
parents: 28809
diff changeset
1146 if (rettv_list_alloc(rettv) == FAIL)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1147 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1148
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1149 if (in_vim9script() && check_for_opt_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1150 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1151
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1152 if (argvars[0].v_type == VAR_UNKNOWN)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1153 tp = curtab;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1154 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1155 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1156 tp = find_tabpage((int)tv_get_number(&argvars[0]));
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1157 if (tp == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1158 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1159 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1160
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1161 get_framelayout(tp->tp_topframe, rettv->vval.v_list, TRUE);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1162 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1163
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1164 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1165 * "winline()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1166 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1167 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1168 f_winline(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1169 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1170 validate_cursor();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1171 rettv->vval.v_number = curwin->w_wrow + 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1172 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1173
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1174 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1175 * "winnr()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1176 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1177 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1178 f_winnr(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1179 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1180 int nr = 1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1181
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1182 if (in_vim9script() && check_for_opt_string_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1183 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1184
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1185 nr = get_winnr(curtab, &argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1186 rettv->vval.v_number = nr;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1187 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1188
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1189 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1190 * "winrestcmd()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1191 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1192 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1193 f_winrestcmd(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1194 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1195 win_T *wp;
24180
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1196 int i;
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1197 int winnr;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1198 garray_T ga;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1199 char_u buf[50];
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1200
27028
c9474ae175f4 patch 8.2.4043: using int for second argument of ga_init2()
Bram Moolenaar <Bram@vim.org>
parents: 26994
diff changeset
1201 ga_init2(&ga, sizeof(char), 70);
24180
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1202
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1203 // Do this twice to handle some window layouts properly.
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1204 for (i = 0; i < 2; ++i)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1205 {
24180
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1206 winnr = 1;
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1207 FOR_ALL_WINDOWS(wp)
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1208 {
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1209 sprintf((char *)buf, ":%dresize %d|", winnr, wp->w_height);
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1210 ga_concat(&ga, buf);
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1211 sprintf((char *)buf, "vert :%dresize %d|", winnr, wp->w_width);
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1212 ga_concat(&ga, buf);
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1213 ++winnr;
3c165c7432ff patch 8.2.2631: commands from winrestcmd() do not always work properly
Bram Moolenaar <Bram@vim.org>
parents: 23596
diff changeset
1214 }
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1215 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1216 ga_append(&ga, NUL);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1217
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1218 rettv->vval.v_string = ga.ga_data;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1219 rettv->v_type = VAR_STRING;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1220 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1221
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1222 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1223 * "winrestview()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1224 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1225 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1226 f_winrestview(typval_T *argvars, typval_T *rettv UNUSED)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1227 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1228 dict_T *dict;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1229
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1230 if (check_for_nonnull_dict_arg(argvars, 0) == FAIL)
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1231 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1232
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1233 dict = argvars[0].vval.v_dict;
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1234 if (dict_has_key(dict, "lnum"))
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1235 curwin->w_cursor.lnum = (linenr_T)dict_get_number(dict, "lnum");
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1236 if (dict_has_key(dict, "col"))
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1237 curwin->w_cursor.col = (colnr_T)dict_get_number(dict, "col");
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1238 if (dict_has_key(dict, "coladd"))
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1239 curwin->w_cursor.coladd = (colnr_T)dict_get_number(dict, "coladd");
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1240 if (dict_has_key(dict, "curswant"))
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1241 {
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1242 curwin->w_curswant = (colnr_T)dict_get_number(dict, "curswant");
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1243 curwin->w_set_curswant = FALSE;
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1244 }
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1245
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1246 if (dict_has_key(dict, "topline"))
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1247 set_topline(curwin, (linenr_T)dict_get_number(dict, "topline"));
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1248 #ifdef FEAT_DIFF
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1249 if (dict_has_key(dict, "topfill"))
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1250 curwin->w_topfill = (int)dict_get_number(dict, "topfill");
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1251 #endif
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1252 if (dict_has_key(dict, "leftcol"))
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1253 curwin->w_leftcol = (colnr_T)dict_get_number(dict, "leftcol");
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1254 if (dict_has_key(dict, "skipcol"))
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1255 curwin->w_skipcol = (colnr_T)dict_get_number(dict, "skipcol");
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1256
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1257 check_cursor();
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1258 win_new_height(curwin, curwin->w_height);
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1259 win_new_width(curwin, curwin->w_width);
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1260 changed_window_setting();
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1261
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1262 if (curwin->w_topline <= 0)
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1263 curwin->w_topline = 1;
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1264 if (curwin->w_topline > curbuf->b_ml.ml_line_count)
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1265 curwin->w_topline = curbuf->b_ml.ml_line_count;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1266 #ifdef FEAT_DIFF
29994
86eb4aba16c3 patch 9.0.0335: checks for Dictionary argument often give a vague error
Bram Moolenaar <Bram@vim.org>
parents: 29442
diff changeset
1267 check_topfill(curwin, TRUE);
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1268 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1269 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1270
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1271 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1272 * "winsaveview()" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1273 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1274 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1275 f_winsaveview(typval_T *argvars UNUSED, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1276 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1277 dict_T *dict;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1278
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1279 if (rettv_dict_alloc(rettv) == FAIL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1280 return;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1281 dict = rettv->vval.v_dict;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1282
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1283 dict_add_number(dict, "lnum", (long)curwin->w_cursor.lnum);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1284 dict_add_number(dict, "col", (long)curwin->w_cursor.col);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1285 dict_add_number(dict, "coladd", (long)curwin->w_cursor.coladd);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1286 update_curswant();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1287 dict_add_number(dict, "curswant", (long)curwin->w_curswant);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1288
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1289 dict_add_number(dict, "topline", (long)curwin->w_topline);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1290 #ifdef FEAT_DIFF
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1291 dict_add_number(dict, "topfill", (long)curwin->w_topfill);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1292 #endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1293 dict_add_number(dict, "leftcol", (long)curwin->w_leftcol);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1294 dict_add_number(dict, "skipcol", (long)curwin->w_skipcol);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1295 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1296
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1297 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1298 * "winwidth(nr)" function
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1299 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1300 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1301 f_winwidth(typval_T *argvars, typval_T *rettv)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1302 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1303 win_T *wp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1304
25384
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1305 if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1306 return;
e8e2c4d33b9b patch 8.2.3229: Vim9: runtime and compile time type checks are not the same
Bram Moolenaar <Bram@vim.org>
parents: 25302
diff changeset
1307
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1308 wp = find_win_by_nr_or_id(&argvars[0]);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1309 if (wp == NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1310 rettv->vval.v_number = -1;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1311 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1312 rettv->vval.v_number = wp->w_width;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1313 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1314 #endif // FEAT_EVAL
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1315
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1316 #if defined(FEAT_EVAL) || defined(FEAT_PYTHON) || defined(FEAT_PYTHON3) \
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1317 || defined(PROTO)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1318 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1319 * Set "win" to be the curwin and "tp" to be the current tab page.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1320 * restore_win() MUST be called to undo, also when FAIL is returned.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1321 * No autocommands will be executed until restore_win() is called.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1322 * When "no_display" is TRUE the display won't be affected, no redraw is
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1323 * triggered, another tabpage access is limited.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1324 * Returns FAIL if switching to "win" failed.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1325 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1326 int
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1327 switch_win(
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1328 switchwin_T *switchwin,
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1329 win_T *win,
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1330 tabpage_T *tp,
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1331 int no_display)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1332 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1333 block_autocmds();
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1334 return switch_win_noblock(switchwin, win, tp, no_display);
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1335 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1336
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1337 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1338 * As switch_win() but without blocking autocommands.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1339 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1340 int
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1341 switch_win_noblock(
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1342 switchwin_T *switchwin,
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1343 win_T *win,
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1344 tabpage_T *tp,
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1345 int no_display)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1346 {
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1347 CLEAR_POINTER(switchwin);
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1348 switchwin->sw_curwin = curwin;
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1349 if (win == curwin)
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1350 switchwin->sw_same_win = TRUE;
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1351 else
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1352 {
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1353 // Disable Visual selection, because redrawing may fail.
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1354 switchwin->sw_visual_active = VIsual_active;
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1355 VIsual_active = FALSE;
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1356 }
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1357
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1358 if (tp != NULL)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1359 {
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1360 switchwin->sw_curtab = curtab;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1361 if (no_display)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1362 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1363 curtab->tp_firstwin = firstwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1364 curtab->tp_lastwin = lastwin;
26666
bbcbb3c13fba patch 8.2.3862: crash on exit with EXITFREE and using win_execute()
Bram Moolenaar <Bram@vim.org>
parents: 26191
diff changeset
1365 curtab->tp_topframe = topframe;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1366 curtab = tp;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1367 firstwin = curtab->tp_firstwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1368 lastwin = curtab->tp_lastwin;
26666
bbcbb3c13fba patch 8.2.3862: crash on exit with EXITFREE and using win_execute()
Bram Moolenaar <Bram@vim.org>
parents: 26191
diff changeset
1369 topframe = curtab->tp_topframe;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1370 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1371 else
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1372 goto_tabpage_tp(tp, FALSE, FALSE);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1373 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1374 if (!win_valid(win))
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1375 return FAIL;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1376 curwin = win;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1377 curbuf = curwin->w_buffer;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1378 return OK;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1379 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1380
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1381 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1382 * Restore current tabpage and window saved by switch_win(), if still valid.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1383 * When "no_display" is TRUE the display won't be affected, no redraw is
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1384 * triggered.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1385 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1386 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1387 restore_win(
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1388 switchwin_T *switchwin,
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1389 int no_display)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1390 {
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1391 restore_win_noblock(switchwin, no_display);
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1392 unblock_autocmds();
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1393 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1394
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1395 /*
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1396 * As restore_win() but without unblocking autocommands.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1397 */
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1398 void
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1399 restore_win_noblock(
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1400 switchwin_T *switchwin,
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1401 int no_display)
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1402 {
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1403 if (switchwin->sw_curtab != NULL && valid_tabpage(switchwin->sw_curtab))
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1404 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1405 if (no_display)
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1406 {
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1407 curtab->tp_firstwin = firstwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1408 curtab->tp_lastwin = lastwin;
26666
bbcbb3c13fba patch 8.2.3862: crash on exit with EXITFREE and using win_execute()
Bram Moolenaar <Bram@vim.org>
parents: 26191
diff changeset
1409 curtab->tp_topframe = topframe;
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1410 curtab = switchwin->sw_curtab;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1411 firstwin = curtab->tp_firstwin;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1412 lastwin = curtab->tp_lastwin;
26666
bbcbb3c13fba patch 8.2.3862: crash on exit with EXITFREE and using win_execute()
Bram Moolenaar <Bram@vim.org>
parents: 26191
diff changeset
1413 topframe = curtab->tp_topframe;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1414 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1415 else
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1416 goto_tabpage_tp(switchwin->sw_curtab, FALSE, FALSE);
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1417 }
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1418
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1419 if (!switchwin->sw_same_win)
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1420 VIsual_active = switchwin->sw_visual_active;
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1421
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1422 if (win_valid(switchwin->sw_curwin))
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1423 {
26978
aa613a3084b9 patch 8.2.4018: ml_get error when win_execute redraws with Visual selection
Bram Moolenaar <Bram@vim.org>
parents: 26887
diff changeset
1424 curwin = switchwin->sw_curwin;
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1425 curbuf = curwin->w_buffer;
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1426 }
18763
49b78d6465e5 patch 8.1.2371: FEAT_TEXT_PROP is a confusing name
Bram Moolenaar <Bram@vim.org>
parents: 18259
diff changeset
1427 # ifdef FEAT_PROP_POPUP
18010
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1428 else if (WIN_IS_POPUP(curwin))
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1429 // original window was closed and now we're in a popup window: Go
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1430 // to the first valid window.
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1431 win_goto(firstwin);
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1432 # endif
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1433 }
cf8e0c7e0cb9 patch 8.1.2001: some source files are too big
Bram Moolenaar <Bram@vim.org>
parents:
diff changeset
1434 #endif