[Emacs-diffs] Changes to emacs/lisp/progmodes/cc-mode.el

[Nick Roberts]

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)