wolfgang@MGM.MIT.EDU (06/01/89)
In GNU Emacs 18.54.3 of Fri May 19 1989 on Sun3 (berkeley-unix) The c-macro-expand tries too hard to be efficient... ---example file--- #define foo(x) (x \ x \ x) foo(hello) ---end example file--- produces: (hello instead of: (hello hello hello) "The expansion would be entirely correct if it used the C preprocessor." ;-) -wolfgang --- Wolfgang Rupprecht ARPA: wolfgang@mgm.mit.edu (IP 18.82.0.114) TEL: (703) 768-2640 UUCP: mit-eddie!mgm.mit.edu!wolfgang diff -c cmacexp.el.~1~ cmacexp.el *** cmacexp.el.~1~ Wed May 31 15:29:32 1989 --- cmacexp.el Wed May 31 15:49:56 1989 *************** *** 18,26 **** (goto-char beg) (beginning-of-line) (setq last-needed (point)) ! (if (re-search-backward "^[ \t]*#" nil t) ! (progn (forward-line 1) ! (setq last-needed (point))))) (write-region (point-min) last-needed tempfile nil 'nomsg) (process-send-string process (concat "#include \"" tempfile "\"\n")) (process-send-string process "\n") --- 18,27 ---- (goto-char beg) (beginning-of-line) (setq last-needed (point)) ! ;;(if (re-search-backward "^[ \t]*#" nil t) ! ;; (progn (forward-line 1) ! ;; (setq last-needed (point)))) ! ) (write-region (point-min) last-needed tempfile nil 'nomsg) (process-send-string process (concat "#include \"" tempfile "\"\n")) (process-send-string process "\n") diff exited abnormally with code 1