mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/cedet/semantic/wisent/comp.el: Remove unnecessary eval-when-compiles.

Browse source
This commit is contained in:
Glenn Morris 2010-11-11 19:23:58 -08:00
parent 7847454adc
commit df26e1f58a
2 changed files with 7 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/cedet/ChangeLog
View file

@ -1,3 +1,7 @@
2010-11-12 Glenn Morris <rgm@gnu.org>
* semantic/wisent/comp.el: Remove unnecessary eval-when-compiles.
2010-11-10 Glenn Morris <rgm@gnu.org>
* semantic/bovine/c.el: Test system-type with memq.

12
lisp/cedet/semantic/wisent/comp.el
View file

@ -1,7 +1,8 @@
;;; semantic/wisent/comp.el --- GNU Bison for Emacs - Grammar compiler
;; Copyright (C) 1984, 1986, 1989, 1992, 1995, 2000, 2001, 2002, 2003,
;; 2004, 2005, 2006, 2007, 2009, 2010 Free Software Foundation, Inc.
;; 2004, 2005, 2006, 2007, 2009, 2010
;; Free Software Foundation, Inc.
;; Author: David Ponce <david@dponce.com>
;; Maintainer: David Ponce <david@dponce.com>
@ -160,12 +161,6 @@ If optional LEFT is non-nil insert spaces on left."
(not (zerop (logand (aref x (/ i wisent-BITS-PER-WORD))
(lsh 1 (% i wisent-BITS-PER-WORD))))))
(eval-when-compile
(or (fboundp 'noninteractive)
;; Silence the Emacs byte compiler
(defun noninteractive nil))
)
(defsubst wisent-noninteractive ()
"Return non-nil if running without interactive terminal."
(if (featurep 'xemacs)
@ -205,7 +200,7 @@ Its name is defined in constant `wisent-log-buffer-name'."
`(with-current-buffer (wisent-log-buffer)
(erase-buffer)))
(eval-when-compile (defvar byte-compile-current-file))
(defvar byte-compile-current-file)
(defun wisent-source ()
"Return the current source file name or nil."
@ -3536,5 +3531,4 @@ See also `wisent-compile-grammar' for more details on AUTOMATON."
(provide 'semantic/wisent/comp)
;; arch-tag: 758ea04c-ea97-466b-9b35-aea0861033c9
;;; semantic/wisent/comp.el ends here