Mercurial > vim
annotate runtime/ftplugin/j.vim @ 6999:dc1b678f0e4e v7.4.817
patch 7.4.817
Problem: Invalid memory access in file_pat_to_reg_pat().
Solution: Use vim_isspace() instead of checking for a space only. (Dominique
Pelle)
author | Bram Moolenaar <bram@vim.org> |
---|---|
date | Tue, 11 Aug 2015 16:20:05 +0200 |
parents | fbc1131f0ba5 |
children | 30042ddff503 |
rev | line source |
---|---|
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
1 " Vim filetype plugin |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
2 " Language: J |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
3 " Maintainer: David Bürgin <676c7473@gmail.com> |
5734 | 4 " URL: https://github.com/glts/vim-j |
6741 | 5 " Last Change: 2015-03-27 |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
6 |
5734 | 7 if exists('b:did_ftplugin') |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
8 finish |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
9 endif |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
10 let b:did_ftplugin = 1 |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
11 |
5815 | 12 let s:save_cpo = &cpo |
13 set cpo&vim | |
14 | |
15 setlocal iskeyword=48-57,A-Z,_,a-z | |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
16 setlocal comments=:NB. |
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
17 setlocal commentstring=NB.\ %s |
5425 | 18 setlocal formatoptions-=t |
19 setlocal matchpairs=(:) | |
5362
ab1508486b12
Update runtime files. Add support for J.
Bram Moolenaar <bram@vim.org>
parents:
diff
changeset
|
20 |
6741 | 21 let b:undo_ftplugin = 'setlocal matchpairs< formatoptions< commentstring< comments< iskeyword<' |
5815 | 22 |
23 " Section movement with ]] ][ [[ []. The start/end patterns below are amended | |
24 " inside the function in order to avoid matching on the current cursor line. | |
6505 | 25 let s:sectionstart = '\%(\s*Note\|.\{-}\<\%([0-4]\|13\|noun\|adverb\|conjunction\|verb\|monad\|dyad\)\s\+\%(:\s*0\|def\s\+0\|define\)\)\>.*' |
5815 | 26 let s:sectionend = '\s*)\s*' |
27 | |
28 function! s:SearchSection(end, backwards, visualmode) abort | |
29 if a:visualmode !=# '' | |
30 normal! gv | |
31 endif | |
6505 | 32 let l:flags = a:backwards ? 'bsW' : 'sW' |
5815 | 33 if a:end |
6505 | 34 call search('^' . s:sectionend . (a:backwards ? '\n\_.\{-}\%#' : '$'), l:flags) |
5815 | 35 else |
6505 | 36 call search('^' . s:sectionstart . (a:backwards ? '\n\_.\{-}\%#' : '$'), l:flags) |
5815 | 37 endif |
38 endfunction | |
39 | |
6505 | 40 noremap <buffer> <silent> ]] :<C-U>call <SID>SearchSection(0, 0, '')<CR> |
41 xnoremap <buffer> <silent> ]] :<C-U>call <SID>SearchSection(0, 0, visualmode())<CR> | |
5815 | 42 sunmap <buffer> ]] |
6505 | 43 noremap <buffer> <silent> ][ :<C-U>call <SID>SearchSection(1, 0, '')<CR> |
44 xnoremap <buffer> <silent> ][ :<C-U>call <SID>SearchSection(1, 0, visualmode())<CR> | |
5815 | 45 sunmap <buffer> ][ |
6505 | 46 noremap <buffer> <silent> [[ :<C-U>call <SID>SearchSection(0, 1, '')<CR> |
47 xnoremap <buffer> <silent> [[ :<C-U>call <SID>SearchSection(0, 1, visualmode())<CR> | |
5815 | 48 sunmap <buffer> [[ |
6505 | 49 noremap <buffer> <silent> [] :<C-U>call <SID>SearchSection(1, 1, '')<CR> |
50 xnoremap <buffer> <silent> [] :<C-U>call <SID>SearchSection(1, 1, visualmode())<CR> | |
5815 | 51 sunmap <buffer> [] |
52 | |
53 let b:undo_ftplugin .= ' | silent! execute "unmap <buffer> ]]"' | |
54 \ . ' | silent! execute "unmap <buffer> ]["' | |
55 \ . ' | silent! execute "unmap <buffer> [["' | |
56 \ . ' | silent! execute "unmap <buffer> []"' | |
57 | |
58 " Browse dialog filter on Windows (see ":help browsefilter") | |
59 if has('gui_win32') && !exists('b:browsefilter') | |
60 let b:browsefilter = "J Script Files (*.ijs)\t*.ijs\n" | |
61 \ . "All Files (*.*)\t*.*\n" | |
62 let b:undo_ftplugin .= ' | unlet! b:browsefilter' | |
63 endif | |
64 | |
65 " Enhanced "%" matching (see ":help matchit") | |
66 if exists('loaded_matchit') && !exists('b:match_words') | |
67 let b:match_ignorecase = 0 | |
6505 | 68 let b:match_words = '^\%(\s*Note\|.\{-}\<\%([0-4]\|13\|noun\|adverb\|conjunction\|verb\|monad\|dyad\)\s\+\%(\:\s*0\|def\s\+0\|define\)\)\>:^\s*\:\s*$:^\s*)\s*$' |
5815 | 69 \ . ',\<\%(for\%(_\a\k*\)\=\|if\|select\|try\|whil\%(e\|st\)\)\.:\<\%(case\|catch[dt]\=\|else\%(if\)\=\|fcase\)\.:\<end\.' |
70 let b:undo_ftplugin .= ' | unlet! b:match_ignorecase b:match_words' | |
71 endif | |
72 | |
73 let &cpo = s:save_cpo | |
74 unlet s:save_cpo |