66 lines · 2.6 KB · Text
RawDownload
" Vim syntax file" Language:	Gedcom" Maintainer:	Paul Johnson (pjcj@transeda.com)" Version 1.059 - 23rd December 1999 " For version 5.x: Clear all syntax items" For version 6.x: Quit when a syntax file was already loadedif version < 600  syntax clearelseif exists("b:current_syntax")  finishendif syntax case match syntax keyword gedcom_record ABBR ADDR ADOP ADR1 ADR2 AFN AGE AGNC ALIA ANCEsyntax keyword gedcom_record ANCI ANUL ASSO AUTH BAPL BAPM BARM BASM BIRT BLESsyntax keyword gedcom_record BLOB BURI CALN CAST CAUS CENS CHAN CHAR CHIL CHRsyntax keyword gedcom_record CHRA CITY CONC CONF CONL CONT COPR CORP CREM CTRYsyntax keyword gedcom_record DATA DEAT DESC DESI DEST DIV DIVF DSCR EDUC EMIGsyntax keyword gedcom_record ENDL ENGA EVEN FAM FAMC FAMF FAMS FCOM FILE FORMsyntax keyword gedcom_record GEDC GIVN GRAD HEAD HUSB IDNO IMMI INDI LANG MARBsyntax keyword gedcom_record MARC MARL MARR MARS MEDI NATI NATU NCHI NICK NMRsyntax keyword gedcom_record NOTE NPFX NSFX OBJE OCCU ORDI ORDN PAGE PEDI PHONsyntax keyword gedcom_record PLAC POST PROB PROP PUBL QUAY REFN RELA RELI REPOsyntax keyword gedcom_record RESI RESN RETI RFN RIN ROLE SEX SLGC SLGS SOURsyntax keyword gedcom_record SPFX SSN STAE STAT SUBM SUBN SURN TEMP TEXT TIMEsyntax keyword gedcom_record TITL TRLR TYPE VERS WIFE WILLsyntax keyword gedcom_record DATE nextgroup=gedcom_datesyntax keyword gedcom_record NAME nextgroup=gedcom_name syntax case ignore syntax region gedcom_id start="@" end="@" oneline contains=gedcom_ii, gedcom_insyntax match gedcom_ii "\I\+" contained nextgroup=gedcom_insyntax match gedcom_in "\d\+" containedsyntax region gedcom_name start="" end="$" skipwhite oneline contains=gedcom_cname, gedcom_surname containedsyntax match gedcom_cname "\i\+" containedsyntax match gedcom_surname "/\(\i\|\s\)*/" containedsyntax match gedcom_date "\d\{1,2}\s\+\(jan\|feb\|mar\|apr\|may\|jun\|jul\|aug\|sep\|oct\|nov\|dec\)\s\+\d\+"syntax match gedcom_date ".*" contained " Define the default highlighting." For version 5.7 and earlier: only when not done already" For version 5.8 and later: only when an item doesn't have highlighting yetif version >= 508 || !exists("did_gedcom_syntax_inits")  if version < 508    let did_gedcom_syntax_inits = 1    command -nargs=+ HiLink hi link <args>  else    command -nargs=+ HiLink hi def link <args>  endif   HiLink gedcom_record Statement  HiLink gedcom_id Comment  HiLink gedcom_ii PreProc  HiLink gedcom_in Type  HiLink gedcom_name PreProc  HiLink gedcom_cname Type  HiLink gedcom_surname Identifier  HiLink gedcom_date Constant   delcommand HiLinkendif let b:current_syntax = "gedcom"