view runtime/syntax/dcd.vim @ 33988:7c30841c60a0 v9.0.2180

patch 9.0.2180: POSIX function name in exarg causes issues Commit: https://github.com/vim/vim/commit/6fdb6280821a822768df5689a5d727e37d38306c Author: Zoltan Arpadffy <zoltan.arpadffy@gmail.com> Date: Tue Dec 19 20:53:07 2023 +0100 patch 9.0.2180: POSIX function name in exarg causes issues Problem: POSIX function name in exarg struct causes issues on OpenVMS Solution: Rename getline member in exarg struct to ea_getline, remove isinf() workaround for VMS There are compilers that do not treat well POSIX functions - like getline - usage in the structs. Older VMS compilers could digest this... but the newer OpenVMS compilers ( like VSI C x86-64 X7.4-843 (GEM 50XB9) ) cannot deal with these structs. This could be limited to getline() that is defined via getdelim() and might not affect all POSIX functions in general - but avoiding POSIX function names usage in the structs is a "safe side" practice without compromising the functionality or the code readability. The previous OpenVMS X86 port used a workaround limiting the compiler capabilities using __CRTL_VER_OVERRIDE=80400000 In order to make the OpenVMS port future proof, this pull request proposes a possible solution. closes: #13704 Signed-off-by: Zoltan Arpadffy <zoltan.arpadffy@gmail.com> Signed-off-by: Christian Brabandt <cb@256bit.org>
author Christian Brabandt <cb@256bit.org>
date Tue, 19 Dec 2023 21:00:04 +0100
parents 46763b01cd9a
children
line wrap: on
line source

" Vim syntax file
" Language:	WildPackets EtherPeek Decoder (.dcd) file
" Maintainer:	Christopher Shinn <christopher@lucent.com>
" Last Change:	2003 Apr 25

" quit when a syntax file was already loaded
if exists("b:current_syntax")
  finish
endif

" Keywords
syn keyword dcdFunction		DCod TRTS TNXT CRLF
syn match   dcdFunction		display "\(STR\)\#"
syn keyword dcdLabel		LABL
syn region  dcdLabel		start="[A-Z]" end=";"
syn keyword dcdConditional	CEQU CNEQ CGTE CLTE CBIT CLSE
syn keyword dcdConditional	LSTS LSTE LSTZ
syn keyword dcdConditional	TYPE TTST TEQU TNEQ TGTE TLTE TBIT TLSE TSUB SKIP
syn keyword dcdConditional	MARK WHOA
syn keyword dcdConditional	SEQU SNEQ SGTE SLTE SBIT
syn match   dcdConditional	display "\(CST\)\#" "\(TST\)\#"
syn keyword dcdDisplay		HBIT DBIT BBIT
syn keyword dcdDisplay		HBYT DBYT BBYT
syn keyword dcdDisplay		HWRD DWRD BWRD
syn keyword dcdDisplay		HLNG DLNG BLNG
syn keyword dcdDisplay		D64B
syn match   dcdDisplay		display "\(HEX\)\#" "\(CHR\)\#" "\(EBC\)\#"
syn keyword dcdDisplay		HGLB DGLB BGLB
syn keyword dcdDisplay		DUMP
syn keyword dcdStatement	IPLG IPV6 ATLG AT03 AT01 ETHR TRNG PRTO PORT
syn keyword dcdStatement	TIME OSTP PSTR CSTR NBNM DMPE FTPL CKSM FCSC
syn keyword dcdStatement	GBIT GBYT GWRD GLNG
syn keyword dcdStatement	MOVE ANDG ORRG NOTG ADDG SUBG MULG DIVG MODG INCR DECR
syn keyword dcdSpecial		PRV1 PRV2 PRV3 PRV4 PRV5 PRV6 PRV7 PRV8

" Comment
syn region  dcdComment		start="\*" end="\;"

" Define the default highlighting.
" Only when an item doesn't have highlighting yet

hi def link dcdFunction		Identifier
hi def link dcdLabel		Constant
hi def link dcdConditional		Conditional
hi def link dcdDisplay		Type
hi def link dcdStatement		Statement
hi def link dcdSpecial		Special
hi def link dcdComment		Comment


let b:current_syntax = "dcd"