52 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
		
		
			
		
	
	
			52 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
|   | ;;; poly-C.el --- Popymodes for C and C++ | ||
|  | ;; | ||
|  | ;; Filename: poly-C.el | ||
|  | ;; Author: Spinu Vitalie | ||
|  | ;; Maintainer: Spinu Vitalie | ||
|  | ;; Copyright (C) 2013-2014, Spinu Vitalie, all rights reserved. | ||
|  | ;; Version: 1.0 | ||
|  | ;; URL: https://github.com/vitoshka/polymode | ||
|  | ;; Keywords: emacs | ||
|  | ;; | ||
|  | ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | ||
|  | ;; | ||
|  | ;; This file is *NOT* part of GNU Emacs. | ||
|  | ;; | ||
|  | ;; This program is free software; you can redistribute it and/or | ||
|  | ;; modify it under the terms of the GNU General Public License as | ||
|  | ;; published by the Free Software Foundation; either version 3, or | ||
|  | ;; (at your option) any later version. | ||
|  | ;; | ||
|  | ;; This program is distributed in the hope that it will be useful, | ||
|  | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
|  | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU | ||
|  | ;; General Public License for more details. | ||
|  | ;; | ||
|  | ;; You should have received a copy of the GNU General Public License | ||
|  | ;; along with this program; see the file COPYING.  If not, write to | ||
|  | ;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth | ||
|  | ;; Floor, Boston, MA 02110-1301, USA. | ||
|  | ;; | ||
|  | ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | ||
|  | 
 | ||
|  | (require 'polymode) | ||
|  | 
 | ||
|  | (require 'poly-noweb) | ||
|  | 
 | ||
|  | (defcustom pm-poly/noweb+c | ||
|  |   (clone pm-poly/noweb | ||
|  |          :innermode 'pm-inner/noweb+c) | ||
|  |   "Noweb polymode for c" | ||
|  |   :group 'polymodes | ||
|  |   :type 'object) | ||
|  | 
 | ||
|  | (defcustom pm-inner/noweb+c | ||
|  |   (clone pm-inner/noweb | ||
|  |          :mode 'c-mode) | ||
|  |   "Noweb innermode for C" | ||
|  |   :group 'innermodes | ||
|  |   :type 'object) | ||
|  | 
 | ||
|  | ;;;###autoload  (autoload 'poly-noweb+c-mode "poly-c") | ||
|  | (define-polymode poly-noweb+c-mode pm-poly/noweb+c :lighter " PM-Cnw") |