diff options
| author | Vibhav Pant | 2017-01-21 11:37:20 +0530 |
|---|---|---|
| committer | Vibhav Pant | 2017-01-21 11:37:20 +0530 |
| commit | 23a130ee0d61fc39cee157921679809017a02b39 (patch) | |
| tree | 215731b601396ec1aadc13c04f34e11774931ced | |
| parent | fbe6b90b0ced594cf74d5fd0dc9a32666f0d7d38 (diff) | |
| download | emacs-23a130ee0d61fc39cee157921679809017a02b39.tar.gz emacs-23a130ee0d61fc39cee157921679809017a02b39.zip | |
* lisp/emacs-lisp/bytecomp.el: Remove unused debugging statements.
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index cb235697ed0..3c59c92c042 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el | |||
| @@ -4083,11 +4083,9 @@ that suppresses all warnings during execution of BODY." | |||
| 4083 | clauses nil)) | 4083 | clauses nil)) |
| 4084 | ((cdr clauses) | 4084 | ((cdr clauses) |
| 4085 | (byte-compile-form (car clause)) | 4085 | (byte-compile-form (car clause)) |
| 4086 | ;; (message "out %s" donetag) | ||
| 4087 | (if (null (cdr clause)) | 4086 | (if (null (cdr clause)) |
| 4088 | ;; First clause is a singleton. | 4087 | ;; First clause is a singleton. |
| 4089 | (byte-compile-goto-if t byte-compile--for-effect donetag) | 4088 | (byte-compile-goto-if t byte-compile--for-effect donetag) |
| 4090 | ;; (message "inside %s" donetag) | ||
| 4091 | (setq nexttag (byte-compile-make-tag)) | 4089 | (setq nexttag (byte-compile-make-tag)) |
| 4092 | (byte-compile-goto 'byte-goto-if-nil nexttag) | 4090 | (byte-compile-goto 'byte-goto-if-nil nexttag) |
| 4093 | (byte-compile-maybe-guarded (car clause) | 4091 | (byte-compile-maybe-guarded (car clause) |