unofficial mirror of help-gnu-emacs@gnu.org
 help / color / mirror / Atom feed
From: Emanuel Berg <moasen@zoho.com>
To: help-gnu-emacs@gnu.org
Subject: Re: insert-header-preprocessor-definition
Date: Thu, 12 Apr 2018 00:07:49 +0200	[thread overview]
Message-ID: <86r2nle6ru.fsf@zoho.com> (raw)
In-Reply-To: 87y3htzclf.fsf@bsb.me.uk

Ben Bacarisse wrote:

>> So for color.c, color.h should have
>> H_COLOR_H?
>
> That is safe, yes. Doing it by hand, I think
> most people write H_COLOR but you can't even
> be sure there will be a .h in the name!

(defun insert-header-preprocessor-definition ()
  (interactive)
  (let*((filename (buffer-name))
        (label (upcase (replace-regexp-in-string "\\." "_" filename)))
        (safe-label (concat "H_" label))
        (beg-string (concat
                     "#ifndef " safe-label "\n"
                     "#define " safe-label "\n\n"))
        (end-string "\n#endif") )
    (save-excursion
      (goto-char (point-min))
      (insert beg-string)

      (goto-char (point-max))
      (beginning-of-line)
      (insert end-string) )
    ))
(defalias 'hep #'insert-header-preprocessor-definition)

http://user.it.uu.se/~embe8573/emacs-init/ide/c-and-cpp.el

-- 
underground experts united
http://user.it.uu.se/~embe8573


  reply	other threads:[~2018-04-11 22:07 UTC|newest]

Thread overview: 13+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
     [not found] <86fu429udy.fsf@zoho.com>
2018-04-11 15:47 ` insert-header-preprocessor-definition Ben Bacarisse
2018-04-11 20:41   ` insert-header-preprocessor-definition Emanuel Berg
2018-04-11 20:56     ` insert-header-preprocessor-definition Ben Bacarisse
2018-04-11 22:07       ` Emanuel Berg [this message]
2018-04-14 23:54       ` insert-header-preprocessor-definition Emanuel Berg
2018-04-15  1:02         ` insert-header-preprocessor-definition Ben Bacarisse
2018-04-15  7:44           ` insert-header-preprocessor-definition Yuri Khan
2018-04-15 19:35           ` insert-header-preprocessor-definition Emanuel Berg
2018-04-15 21:10             ` insert-header-preprocessor-definition Ben Bacarisse
2018-04-15 21:45               ` insert-header-preprocessor-definition Emanuel Berg
     [not found]           ` <mailman.12420.1523778312.27995.help-gnu-emacs@gnu.org>
2018-04-15 19:46             ` insert-header-preprocessor-definition Emanuel Berg
2018-04-16  5:35               ` insert-header-preprocessor-definition Yuri Khan
     [not found]               ` <mailman.12486.1523856961.27995.help-gnu-emacs@gnu.org>
2018-04-16  6:16                 ` insert-header-preprocessor-definition Emanuel Berg

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=86r2nle6ru.fsf@zoho.com \
    --to=moasen@zoho.com \
    --cc=help-gnu-emacs@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).