Mercurial > vim
annotate runtime/ftplugin/abaqus.vim @ 35201:4097f1307d68 default tip
runtime(doc): clarify why E195 is returned
Commit: https://github.com/vim/vim/commit/5f757147303dbf4c5c3122bbabf77839c3725043
Author: Christian Brabandt <cb@256bit.org>
Date: Sat May 18 19:11:10 2024 +0200
runtime(doc): clarify why E195 is returned
Signed-off-by: Christian Brabandt <cb@256bit.org>
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Sat, 18 May 2024 19:15:03 +0200 |
| parents | 8ae680be2a51 |
| children |
| rev | line source |
|---|---|
| 7 | 1 " Vim filetype plugin file |
| 2 " Language: Abaqus finite element input file (www.abaqus.com) | |
| 29659 | 3 " Maintainer: Carl Osterwisch <costerwi@gmail.com> |
| 30875 | 4 " Last Change: 2022 Oct 08 |
|
34134
8ae680be2a51
runtime(ftplugin): Use "*" browsefilter pattern to match "All Files"
Christian Brabandt <cb@256bit.org>
parents:
30875
diff
changeset
|
5 " 2024 Jan 14 by Vim Project (browsefilter) |
| 7 | 6 |
| 7 " Only do this when not done yet for this buffer | |
| 8 if exists("b:did_ftplugin") | finish | endif | |
| 9 | |
| 10 " Don't load another plugin for this buffer | |
| 11 let b:did_ftplugin = 1 | |
| 12 | |
| 13 " Save the compatibility options and temporarily switch to vim defaults | |
| 14 let s:cpo_save = &cpoptions | |
| 15 set cpoptions&vim | |
| 16 | |
| 17 " Set the format of the include file specification for Abaqus | |
| 18 " Used in :check gf ^wf [i and other commands | |
| 19 setlocal include=\\<\\cINPUT\\s*= | |
| 20 | |
| 21 " Remove characters up to the first = when evaluating filenames | |
| 22 setlocal includeexpr=substitute(v:fname,'.\\{-}=','','') | |
| 23 | |
| 15 | 24 " Remove comma from valid filename characters since it is used to |
| 25 " separate keyword parameters | |
| 26 setlocal isfname-=, | |
| 27 | |
| 7 | 28 " Define format of comment lines (see 'formatoptions' for uses) |
| 29 setlocal comments=:** | |
| 30 setlocal commentstring=**%s | |
| 31 | |
| 32 " Definitions start with a * and assign a NAME, NSET, or ELSET | |
| 33 " Used in [d ^wd and other commands | |
| 34 setlocal define=^\\*\\a.*\\c\\(NAME\\\|NSET\\\|ELSET\\)\\s*= | |
| 35 | |
| 36 " Abaqus keywords and identifiers may include a - character | |
| 37 setlocal iskeyword+=- | |
| 38 | |
| 2034 | 39 let b:undo_ftplugin = "setlocal include< includeexpr< isfname<" |
| 40 \ . " comments< commentstring< define< iskeyword<" | |
| 41 | |
| 42 if has("folding") | |
| 43 " Fold all lines that do not begin with * | |
| 44 setlocal foldexpr=getline(v:lnum)[0]!=\"\*\" | |
| 45 setlocal foldmethod=expr | |
| 46 let b:undo_ftplugin .= " foldexpr< foldmethod<" | |
| 47 endif | |
| 48 | |
| 7 | 49 " Set the file browse filter (currently only supported under Win32 gui) |
| 29659 | 50 if (has("gui_win32") || has("gui_gtk")) && !exists("b:browsefilter") |
| 7 | 51 let b:browsefilter = "Abaqus Input Files (*.inp *.inc)\t*.inp;*.inc\n" . |
| 52 \ "Abaqus Results (*.dat)\t*.dat\n" . | |
|
34134
8ae680be2a51
runtime(ftplugin): Use "*" browsefilter pattern to match "All Files"
Christian Brabandt <cb@256bit.org>
parents:
30875
diff
changeset
|
53 \ "Abaqus Messages (*.pre, *.msg, *.sta)\t*.pre;*.msg;*.sta\n" |
|
8ae680be2a51
runtime(ftplugin): Use "*" browsefilter pattern to match "All Files"
Christian Brabandt <cb@256bit.org>
parents:
30875
diff
changeset
|
54 if has("win32") |
|
8ae680be2a51
runtime(ftplugin): Use "*" browsefilter pattern to match "All Files"
Christian Brabandt <cb@256bit.org>
parents:
30875
diff
changeset
|
55 let b:browsefilter .= "All Files (*.*)\t*\n" |
|
8ae680be2a51
runtime(ftplugin): Use "*" browsefilter pattern to match "All Files"
Christian Brabandt <cb@256bit.org>
parents:
30875
diff
changeset
|
56 else |
|
8ae680be2a51
runtime(ftplugin): Use "*" browsefilter pattern to match "All Files"
Christian Brabandt <cb@256bit.org>
parents:
30875
diff
changeset
|
57 let b:browsefilter .= "All Files (*)\t*\n" |
|
8ae680be2a51
runtime(ftplugin): Use "*" browsefilter pattern to match "All Files"
Christian Brabandt <cb@256bit.org>
parents:
30875
diff
changeset
|
58 endif |
|
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
3410
diff
changeset
|
59 let b:undo_ftplugin .= "|unlet! b:browsefilter" |
| 7 | 60 endif |
| 61 | |
| 2034 | 62 " Define patterns for the matchit plugin |
| 63 if exists("loaded_matchit") && !exists("b:match_words") | |
| 64 let b:match_ignorecase = 1 | |
| 29659 | 65 let b:match_words = |
| 2034 | 66 \ '\*part:\*end\s*part,' . |
| 67 \ '\*assembly:\*end\s*assembly,' . | |
| 68 \ '\*instance:\*end\s*instance,' . | |
| 69 \ '\*step:\*end\s*step' | |
|
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
3410
diff
changeset
|
70 let b:undo_ftplugin .= "|unlet! b:match_ignorecase b:match_words" |
| 2034 | 71 endif |
| 72 | |
| 29659 | 73 if !exists("no_plugin_maps") && !exists("no_abaqus_maps") |
| 30875 | 74 " Map [[ and ]] keys to move [count] keywords backward or forward |
| 75 nnoremap <silent><buffer> ]] :call <SID>Abaqus_NextKeyword(1)<CR> | |
| 76 nnoremap <silent><buffer> [[ :call <SID>Abaqus_NextKeyword(-1)<CR> | |
| 77 function! <SID>Abaqus_NextKeyword(direction) | |
| 78 .mark ' | |
| 79 if a:direction < 0 | |
| 80 let flags = 'b' | |
| 81 else | |
| 82 let flags = '' | |
| 83 endif | |
| 84 let l:count = abs(a:direction) * v:count1 | |
| 85 while l:count > 0 && search("^\\*\\a", flags) | |
| 86 let l:count -= 1 | |
| 87 endwhile | |
| 88 endfunction | |
| 7 | 89 |
| 30875 | 90 " Map \\ to toggle commenting of the current line or range |
| 29659 | 91 noremap <silent><buffer> <LocalLeader><LocalLeader> |
| 92 \ :call <SID>Abaqus_ToggleComment()<CR>j | |
| 93 function! <SID>Abaqus_ToggleComment() range | |
| 30875 | 94 if strpart(getline(a:firstline), 0, 2) == "**" |
| 95 " Un-comment all lines in range | |
| 96 silent execute a:firstline . ',' . a:lastline . 's/^\*\*//' | |
| 97 else | |
| 98 " Comment all lines in range | |
| 99 silent execute a:firstline . ',' . a:lastline . 's/^/**/' | |
| 100 endif | |
| 101 endfunction | |
| 102 | |
| 103 " Map \s to swap first two comma separated fields | |
| 104 noremap <silent><buffer> <LocalLeader>s :call <SID>Abaqus_Swap()<CR> | |
| 105 function! <SID>Abaqus_Swap() range | |
| 106 silent execute a:firstline . ',' . a:lastline . 's/\([^*,]*\),\([^,]*\)/\2,\1/' | |
| 29659 | 107 endfunction |
| 7 | 108 |
| 29659 | 109 let b:undo_ftplugin .= "|unmap <buffer> [[|unmap <buffer> ]]" |
| 110 \ . "|unmap <buffer> <LocalLeader><LocalLeader>" | |
| 30875 | 111 \ . "|unmap <buffer> <LocalLeader>s" |
| 29659 | 112 endif |
| 2034 | 113 |
|
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
3410
diff
changeset
|
114 " Undo must be done in nocompatible mode for <LocalLeader>. |
|
28808
0f0fed554cdc
Update runtime files, translations
Bram Moolenaar <Bram@vim.org>
parents:
3496
diff
changeset
|
115 let b:undo_ftplugin = "let b:cpo_save = &cpoptions|" |
|
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
3410
diff
changeset
|
116 \ . "set cpoptions&vim|" |
|
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
3410
diff
changeset
|
117 \ . b:undo_ftplugin |
|
28808
0f0fed554cdc
Update runtime files, translations
Bram Moolenaar <Bram@vim.org>
parents:
3496
diff
changeset
|
118 \ . "|let &cpoptions = b:cpo_save" |
|
0f0fed554cdc
Update runtime files, translations
Bram Moolenaar <Bram@vim.org>
parents:
3496
diff
changeset
|
119 \ . "|unlet b:cpo_save" |
|
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
3410
diff
changeset
|
120 |
| 7 | 121 " Restore saved compatibility options |
| 122 let &cpoptions = s:cpo_save | |
|
3410
94601b379f38
Updated runtime files. Add Dutch translations.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
123 unlet s:cpo_save |