Index: emacs/lisp/progmodes/cc-mode.el
diff -c emacs/lisp/progmodes/cc-mode.el:1.38
emacs/lisp/progmodes/cc-mode.el:1.39
*** emacs/lisp/progmodes/cc-mode.el:1.38 Sun May 1 22:52:29 2005
--- emacs/lisp/progmodes/cc-mode.el Mon May 2 00:28:20 2005
***************
*** 640,655 ****
;;;###autoload (add-to-list 'auto-mode-alist '("\\.lex\\'" . c-mode))
(defvar cc-define-alist nil "Alist of #define directives for GUD tooltips.")
- (defvar cc-mode-cpp-program "gcc -E"
- "*The program name for the CPP pre-processor.")
(defun cc-create-define-alist ()
(let* ((file (buffer-file-name))
(output
(with-output-to-string
(with-current-buffer standard-output
! (call-process cc-mode-cpp-program
! (if (file-exists-p file) file nil) t nil "-dM"))))
(define-list (split-string output "\n" t))
(name))
(setq cc-define-alist nil)
--- 640,654 ----
;;;###autoload (add-to-list 'auto-mode-alist '("\\.lex\\'" . c-mode))
(defvar cc-define-alist nil "Alist of #define directives for GUD tooltips.")
(defun cc-create-define-alist ()
(let* ((file (buffer-file-name))
(output
(with-output-to-string
(with-current-buffer standard-output
! (call-process shell-file-name
! (if (file-exists-p file) file nil)
! (list t nil) nil "-c" cc-define-list-program))))
(define-list (split-string output "\n" t))
(name))
(setq cc-define-alist nil)
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
