Mercurial > vim
view runtime/syntax/takout.vim @ 30092:53e7e912eeec v9.0.0382
patch 9.0.0382: freeing the wrong string on failure
Commit: https://github.com/vim/vim/commit/31ea6bf530a814991f669122dbc9921117a862c3
Author: Bram Moolenaar <Bram@vim.org>
Date: Mon Sep 5 10:47:13 2022 +0100
patch 9.0.0382: freeing the wrong string on failure
Problem: Freeing the wrong string on failure.
Solution: Adjust the argument. Reorder the code.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Mon, 05 Sep 2022 12:00:06 +0200 |
parents | 46763b01cd9a |
children |
line wrap: on
line source
" Vim syntax file " Language: TAK2, TAK3, TAK2000 thermal modeling output file " Maintainer: Adrian Nagle, anagle@ball.com " Last Change: 2003 May 11 " Filenames: *.out " URL: http://www.naglenet.org/vim/syntax/takout.vim " MAIN URL: http://www.naglenet.org/vim/ " quit when a syntax file was already loaded if exists("b:current_syntax") finish endif " Ignore case syn case match " Load TAK syntax file runtime! syntax/tak.vim unlet b:current_syntax " " " Begin syntax definitions for tak output files. " " Define keywords for TAK output syn case match syn keyword takoutPos ON SI syn keyword takoutNeg OFF ENG " Define matches for TAK output syn match takoutTitle "TAK III" syn match takoutTitle "Release \d.\d\d" syn match takoutTitle " K & K Associates *Thermal Analysis Kit III *Serial Number \d\d-\d\d\d" syn match takoutFile ": \w*\.TAK"hs=s+2 syn match takoutInteger "T\=[0-9]*\>"ms=s+1 syn match takoutSectionDelim "[-<>]\{4,}" contains=takoutSectionTitle syn match takoutSectionDelim ":\=\.\{4,}:\=" contains=takoutSectionTitle syn match takoutSectionTitle "[-<:] \w[0-9A-Za-z_() ]\+ [->:]"hs=s+1,me=e-1 syn match takoutHeaderDelim "=\{5,}" syn match takoutHeaderDelim "|\{5,}" syn match takoutHeaderDelim "+\{5,}" syn match takoutLabel "Input File:" contains=takoutFile syn match takoutLabel "Begin Solution: Routine" syn match takoutError "<<< Error >>>" " Define the default highlighting " Only when an item doesn't have highlighting yet hi def link takoutPos Statement hi def link takoutNeg PreProc hi def link takoutTitle Type hi def link takoutFile takIncludeFile hi def link takoutInteger takInteger hi def link takoutSectionDelim Delimiter hi def link takoutSectionTitle Exception hi def link takoutHeaderDelim SpecialComment hi def link takoutLabel Identifier hi def link takoutError Error let b:current_syntax = "takout" " vim: ts=8 sw=2