diff options
| author | Glenn Morris | 2010-11-11 19:23:58 -0800 |
|---|---|---|
| committer | Glenn Morris | 2010-11-11 19:23:58 -0800 |
| commit | df26e1f58a7e484b7ed500ea48d0e1c49345ffbf (patch) | |
| tree | cf10e13b5b4e344067ec0a28453e614c916f2227 | |
| parent | 7847454adc4388578113b4237e99fae4d0775b43 (diff) | |
| download | emacs-df26e1f58a7e484b7ed500ea48d0e1c49345ffbf.tar.gz emacs-df26e1f58a7e484b7ed500ea48d0e1c49345ffbf.zip | |
* lisp/cedet/semantic/wisent/comp.el: Remove unnecessary eval-when-compiles.
| -rw-r--r-- | lisp/cedet/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/cedet/semantic/wisent/comp.el | 12 |
2 files changed, 7 insertions, 9 deletions
diff --git a/lisp/cedet/ChangeLog b/lisp/cedet/ChangeLog index 8f5daf1ea22..efe7e4d4255 100644 --- a/lisp/cedet/ChangeLog +++ b/lisp/cedet/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2010-11-12 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * semantic/wisent/comp.el: Remove unnecessary eval-when-compiles. | ||
| 4 | |||
| 1 | 2010-11-10 Glenn Morris <rgm@gnu.org> | 5 | 2010-11-10 Glenn Morris <rgm@gnu.org> |
| 2 | 6 | ||
| 3 | * semantic/bovine/c.el: Test system-type with memq. | 7 | * semantic/bovine/c.el: Test system-type with memq. |
diff --git a/lisp/cedet/semantic/wisent/comp.el b/lisp/cedet/semantic/wisent/comp.el index 371a1947304..90585399b74 100644 --- a/lisp/cedet/semantic/wisent/comp.el +++ b/lisp/cedet/semantic/wisent/comp.el | |||
| @@ -1,7 +1,8 @@ | |||
| 1 | ;;; semantic/wisent/comp.el --- GNU Bison for Emacs - Grammar compiler | 1 | ;;; semantic/wisent/comp.el --- GNU Bison for Emacs - Grammar compiler |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1984, 1986, 1989, 1992, 1995, 2000, 2001, 2002, 2003, | 3 | ;; Copyright (C) 1984, 1986, 1989, 1992, 1995, 2000, 2001, 2002, 2003, |
| 4 | ;; 2004, 2005, 2006, 2007, 2009, 2010 Free Software Foundation, Inc. | 4 | ;; 2004, 2005, 2006, 2007, 2009, 2010 |
| 5 | ;; Free Software Foundation, Inc. | ||
| 5 | 6 | ||
| 6 | ;; Author: David Ponce <david@dponce.com> | 7 | ;; Author: David Ponce <david@dponce.com> |
| 7 | ;; Maintainer: David Ponce <david@dponce.com> | 8 | ;; Maintainer: David Ponce <david@dponce.com> |
| @@ -160,12 +161,6 @@ If optional LEFT is non-nil insert spaces on left." | |||
| 160 | (not (zerop (logand (aref x (/ i wisent-BITS-PER-WORD)) | 161 | (not (zerop (logand (aref x (/ i wisent-BITS-PER-WORD)) |
| 161 | (lsh 1 (% i wisent-BITS-PER-WORD)))))) | 162 | (lsh 1 (% i wisent-BITS-PER-WORD)))))) |
| 162 | 163 | ||
| 163 | (eval-when-compile | ||
| 164 | (or (fboundp 'noninteractive) | ||
| 165 | ;; Silence the Emacs byte compiler | ||
| 166 | (defun noninteractive nil)) | ||
| 167 | ) | ||
| 168 | |||
| 169 | (defsubst wisent-noninteractive () | 164 | (defsubst wisent-noninteractive () |
| 170 | "Return non-nil if running without interactive terminal." | 165 | "Return non-nil if running without interactive terminal." |
| 171 | (if (featurep 'xemacs) | 166 | (if (featurep 'xemacs) |
| @@ -205,7 +200,7 @@ Its name is defined in constant `wisent-log-buffer-name'." | |||
| 205 | `(with-current-buffer (wisent-log-buffer) | 200 | `(with-current-buffer (wisent-log-buffer) |
| 206 | (erase-buffer))) | 201 | (erase-buffer))) |
| 207 | 202 | ||
| 208 | (eval-when-compile (defvar byte-compile-current-file)) | 203 | (defvar byte-compile-current-file) |
| 209 | 204 | ||
| 210 | (defun wisent-source () | 205 | (defun wisent-source () |
| 211 | "Return the current source file name or nil." | 206 | "Return the current source file name or nil." |
| @@ -3536,5 +3531,4 @@ See also `wisent-compile-grammar' for more details on AUTOMATON." | |||
| 3536 | 3531 | ||
| 3537 | (provide 'semantic/wisent/comp) | 3532 | (provide 'semantic/wisent/comp) |
| 3538 | 3533 | ||
| 3539 | ;; arch-tag: 758ea04c-ea97-466b-9b35-aea0861033c9 | ||
| 3540 | ;;; semantic/wisent/comp.el ends here | 3534 | ;;; semantic/wisent/comp.el ends here |