diff options
| author | Richard M. Stallman | 1998-02-02 01:21:18 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-02-02 01:21:18 +0000 |
| commit | 74dfd056e487f4073f713a46cc89d4a7f39e8400 (patch) | |
| tree | 72eee8c3eed3ebc960fa1091970c6cb68c73a695 | |
| parent | 0b33ec466a843e68cbee19dd56a568bcdaf8637c (diff) | |
| download | emacs-74dfd056e487f4073f713a46cc89d4a7f39e8400.tar.gz emacs-74dfd056e487f4073f713a46cc89d4a7f39e8400.zip | |
(byte-compile-from-buffer): Bind edebug-all-defs and edebug-all-forms to nil.
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 15e2d672525..51f7aa307be 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el | |||
| @@ -4,13 +4,12 @@ | |||
| 4 | 4 | ||
| 5 | ;; Author: Jamie Zawinski <jwz@lucid.com> | 5 | ;; Author: Jamie Zawinski <jwz@lucid.com> |
| 6 | ;; Hallvard Furuseth <hbf@ulrik.uio.no> | 6 | ;; Hallvard Furuseth <hbf@ulrik.uio.no> |
| 7 | ;; Maintainer: FSF | ||
| 7 | ;; Keywords: lisp | 8 | ;; Keywords: lisp |
| 8 | 9 | ||
| 9 | ;; Subsequently modified by RMS. | ||
| 10 | |||
| 11 | ;;; This version incorporates changes up to version 2.10 of the | 10 | ;;; This version incorporates changes up to version 2.10 of the |
| 12 | ;;; Zawinski-Furuseth compiler. | 11 | ;;; Zawinski-Furuseth compiler. |
| 13 | (defconst byte-compile-version "$Revision: 2.35 $") | 12 | (defconst byte-compile-version "$Revision: 2.36 $") |
| 14 | 13 | ||
| 15 | ;; This file is part of GNU Emacs. | 14 | ;; This file is part of GNU Emacs. |
| 16 | 15 | ||
| @@ -1381,6 +1380,10 @@ With argument, insert value in current buffer after the form." | |||
| 1381 | (case-fold-search nil) | 1380 | (case-fold-search nil) |
| 1382 | (print-length nil) | 1381 | (print-length nil) |
| 1383 | (print-level nil) | 1382 | (print-level nil) |
| 1383 | ;; Prevent edebug from interfering when we compile | ||
| 1384 | ;; and put the output into a file. | ||
| 1385 | (edebug-all-defs nil) | ||
| 1386 | (edebug-all-forms nil) | ||
| 1384 | ;; Simulate entry to byte-compile-top-level | 1387 | ;; Simulate entry to byte-compile-top-level |
| 1385 | (byte-compile-constants nil) | 1388 | (byte-compile-constants nil) |
| 1386 | (byte-compile-variables nil) | 1389 | (byte-compile-variables nil) |