changeset 8679:ccfc2ca24a90

* cmacexp.el (c-macro-prompt-flag): set default to t. (c-macro-expand): buffer-flush-undo is outdated. (c-macro-expansion): make exit-status a local variable.
author Francesco Potortì <pot@gnu.org>
date Thu, 01 Sep 1994 11:05:40 +0000
parents 0107ce4d48af
children 8033d712ae38
files lisp/progmodes/cmacexp.el
diffstat 1 files changed, 5 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/cmacexp.el	Thu Sep 01 06:12:38 1994 +0000
+++ b/lisp/progmodes/cmacexp.el	Thu Sep 01 11:05:40 1994 +0000
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1992, 1994 Free Software Foundation, Inc.
 
 ;; Author: Francesco Potorti` <pot@cnuce.cnr.it>
-;; Version: $Id: cmacexp.el,v 1.15 1994/08/07 17:23:44 rms Exp rms $
+;; Version: $Id: cmacexp.el,v 1.17 1994/09/01 10:35:52 pot Exp pot $
 ;; Adapted-By: ESR
 ;; Keywords: c
 
@@ -66,7 +66,7 @@
 
 ;; IMPROVEMENTS OVER emacs 18.xx cmacexp.el ==========================
 
-;; - A lot of user visible changes.  See above.
+;; - A lot of user and programmer visible changes.  See above.
 ;; - #line directives are inserted, so __LINE__ and __FILE__ are
 ;;   correctly expanded.  Works even with START inside a string, a
 ;;   comment or a region #ifdef'd away by cpp. cpp is invoked with -C,
@@ -90,7 +90,7 @@
 (defvar c-macro-shrink-window-flag nil
   "*Non-nil means shrink the *Macroexpansion* window to fit its contents.")
 
-(defvar c-macro-prompt-flag nil
+(defvar c-macro-prompt-flag t
   "*Non-nil makes `c-macro-expand' prompt for preprocessor arguments.")
 
 (defvar c-macro-preprocessor "/lib/cpp -C"
@@ -150,7 +150,7 @@
 	      (exchange-point-and-mark)))
       (set-buffer displaybuf)
       (setq buffer-read-only nil)
-      (buffer-flush-undo displaybuf)
+      (buffer-disable-undo displaybuf)
       (erase-buffer)
       (insert expansion)
       (set-buffer-modified-p nil)
@@ -240,6 +240,7 @@
 	(linenum 0)
 	(startstat ())
 	(startmarker "")
+	(exit-status 0)
 	(tempname (make-temp-name "/tmp/")))
     (unwind-protect
 	(save-excursion