ylib/nerdcommenter
1
0
Fork 0
mirror of https://github.com/preservim/nerdcommenter.git synced 2024-11-25 09:40:57 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

Finished and tested NERDCommentIsCharCommented()

Browse Source
This commit is contained in:
li-zhaoyang 2020-01-21 04:16:18 +08:00
parent 70b5b933cd
commit eb6243c0c8
1 changed files with 35 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

54
plugin/NERD_commenter.vim
View File

@ -1365,7 +1365,7 @@ endfunction
" -col the column number of the character " -col the column number of the character
" Return: Number, 1 if the character is inside a comment, 0 if is not " Return: Number, 1 if the character is inside a comment, 0 if is not
function! NERDCommentIsCharCommented(line, col) abort function! NERDCommentIsCharCommented(line, col) abort
" Function: searchfor(str, line, col, direction, [maxline]) " Function: s:searchfor(str, line, col, direction, [maxline])
" search str in the buffer, including the character at [line, col] " search str in the buffer, including the character at [line, col]
" Args: " Args:
" -str: the string for search " -str: the string for search
@ -1378,13 +1378,13 @@ function! NERDCommentIsCharCommented(line, col) abort
" Return: List, in the format of [line, col], where line and col is the " Return: List, in the format of [line, col], where line and col is the
" position of first found result; If str cannot be found, returns " position of first found result; If str cannot be found, returns
" [0, 0] " [0, 0]
function! l:searchfor(str, line, col, direction, ...) abort function! s:searchfor(str, line, col, direction, ...) abort
let l:curlinenr = a:line let l:curlinenr = a:line
let l:maxline = (a:0 > 4) ? a:5 : (direction ? a:line : line('$') - a:line + 1) let l:maxline = (a:0 > 0) ? a:1 : (a:direction ? a:line : line('$') - a:line + 1)
while abs(curlinenr - a:line) < maxline while abs(curlinenr - a:line) < maxline
let linestr = getline(a:line) let linestr = getline(curlinenr)
if curlinenr == a:line if curlinenr == a:line
if direction == 0 if !a:direction
let l:partstr = strpart(linestr, a:col - strlen(a:str)) let l:partstr = strpart(linestr, a:col - strlen(a:str))
else else
let l:partstr = strpart(linestr, 0, a:col + strlen(a:str) - 1) let l:partstr = strpart(linestr, 0, a:col + strlen(a:str) - 1)
@ -1392,45 +1392,61 @@ function! NERDCommentIsCharCommented(line, col) abort
else else
let l:partstr = linestr let l:partstr = linestr
endif endif
if !direction if !a:direction
let idx = stridx(a:str, partstr) " forward
let idx = stridx(partstr, a:str)
if idx != -1 if idx != -1
if curlinenr == a:line
let idx += a:col - strlen(a:str)
else
endif
return [curlinenr, idx + 1] return [curlinenr, idx + 1]
endif endif
else else
let idx = strridx(a:str, partstr) " backward
let idx = strridx(partstr, a:str)
if idx != -1 if idx != -1
return [curlinenr, idx + 1] return [curlinenr, idx + 1]
endif endif
endif endif
let curlinenr += direction ? 1 : -1 let curlinenr += a:direction ? -1 : 1
endwhile endwhile
return [0, 0] return [0, 0]
endfunction endfunction
function! l:checkwith(left, right, line, col) abort " Function: s:checkwith(left, right, line, col) abort
" check if the char at [line, col] is commented using [left, right] pair
" Args:
" -left: the string begins a comment
" -right: the string ends a comment
" -line: the line position of the character
" -col: the column position of the character
" Return: Number, 1 if is in a comment, 0 else
function! s:checkwith(left, right, line, col) abort
let linecommented = 0 let linecommented = 0
let blockcommented = 0 let blockcommented = 0
if a:right ==# '' if a:right ==# ''
let leftpos = searchfor(a:left, a:line, a:col, 1, 1) let leftpos = s:searchfor(a:left, a:line, a:col, 1, 1)
if leftpos == [0, 0] if leftpos == [0, 0]
if !linecommented | let linecommented = 0 | endif if !linecommented | let linecommented = 0 | endif
else else
if !linecommented | let linecommented = 1 | endif if !linecommented | let linecommented = 1 | endif
endif endif
else else
let leftpos = searchfor(a:left, a:line, a:col, 1) let leftpos = s:searchfor(a:left, a:line, a:col, 1)
if leftpos == [0, 0] if leftpos == [0, 0]
if !blockcommented | let linecommented = 0 | endif if !blockcommented | let blockcommented = 0 | endif
else else
call searchfor(a:right, a:line, a:col, 0) " call s:searchfor(a:right, a:line, a:col, 0)
let rightpos = searchfor(a:right, a:line, a:col, 0) let rightpos = s:searchfor(a:right, leftpos[0], leftpos[1] + strlen(a:right) + 1, 0)
if rightpos != [0, 0] if rightpos != [0, 0]
if rightpos[0] < a:line if rightpos[0] < a:line
if !blockcommented | let blockcommented = 0 | endif if !blockcommented | let blockcommented = 0 | endif
else elseif rightpos[0] == a:line
if !blockcommented if !blockcommented
let blockcommented = (rightpos[1] + strlen(a:right) >= a:col) ? 0 : 1 let blockcommented = (rightpos[1] + strlen(a:right) > a:col) ? 1 : 0
endif endif
else " rightpos > a:line
if !blockcommented | let blockcommented = 1 | endif
endif endif
else else
if !blockcommented | let blockcommented = 1 | endif if !blockcommented | let blockcommented = 1 | endif
@ -1439,12 +1455,12 @@ function! NERDCommentIsCharCommented(line, col) abort
endif endif
return linecommented || blockcommented return linecommented || blockcommented
endfunction endfunction
return checkwith( return s:checkwith(
\ b:NERDCommenterDelims['left'], \ b:NERDCommenterDelims['left'],
\ b:NERDCommenterDelims['right'], \ b:NERDCommenterDelims['right'],
\ a:line, \ a:line,
\ a:col) || \ a:col) ||
checkwith( \ s:checkwith(
\ b:NERDCommenterDelims['leftAlt'], \ b:NERDCommenterDelims['leftAlt'],
\ b:NERDCommenterDelims['rightAlt'], \ b:NERDCommenterDelims['rightAlt'],
\ a:line, \ a:line,