From: Francesco Potortì Date: Tue, 7 Mar 1995 15:24:44 +0000 (+0000) Subject: * cmacexp.el (c-macro-expansion): put the unique string before the X-Git-Tag: emacs-19.34~4927 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=521fffcd6f37b957885965df82deb6d84c15002e;p=emacs.git * cmacexp.el (c-macro-expansion): put the unique string before the first #line directive (instead of after), preceded by a newline. --- diff --git a/lisp/progmodes/cmacexp.el b/lisp/progmodes/cmacexp.el index 46eb72cc548..70969475104 100644 --- a/lisp/progmodes/cmacexp.el +++ b/lisp/progmodes/cmacexp.el @@ -3,7 +3,7 @@ ;; Copyright (C) 1992, 1994 Free Software Foundation, Inc. ;; Author: Francesco Potorti` -;; Version: $Id: cmacexp.el,v 1.17 1994/09/01 11:05:40 pot Exp rms $ +;; Version: $Id: cmacexp.el,v 1.18 1994/09/05 04:33:23 rms Exp pot $ ;; Adapted-By: ESR ;; Keywords: c @@ -291,14 +291,14 @@ Optional arg DISPLAY non-nil means show messages in the echo area." (char-to-string startinstring)) (startincomment "*/") ("")) - (format "\n#line %d \"%s\"\n" startlinenum filename) (setq startmarker - (concat uniquestring + (concat "\n" uniquestring (cond (startinstring (char-to-string startinstring)) (startincomment "/*") (startinbcomment "//")) - (if startafterquote "\\"))))) + (if startafterquote "\\"))) + (format "\n#line %d \"%s\"\n" startlinenum filename))) ;; Call the preprocessor. (if display (message mymsg))