diff options
| author | Glenn Morris | 2010-09-08 09:02:38 -0700 |
|---|---|---|
| committer | Glenn Morris | 2010-09-08 09:02:38 -0700 |
| commit | 5a972c365f4431d75bf3a8d29a938cf89ccac8db (patch) | |
| tree | cba82a64e54719eb5d9a90888c1128456ac93947 | |
| parent | 13639aab35819fbbe0d414e57b955d49c7affd86 (diff) | |
| download | emacs-5a972c365f4431d75bf3a8d29a938cf89ccac8db.tar.gz emacs-5a972c365f4431d75bf3a8d29a938cf89ccac8db.zip | |
Very minor bytecomp fix.
* lisp/emacs-lisp/bytecomp.el (byte-compile-report-ops):
Error if not compiled with -DBYTE_CODE_METER.
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
2 files changed, 5 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 78f6429b181..683c6e6b688 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2010-09-08 Glenn Morris <rgm@gnu.org> | 1 | 2010-09-08 Glenn Morris <rgm@gnu.org> |
| 2 | 2 | ||
| 3 | * emacs-lisp/bytecomp.el (byte-compile-report-ops): | ||
| 4 | Error if not compiled with -DBYTE_CODE_METER. | ||
| 5 | |||
| 3 | * emacs-lisp/bytecomp.el (byte-recompile-directory): | 6 | * emacs-lisp/bytecomp.el (byte-recompile-directory): |
| 4 | Ignore dir-locals-file. | 7 | Ignore dir-locals-file. |
| 5 | 8 | ||
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index b1aa4a32b25..cb1deb9a762 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el | |||
| @@ -4244,6 +4244,8 @@ and corresponding effects." | |||
| 4244 | 4244 | ||
| 4245 | (defvar byte-code-meter) | 4245 | (defvar byte-code-meter) |
| 4246 | (defun byte-compile-report-ops () | 4246 | (defun byte-compile-report-ops () |
| 4247 | (or (boundp 'byte-metering-on) | ||
| 4248 | (error "You must build Emacs with -DBYTE_CODE_METER to use this")) | ||
| 4247 | (with-output-to-temp-buffer "*Meter*" | 4249 | (with-output-to-temp-buffer "*Meter*" |
| 4248 | (set-buffer "*Meter*") | 4250 | (set-buffer "*Meter*") |
| 4249 | (let ((i 0) n op off) | 4251 | (let ((i 0) n op off) |