2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								" CHICKEN-specific Vim customizations
							 | 
						
					
						
							
								
									
										
										
										
											2018-03-09 22:22:21 +01:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								" Last Change: 2018-03-05
							 | 
						
					
						
							
								
									
										
										
										
											2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								" Author: Evan Hanson <evhan@foldling.org>
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								" Maintainer: Evan Hanson <evhan@foldling.org>
							 | 
						
					
						
							
								
									
										
										
										
											2021-08-14 21:25:52 +02:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								" Repository: https://git.foldling.org/vim-scheme.git
							 | 
						
					
						
							
								
									
										
										
										
											2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								" URL: https://foldling.org/vim/ftplugin/chicken.vim
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								" Notes: These are supplemental settings, to be loaded after the core
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								" Scheme ftplugin file (ftplugin/scheme.vim). Enable it by setting
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								" b:is_chicken=1 and filetype=scheme.
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								if !exists('b:did_scheme_ftplugin')
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								  finish
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								endif
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl keywordprg=chicken-doc
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=and-let*
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=compiler-typecase
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=condition-case
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-compiler-syntax
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-constant
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-external
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-for-syntax
							 | 
						
					
						
							
								
									
										
										
										
											2018-03-09 22:22:21 +01:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-foreign-type
							 | 
						
					
						
							
								
									
										
										
										
											2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-inline
							 | 
						
					
						
							
								
									
										
										
										
											2018-03-09 22:22:21 +01:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-location
							 | 
						
					
						
							
								
									
										
										
										
											2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-record
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-record-printer
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=define-specialization
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=fluid-let
							 | 
						
					
						
							
								
									
										
										
										
											2018-03-09 22:22:21 +01:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=foreign-lambda*
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=foreign-primitive
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=foreign-safe-lambda*
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=functor
							 | 
						
					
						
							
								
									
										
										
										
											2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=handle-exceptions
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=let-compiler-syntax
							 | 
						
					
						
							
								
									
										
										
										
											2018-03-09 22:22:21 +01:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=let-location
							 | 
						
					
						
							
								
									
										
										
										
											2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=let-optionals
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=let-optionals*
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=letrec-values
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=match
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=match-let
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=match-let*
							 | 
						
					
						
							
								
									
										
										
										
											2018-03-09 22:22:21 +01:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=match-letrec
							 | 
						
					
						
							
								
									
										
										
										
											2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=module
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=receive
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=set!-values
							 | 
						
					
						
							
								
									
										
										
										
											2018-03-09 22:22:21 +01:00
										 
									 
								 
							 | 
							
								
									
										
									
								
							 | 
							
								
							 | 
							
							
								setl lispwords+=test-group
							 | 
						
					
						
							
								
									
										
										
										
											2018-02-09 22:00:53 +01:00
										 
									 
								 
							 | 
							
								
							 | 
							
								
							 | 
							
							
								
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								let b:undo_ftplugin = b:undo_ftplugin . ' keywordprg<'
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								if exists('g:loaded_matchit') && !exists('b:match_words')
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								  let b:match_words = '#>:<#'
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								  let b:undo_ftplugin = b:undo_ftplugin . ' | unlet! b:match_words'
							 | 
						
					
						
							| 
								
							 | 
							
								
							 | 
							
								
							 | 
							
							
								endif
							 |