Mercurial > vim
annotate runtime/autoload/modula2.vim @ 34209:9ec1021cc7f1 v9.1.0053
patch 9.1.0053: MS-Windows: Key event test still fails
Commit: https://github.com/vim/vim/commit/12b927767213502469284bc133f69b4d0da776cb
Author: Christian Brabandt <cb@256bit.org>
Date: Thu Jan 25 21:23:22 2024 +0100
patch 9.1.0053: MS-Windows: Key event test still fails
Problem: MS-Windows: Key event test still fails
Solution: Catch more interrupts
(after 9.1.0051)
Signed-off-by: Christian Brabandt <cb@256bit.org>
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Thu, 25 Jan 2024 21:30:02 +0100 |
parents | ff27442e7851 |
children |
rev | line source |
---|---|
34092
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
1 " Vim filetype plugin file |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
2 " Language: Modula-2 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
3 " Maintainer: Doug Kearns <dougkearns@gmail.com> |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
4 " Last Change: 2024 Jan 04 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
5 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
6 " Dialect can be one of pim, iso, r10 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
7 function modula2#GetDialect() abort |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
8 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
9 if exists("b:modula2.dialect") |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
10 return b:modula2.dialect |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
11 endif |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
12 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
13 if exists("g:modula2_default_dialect") |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
14 let dialect = g:modula2_default_dialect |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
15 else |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
16 let dialect = "pim" |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
17 endif |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
18 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
19 return dialect |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
20 endfunction |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
21 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
22 function modula2#SetDialect(dialect, extension = "") abort |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
23 if exists("b:modula2") |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
24 unlockvar! b:modula2 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
25 endif |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
26 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
27 let b:modula2 = #{ dialect: a:dialect, extension: a:extension } |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
28 lockvar! b:modula2 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
29 endfunction |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
30 |
ff27442e7851
patch 9.1.0013: Modula2 filetype support lacking
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
31 " vim: nowrap sw=2 sts=2 ts=8 noet fdm=marker: |