Mercurial > vim
annotate runtime/compiler/fortran_lf95.vim @ 16582:9a7d98e11954 v8.1.1294
patch 8.1.1294: MS-Windows: Some fonts return wrong average char width
commit https://github.com/vim/vim/commit/93d77b2cbec08518ee426d0c44c50cf505732443
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue May 7 22:52:50 2019 +0200
patch 8.1.1294: MS-Windows: Some fonts return wrong average char width
Problem: MS-Windows: Some fonts return wrong average char width.
Solution: Compute the average ourselves. (Ken Takata, closes https://github.com/vim/vim/issues/4356)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 07 May 2019 23:00:06 +0200 |
parents | 3fc0f57ecb91 |
children | e1df51f68736 |
rev | line source |
---|---|
7 | 1 " Vim compiler file |
2 " Compiler: Lahey/Fujitsu Fortran 95 | |
3 " URL: http://www.unb.ca/chem/ajit/compiler/fortran_lf95.vim | |
4 " Maintainer: Ajit J. Thakkar (ajit AT unb.ca); <http://www.unb.ca/chem/ajit/> | |
5 " Version: 0.2 | |
6 " Last Change: 2004 Mar 27 | |
7 | |
8 if exists("current_compiler") | |
9 finish | |
10 endif | |
11 let current_compiler = "fortran_lf95" | |
12 | |
13 if exists(":CompilerSet") != 2 " older Vim always used :setlocal | |
14 command -nargs=* CompilerSet setlocal <args> | |
15 endif | |
16 | |
17 let s:cposet=&cpoptions | |
18 set cpoptions-=C | |
19 | |
20 CompilerSet errorformat=\ %#%n-%t:\ \"%f\"\\,\ line\ %l:%m, | |
21 \Error\ LINK\.%n:%m, | |
22 \Warning\ LINK\.%n:%m, | |
23 \%-G%.%# | |
24 CompilerSet makeprg=lf95 | |
25 | |
26 let &cpoptions=s:cposet | |
27 unlet s:cposet |