Mercurial > vim
annotate runtime/syntax/opl.vim @ 17659:121bdff812b4 v8.1.1827
patch 8.1.1827: allocating more memory than needed for extended structs
commit https://github.com/vim/vim/commit/47ed553fd5bebfc36eb8aa81686eeaa5a84eccac
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Aug 8 20:49:14 2019 +0200
patch 8.1.1827: allocating more memory than needed for extended structs
Problem: Allocating more memory than needed for extended structs.
Solution: Use offsetof() instead of sizeof(). (Dominique Pelle,
closes #4786)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Thu, 08 Aug 2019 21:00:07 +0200 |
| parents | 46763b01cd9a |
| children |
| rev | line source |
|---|---|
| 7 | 1 " Vim syntax file |
| 2 " Language: OPL | |
| 3 " Maintainer: Czo <Olivier.Sirol@lip6.fr> | |
| 3312 | 4 " Last Change: 2012 Feb 03 by Thilo Six |
| 2034 | 5 " $Id: opl.vim,v 1.1 2004/06/13 17:34:11 vimboss Exp $ |
| 7 | 6 |
| 7 " Open Psion Language... (EPOC16/EPOC32) | |
| 8 | |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
3312
diff
changeset
|
9 " quit when a syntax file was already loaded |
|
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
3312
diff
changeset
|
10 if exists("b:current_syntax") |
| 7 | 11 finish |
| 12 endif | |
| 13 | |
| 3312 | 14 let s:cpo_save = &cpo |
| 15 set cpo&vim | |
| 16 | |
| 7 | 17 " case is not significant |
| 18 syn case ignore | |
| 19 | |
| 20 " A bunch of useful OPL keywords | |
| 21 syn keyword OPLStatement proc endp abs acos addr adjustalloc alert alloc app | |
| 22 syn keyword OPLStatement append appendsprite asc asin at atan back beep | |
| 23 syn keyword OPLStatement begintrans bookmark break busy byref cache | |
| 24 syn keyword OPLStatement cachehdr cacherec cachetidy call cancel caption | |
| 25 syn keyword OPLStatement changesprite chr$ clearflags close closesprite cls | |
| 26 syn keyword OPLStatement cmd$ committrans compact compress const continue | |
| 27 syn keyword OPLStatement copy cos count create createsprite cursor | |
| 28 syn keyword OPLStatement datetosecs datim$ day dayname$ days daystodate | |
| 29 syn keyword OPLStatement dbuttons dcheckbox dchoice ddate declare dedit | |
| 30 syn keyword OPLStatement deditmulti defaultwin deg delete dfile dfloat | |
| 31 syn keyword OPLStatement dialog diaminit diampos dinit dir$ dlong do dow | |
| 32 syn keyword OPLStatement dposition drawsprite dtext dtime dxinput edit else | |
| 33 syn keyword OPLStatement elseif enda endif endv endwh entersend entersend0 | |
| 34 syn keyword OPLStatement eof erase err err$ errx$ escape eval exist exp ext | |
| 35 syn keyword OPLStatement external find findfield findlib first fix$ flags | |
| 36 syn keyword OPLStatement flt font freealloc gat gborder gbox gbutton | |
| 37 syn keyword OPLStatement gcircle gclock gclose gcls gcolor gcopy gcreate | |
| 38 syn keyword OPLStatement gcreatebit gdrawobject gellipse gen$ get get$ | |
| 39 syn keyword OPLStatement getcmd$ getdoc$ getevent getevent32 geteventa32 | |
| 40 syn keyword OPLStatement geteventc getlibh gfill gfont ggmode ggrey gheight | |
| 41 syn keyword OPLStatement gidentity ginfo ginfo32 ginvert giprint glineby | |
| 42 syn keyword OPLStatement glineto gloadbit gloadfont global gmove gorder | |
| 43 syn keyword OPLStatement goriginx goriginy goto gotomark gpatt gpeekline | |
| 44 syn keyword OPLStatement gpoly gprint gprintb gprintclip grank gsavebit | |
| 45 syn keyword OPLStatement gscroll gsetpenwidth gsetwin gstyle gtmode gtwidth | |
| 46 syn keyword OPLStatement gunloadfont gupdate guse gvisible gwidth gx | |
| 47 syn keyword OPLStatement gxborder gxprint gy hex$ hour iabs icon if include | |
| 48 syn keyword OPLStatement input insert int intf intrans key key$ keya keyc | |
| 49 syn keyword OPLStatement killmark kmod last lclose left$ len lenalloc | |
| 50 syn keyword OPLStatement linklib ln loadlib loadm loc local lock log lopen | |
| 51 syn keyword OPLStatement lower$ lprint max mcard mcasc mean menu mid$ min | |
| 52 syn keyword OPLStatement minit minute mkdir modify month month$ mpopup | |
| 53 syn keyword OPLStatement newobj newobjh next notes num$ odbinfo off onerr | |
| 54 syn keyword OPLStatement open openr opx os parse$ path pause peek pi | |
| 55 syn keyword OPLStatement pointerfilter poke pos position possprite print | |
| 56 syn keyword OPLStatement put rad raise randomize realloc recsize rename | |
| 57 syn keyword OPLStatement rept$ return right$ rmdir rnd rollback sci$ screen | |
| 58 syn keyword OPLStatement screeninfo second secstodate send setdoc setflags | |
| 59 syn keyword OPLStatement setname setpath sin space sqr statuswin | |
| 60 syn keyword OPLStatement statwininfo std stop style sum tan testevent trap | |
| 61 syn keyword OPLStatement type uadd unloadlib unloadm until update upper$ | |
| 62 syn keyword OPLStatement use usr usr$ usub val var vector week while year | |
| 63 " syn keyword OPLStatement rem | |
| 64 | |
| 65 | |
| 66 syn match OPLNumber "\<\d\+\>" | |
| 67 syn match OPLNumber "\<\d\+\.\d*\>" | |
| 68 syn match OPLNumber "\.\d\+\>" | |
| 69 | |
| 70 syn region OPLString start=+"+ end=+"+ | |
| 71 syn region OPLComment start="REM[\t ]" end="$" | |
| 72 syn match OPLMathsOperator "-\|=\|[:<>+\*^/\\]" | |
| 73 | |
| 74 " Define the default highlighting. | |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
3312
diff
changeset
|
75 " Only when an item doesn't have highlighting yet |
| 7 | 76 |
|
10051
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
77 hi def link OPLStatement Statement |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
78 hi def link OPLNumber Number |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
79 hi def link OPLString String |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
80 hi def link OPLComment Comment |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
81 hi def link OPLMathsOperator Conditional |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
82 " hi def link OPLError Error |
| 7 | 83 |
| 84 | |
| 85 let b:current_syntax = "opl" | |
| 86 | |
| 3312 | 87 let &cpo = s:cpo_save |
| 88 unlet s:cpo_save | |
| 7 | 89 " vim: ts=8 |