Mercurial > emacs
view etc/srecode/getset-cpp.srt @ 108739:ae0f7dfcf9c9
* net/tramp.el (tramp-do-copy-or-rename-file)
(tramp-handle-file-local-copy, tramp-maybe-open-connection): Tune
`with-progress-reporter' messages.
(tramp-handle-vc-registered):
* net/tramp-fish.el (tramp-fish-handle-file-local-copy)
(tramp-fish-handle-insert-file-contents)
(tramp-fish-maybe-open-connection):
* net/tramp-gvfs.el (tramp-gvfs-maybe-open-connection):
* net/tramp-imap.el (tramp-imap-do-copy-or-rename-file)
(tramp-imap-handle-insert-file-contents)
(tramp-imap-handle-file-local-copy): Use `with-progress-reporter'.
author | Michael Albinus <michael.albinus@gmx.de> |
---|---|
date | Fri, 21 May 2010 16:16:42 +0200 |
parents | 1d1d5d9bd884 |
children | 376148b31b5e |
line wrap: on
line source
;;; getset-cpp.srt --- SRecode templates for C++ class getter/setters. ;; Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. ;; Author: Eric M. Ludlam <eric@siege-engine.com> ;; This file is part of GNU Emacs. ;; GNU Emacs 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 of the License, or ;; (at your option) any later version. ;; GNU Emacs 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 GNU Emacs. If not, see <http://www.gnu.org/licenses/>. set mode "c++-mode" set application "getset" context declaration template getset-in-class :tag :indent :blank ---- {{>A:classdecl:comment-function-group-start}} {{TYPE}} get{{NICENAME}}() const { return {{NAME}}; } void set{{NICENAME}}({{TYPE}} {{NICENAME}}) { {{NAME}} = {{NICENAME}}; } {{>A:classdecl:comment-function-group-end}} ---- template getset-field :blank :indent ---- {{?TYPE}} f{{?NAME}}; ---- template getset-initializer :indent ---- f{{NAME}}(){{#NOTLAST}},{{/NOTLAST}} ---- ;; end