annotate runtime/indent/python.vim @ 48:67300faee616 v7-3-618

v7-3-618
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Wed, 01 Aug 2012 18:08:28 +0900
parents 76efa0be13f1
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
1 " Vim indent file
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
2 " Language: Python
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
3 " Maintainer: Bram Moolenaar <Bram@vim.org>
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
4 " Original Author: David Bustos <bustos@caltech.edu>
48
67300faee616 v7-3-618
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
5 " Last Change: 2012 May 01
0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
6
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
7 " Only load this indent file when no other was loaded.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
8 if exists("b:did_indent")
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
9 finish
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
10 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
11 let b:did_indent = 1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
12
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
13 " Some preliminary settings
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
14 setlocal nolisp " Make sure lisp indenting doesn't supersede us
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
15 setlocal autoindent " indentexpr isn't much help otherwise
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
16
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
17 setlocal indentexpr=GetPythonIndent(v:lnum)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
18 setlocal indentkeys+=<:>,=elif,=except
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
19
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
20 " Only define the function once.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
21 if exists("*GetPythonIndent")
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
22 finish
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
23 endif
48
67300faee616 v7-3-618
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
24 let s:keepcpo= &cpo
67300faee616 v7-3-618
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
25 set cpo&vim
0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
26
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
27 " Come here when loading the script the first time.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
28
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
29 let s:maxoff = 50 " maximum number of lines to look backwards for ()
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
30
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
31 function GetPythonIndent(lnum)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
32
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
33 " If this line is explicitly joined: If the previous line was also joined,
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
34 " line it up with that one, otherwise add two 'shiftwidth'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
35 if getline(a:lnum - 1) =~ '\\$'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
36 if a:lnum > 1 && getline(a:lnum - 2) =~ '\\$'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
37 return indent(a:lnum - 1)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
38 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
39 return indent(a:lnum - 1) + (exists("g:pyindent_continue") ? eval(g:pyindent_continue) : (&sw * 2))
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
40 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
41
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
42 " If the start of the line is in a string don't change the indent.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
43 if has('syntax_items')
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
44 \ && synIDattr(synID(a:lnum, 1, 1), "name") =~ "String$"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
45 return -1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
46 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
47
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
48 " Search backwards for the previous non-empty line.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
49 let plnum = prevnonblank(v:lnum - 1)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
50
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
51 if plnum == 0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
52 " This is the first non-empty line, use zero indent.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
53 return 0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
54 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
55
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
56 " If the previous line is inside parenthesis, use the indent of the starting
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
57 " line.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
58 " Trick: use the non-existing "dummy" variable to break out of the loop when
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
59 " going too far back.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
60 call cursor(plnum, 1)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
61 let parlnum = searchpair('(\|{\|\[', '', ')\|}\|\]', 'nbW',
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
62 \ "line('.') < " . (plnum - s:maxoff) . " ? dummy :"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
63 \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
64 \ . " =~ '\\(Comment\\|String\\)$'")
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
65 if parlnum > 0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
66 let plindent = indent(parlnum)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
67 let plnumstart = parlnum
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
68 else
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
69 let plindent = indent(plnum)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
70 let plnumstart = plnum
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
71 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
72
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
73
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
74 " When inside parenthesis: If at the first line below the parenthesis add
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
75 " two 'shiftwidth', otherwise same as previous line.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
76 " i = (a
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
77 " + b
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
78 " + c)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
79 call cursor(a:lnum, 1)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
80 let p = searchpair('(\|{\|\[', '', ')\|}\|\]', 'bW',
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
81 \ "line('.') < " . (a:lnum - s:maxoff) . " ? dummy :"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
82 \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
83 \ . " =~ '\\(Comment\\|String\\)$'")
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
84 if p > 0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
85 if p == plnum
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
86 " When the start is inside parenthesis, only indent one 'shiftwidth'.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
87 let pp = searchpair('(\|{\|\[', '', ')\|}\|\]', 'bW',
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
88 \ "line('.') < " . (a:lnum - s:maxoff) . " ? dummy :"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
89 \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
90 \ . " =~ '\\(Comment\\|String\\)$'")
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
91 if pp > 0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
92 return indent(plnum) + (exists("g:pyindent_nested_paren") ? eval(g:pyindent_nested_paren) : &sw)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
93 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
94 return indent(plnum) + (exists("g:pyindent_open_paren") ? eval(g:pyindent_open_paren) : (&sw * 2))
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
95 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
96 if plnumstart == p
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
97 return indent(plnum)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
98 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
99 return plindent
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
100 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
101
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
102
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
103 " Get the line and remove a trailing comment.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
104 " Use syntax highlighting attributes when possible.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
105 let pline = getline(plnum)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
106 let pline_len = strlen(pline)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
107 if has('syntax_items')
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
108 " If the last character in the line is a comment, do a binary search for
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
109 " the start of the comment. synID() is slow, a linear search would take
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
110 " too long on a long line.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
111 if synIDattr(synID(plnum, pline_len, 1), "name") =~ "Comment$"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
112 let min = 1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
113 let max = pline_len
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
114 while min < max
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
115 let col = (min + max) / 2
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
116 if synIDattr(synID(plnum, col, 1), "name") =~ "Comment$"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
117 let max = col
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
118 else
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
119 let min = col + 1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
120 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
121 endwhile
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
122 let pline = strpart(pline, 0, min - 1)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
123 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
124 else
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
125 let col = 0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
126 while col < pline_len
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
127 if pline[col] == '#'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
128 let pline = strpart(pline, 0, col)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
129 break
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
130 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
131 let col = col + 1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
132 endwhile
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
133 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
134
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
135 " If the previous line ended with a colon, indent this line
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
136 if pline =~ ':\s*$'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
137 return plindent + &sw
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
138 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
139
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
140 " If the previous line was a stop-execution statement...
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
141 if getline(plnum) =~ '^\s*\(break\|continue\|raise\|return\|pass\)\>'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
142 " See if the user has already dedented
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
143 if indent(a:lnum) > indent(plnum) - &sw
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
144 " If not, recommend one dedent
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
145 return indent(plnum) - &sw
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
146 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
147 " Otherwise, trust the user
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
148 return -1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
149 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
150
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
151 " If the current line begins with a keyword that lines up with "try"
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
152 if getline(a:lnum) =~ '^\s*\(except\|finally\)\>'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
153 let lnum = a:lnum - 1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
154 while lnum >= 1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
155 if getline(lnum) =~ '^\s*\(try\|except\)\>'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
156 let ind = indent(lnum)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
157 if ind >= indent(a:lnum)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
158 return -1 " indent is already less than this
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
159 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
160 return ind " line up with previous try or except
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
161 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
162 let lnum = lnum - 1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
163 endwhile
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
164 return -1 " no matching "try"!
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
165 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
166
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
167 " If the current line begins with a header keyword, dedent
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
168 if getline(a:lnum) =~ '^\s*\(elif\|else\)\>'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
169
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
170 " Unless the previous line was a one-liner
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
171 if getline(plnumstart) =~ '^\s*\(for\|if\|try\)\>'
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
172 return plindent
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
173 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
174
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
175 " Or the user has already dedented
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
176 if indent(a:lnum) <= plindent - &sw
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
177 return -1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
178 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
179
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
180 return plindent - &sw
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
181 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
182
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
183 " When after a () construct we probably want to go back to the start line.
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
184 " a = (b
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
185 " + c)
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
186 " here
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
187 if parlnum > 0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
188 return plindent
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
189 endif
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
190
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
191 return -1
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
192
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
193 endfunction
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
194
48
67300faee616 v7-3-618
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
195 let &cpo = s:keepcpo
67300faee616 v7-3-618
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
196 unlet s:keepcpo
67300faee616 v7-3-618
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 0
diff changeset
197
0
76efa0be13f1 Initial revision
atsuki
parents:
diff changeset
198 " vim:sw=2