Mercurial > vim
view runtime/syntax/gedcom.vim @ 22121:b50610a6aee0 v8.2.1610
patch 8.2.1610: Vim9: cannot pass "true" to list2str() and str2list()
Commit: https://github.com/vim/vim/commit/a48f786787e8e070c1a611146fd1f0f7e141e60a
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Sep 5 20:16:57 2020 +0200
patch 8.2.1610: Vim9: cannot pass "true" to list2str() and str2list()
Problem: Vim9: cannot pass "true" to list2str() and str2list().
Solution: Use tv_get_bool_chk(). (closes https://github.com/vim/vim/issues/6877)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Sat, 05 Sep 2020 20:30:03 +0200 |
| parents | 46763b01cd9a |
| children |
line wrap: on
line source
" 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"