Mercurial > vim
view runtime/syntax/snnspat.vim @ 7564:aee06f1762e0 v7.4.1082
commit https://github.com/vim/vim/commit/858b96f382eeb8f1eab5100639e7b09523a6a2a1
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Jan 10 16:12:24 2016 +0100
patch 7.4.1082
Problem: The Tcl interface is always skipping memory free on exit.
Solution: Only skip for dynamically loaded Tcl.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sun, 10 Jan 2016 16:15:06 +0100 |
parents | b7811ab264bf |
children | 43efa4f5a8ea |
line wrap: on
line source
" Vim syntax file " Language: SNNS pattern file " Maintainer: Davide Alberani <alberanid@bigfoot.com> " Last Change: 2012 Feb 03 by Thilo Six " Version: 0.2 " URL: http://digilander.iol.it/alberanid/vim/syntax/snnspat.vim " " SNNS http://www-ra.informatik.uni-tuebingen.de/SNNS/ " is a simulator for neural networks. if version < 600 syntax clear elseif exists("b:current_syntax") finish endif let s:cpo_save = &cpo set cpo&vim " anything that isn't part of the header, a comment or a number " is wrong syn match snnspatError ".*" " hoping that matches any kind of notation... syn match snnspatAccepted "\([-+]\=\(\d\+\.\|\.\)\=\d\+\([Ee][-+]\=\d\+\)\=\)" syn match snnspatAccepted "\s" syn match snnspatBrac "\[\s*\d\+\(\s\|\d\)*\]" contains=snnspatNumbers " the accepted fields in the header syn match snnspatNoHeader "No\. of patterns\s*:\s*" contained syn match snnspatNoHeader "No\. of input units\s*:\s*" contained syn match snnspatNoHeader "No\. of output units\s*:\s*" contained syn match snnspatNoHeader "No\. of variable input dimensions\s*:\s*" contained syn match snnspatNoHeader "No\. of variable output dimensions\s*:\s*" contained syn match snnspatNoHeader "Maximum input dimensions\s*:\s*" contained syn match snnspatNoHeader "Maximum output dimensions\s*:\s*" contained syn match snnspatGen "generated at.*" contained contains=snnspatNumbers syn match snnspatGen "SNNS pattern definition file [Vv]\d\.\d" contained contains=snnspatNumbers " the header, what is not an accepted field, is an error syn region snnspatHeader start="^SNNS" end="^\s*[-+\.]\=[0-9#]"me=e-2 contains=snnspatNoHeader,snnspatNumbers,snnspatGen,snnspatBrac " numbers inside the header syn match snnspatNumbers "\d" contained syn match snnspatComment "#.*$" contains=snnspatTodo syn keyword snnspatTodo TODO XXX FIXME contained if version >= 508 || !exists("did_snnspat_syn_inits") if version < 508 let did_snnspat_syn_inits = 1 command -nargs=+ HiLink hi link <args> else command -nargs=+ HiLink hi def link <args> endif HiLink snnspatGen Statement HiLink snnspatHeader Error HiLink snnspatNoHeader Define HiLink snnspatNumbers Number HiLink snnspatComment Comment HiLink snnspatError Error HiLink snnspatTodo Todo HiLink snnspatAccepted NONE HiLink snnspatBrac NONE delcommand HiLink endif let b:current_syntax = "snnspat" let &cpo = s:cpo_save unlet s:cpo_save " vim: ts=8 sw=2