forked from aniani/vim
		
	
		
			
				
	
	
		
			81 lines
		
	
	
		
			3.2 KiB
		
	
	
	
		
			VimL
		
	
	
	
	
	
			
		
		
	
	
			81 lines
		
	
	
		
			3.2 KiB
		
	
	
	
		
			VimL
		
	
	
	
	
	
| " Vim syntax file
 | |
| " Language:	CWEB
 | |
| " Maintainer:	Andreas Scherer <andreas.scherer@pobox.com>
 | |
| " Last Change:	April 30, 2001
 | |
| 
 | |
| " Details of the CWEB language can be found in the article by Donald E. Knuth
 | |
| " and Silvio Levy, "The CWEB System of Structured Documentation", included as
 | |
| " file "cwebman.tex" in the standard CWEB distribution, available for
 | |
| " anonymous ftp at ftp://labrea.stanford.edu/pub/cweb/.
 | |
| 
 | |
| " TODO: Section names and C/C++ comments should be treated as TeX material.
 | |
| " TODO: The current version switches syntax highlighting off for section
 | |
| " TODO: names, and leaves C/C++ comments as such. (On the other hand,
 | |
| " TODO: switching to TeX mode in C/C++ comments might be colour overkill.)
 | |
| 
 | |
| " For version 5.x: Clear all syntax items
 | |
| " For version 6.x: Quit when a syntax file was already loaded
 | |
| if version < 600
 | |
|   syntax clear
 | |
| elseif exists("b:current_syntax")
 | |
|   finish
 | |
| endif
 | |
| 
 | |
| " For starters, read the TeX syntax; TeX syntax items are allowed at the top
 | |
| " level in the CWEB syntax, e.g., in the preamble.  In general, a CWEB source
 | |
| " code can be seen as a normal TeX document with some C/C++ material
 | |
| " interspersed in certain defined regions.
 | |
| if version < 600
 | |
|   source <sfile>:p:h/tex.vim
 | |
| else
 | |
|   runtime! syntax/tex.vim
 | |
|   unlet b:current_syntax
 | |
| endif
 | |
| 
 | |
| " Read the C/C++ syntax too; C/C++ syntax items are treated as such in the
 | |
| " C/C++ section of a CWEB chunk or in inner C/C++ context in "|...|" groups.
 | |
| syntax include @webIncludedC <sfile>:p:h/cpp.vim
 | |
| 
 | |
| " Inner C/C++ context (ICC) should be quite simple as it's comprised of
 | |
| " material in "|...|"; however the naive definition for this region would
 | |
| " hickup at the innocious "\|" TeX macro.  Note: For the time being we expect
 | |
| " that an ICC begins either at the start of a line or after some white space.
 | |
| syntax region webInnerCcontext start="\(^\|[ \t\~`(]\)|" end="|" contains=@webIncludedC,webSectionName,webRestrictedTeX,webIgnoredStuff
 | |
| 
 | |
| " Genuine C/C++ material.  This syntactic region covers both the definition
 | |
| " part and the C/C++ part of a CWEB section; it is ended by the TeX part of
 | |
| " the next section.
 | |
| syntax region webCpart start="@[dfscp<(]" end="@[ \*]" contains=@webIncludedC,webSectionName,webRestrictedTeX,webIgnoredStuff
 | |
| 
 | |
| " Section names contain C/C++ material only in inner context.
 | |
| syntax region webSectionName start="@[<(]" end="@>" contains=webInnerCcontext contained
 | |
| 
 | |
| " The contents of "control texts" is not treated as TeX material, because in
 | |
| " non-trivial cases this completely clobbers the syntax recognition.  Instead,
 | |
| " we highlight these elements as "strings".
 | |
| syntax region webRestrictedTeX start="@[\^\.:t=q]" end="@>" oneline
 | |
| 
 | |
| " Double-@ means single-@, anywhere in the CWEB source.  (This allows e-mail
 | |
| " address <someone@@fsf.org> without going into C/C++ mode.)
 | |
| syntax match webIgnoredStuff "@@"
 | |
| 
 | |
| " Define the default highlighting.
 | |
| " For version 5.7 and earlier: only when not done already
 | |
| " For version 5.8 and later: only when an item doesn't have highlighting yet
 | |
| if version >= 508 || !exists("did_cweb_syntax_inits")
 | |
|   if version < 508
 | |
|     let did_cweb_syntax_inits = 1
 | |
|     command -nargs=+ HiLink hi link <args>
 | |
|   else
 | |
|     command -nargs=+ HiLink hi def link <args>
 | |
|   endif
 | |
| 
 | |
|   HiLink webRestrictedTeX String
 | |
| 
 | |
|   delcommand HiLink
 | |
| endif
 | |
| 
 | |
| let b:current_syntax = "cweb"
 | |
| 
 | |
| " vim: ts=8
 |