Mercurial > vim
view runtime/syntax/dune.vim @ 34651:d299b4b3099f v9.1.0210
patch 9.1.0210: Motif: leaking memory when mui_mch_dialog() fails
Commit: https://github.com/vim/vim/commit/9ccc2972373c8310c20ae7621b9c634d0dc43e26
Author: Christian Brabandt <cb@256bit.org>
Date: Tue Mar 26 18:44:48 2024 +0100
patch 9.1.0210: Motif: leaking memory when mui_mch_dialog() fails
Problem: Motif: leaking memory when mui_mch_dialog() fails
(LuMingYinDetect)
Solution: When allocating the label using the XmStringCreateLtoR()
function fails, before returning also free the allocated
buttons pointer.
fixes: #14247
closes: #14280
Signed-off-by: Christian Brabandt <cb@256bit.org>
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Tue, 26 Mar 2024 19:00:03 +0100 |
parents | 15fa3923cc49 |
children | 7270e1122962 |
line wrap: on
line source
" Vim syntax file " Language: Dune buildsystem " Maintainer: Markus Mottl <markus.mottl@gmail.com> " Anton Kochkov <anton.kochkov@gmail.com> " URL: https://github.com/ocaml/vim-ocaml " Last Change: " 2019 Feb 27 - Add newer keywords to the syntax (Simon Cruanes) " 2018 May 8 - Check current_syntax (Kawahara Satoru) " 2018 Mar 29 - Extend jbuild syntax with more keywords (Petter A. Urkedal) " 2017 Sep 6 - Initial version (Etienne Millon) if exists("b:current_syntax") finish endif set syntax=lisp syn case match " The syn-iskeyword setting lacks #,? from the iskeyword setting here. " Clearing it avoids maintaining keyword characters in multiple places. syn iskeyword clear syn keyword lispDecl jbuild_version library executable executables rule ocamllex ocamlyacc menhir alias install syn keyword lispKey name public_name synopsis modules libraries wrapped syn keyword lispKey preprocess preprocessor_deps optional c_names cxx_names syn keyword lispKey install_c_headers modes no_dynlink self_build_stubs_archive syn keyword lispKey ppx_runtime_libraries virtual_deps js_of_ocaml link_flags syn keyword lispKey javascript_files flags ocamlc_flags ocamlopt_flags pps staged_pps syn keyword lispKey library_flags c_flags c_library_flags kind package action syn keyword lispKey deps targets locks fallback syn keyword lispKey inline_tests tests test names syn keyword lispAtom true false syn keyword lispFunc cat chdir copy# diff? echo run setenv syn keyword lispFunc ignore-stdout ignore-stderr ignore-outputs syn keyword lispFunc with-stdout-to with-stderr-to with-outputs-to syn keyword lispFunc write-file system bash syn cluster lispBaseListCluster add=duneVar syn match duneVar '\${[@<^]}' containedin=lispSymbol syn match duneVar '\${\k\+\(:\k\+\)\?}' containedin=lispSymbol hi def link duneVar Identifier let b:current_syntax = "dune"