| " Vim syntax file |
| " Language: Gedcom |
| " Maintainer: Paul Johnson (pjcj@transeda.com) |
| " Version 1.059 - 23rd December 1999 |
| |
| " quit when a syntax file was already loaded |
| if exists("b:current_syntax") |
| finish |
| endif |
| |
| syntax case match |
| |
| syntax keyword gedcom_record ABBR ADDR ADOP ADR1 ADR2 AFN AGE AGNC ALIA ANCE |
| syntax keyword gedcom_record ANCI ANUL ASSO AUTH BAPL BAPM BARM BASM BIRT BLES |
| syntax keyword gedcom_record BLOB BURI CALN CAST CAUS CENS CHAN CHAR CHIL CHR |
| syntax keyword gedcom_record CHRA CITY CONC CONF CONL CONT COPR CORP CREM CTRY |
| syntax keyword gedcom_record DATA DEAT DESC DESI DEST DIV DIVF DSCR EDUC EMIG |
| syntax keyword gedcom_record ENDL ENGA EVEN FAM FAMC FAMF FAMS FCOM FILE FORM |
| syntax keyword gedcom_record GEDC GIVN GRAD HEAD HUSB IDNO IMMI INDI LANG MARB |
| syntax keyword gedcom_record MARC MARL MARR MARS MEDI NATI NATU NCHI NICK NMR |
| syntax keyword gedcom_record NOTE NPFX NSFX OBJE OCCU ORDI ORDN PAGE PEDI PHON |
| syntax keyword gedcom_record PLAC POST PROB PROP PUBL QUAY REFN RELA RELI REPO |
| syntax keyword gedcom_record RESI RESN RETI RFN RIN ROLE SEX SLGC SLGS SOUR |
| syntax keyword gedcom_record SPFX SSN STAE STAT SUBM SUBN SURN TEMP TEXT TIME |
| syntax keyword gedcom_record TITL TRLR TYPE VERS WIFE WILL |
| syntax keyword gedcom_record DATE nextgroup=gedcom_date |
| syntax keyword gedcom_record NAME nextgroup=gedcom_name |
| |
| syntax case ignore |
| |
| syntax region gedcom_id start="@" end="@" oneline contains=gedcom_ii, gedcom_in |
| syntax match gedcom_ii "\I\+" contained nextgroup=gedcom_in |
| syntax match gedcom_in "\d\+" contained |
| syntax region gedcom_name start="" end="$" skipwhite oneline contains=gedcom_cname, gedcom_surname contained |
| syntax match gedcom_cname "\i\+" contained |
| syntax match gedcom_surname "/\(\i\|\s\)*/" contained |
| syntax 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. |
| " Only when an item doesn't have highlighting yet |
| |
| hi def link gedcom_record Statement |
| hi def link gedcom_id Comment |
| hi def link gedcom_ii PreProc |
| hi def link gedcom_in Type |
| hi def link gedcom_name PreProc |
| hi def link gedcom_cname Type |
| hi def link gedcom_surname Identifier |
| hi def link gedcom_date Constant |
| |
| |
| let b:current_syntax = "gedcom" |