[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master c441f56 2/2: Fix unused lexical variable
From: |
Michal Nazarewicz |
Subject: |
[Emacs-diffs] master c441f56 2/2: Fix unused lexical variable |
Date: |
Tue, 2 Aug 2016 17:54:22 +0000 (UTC) |
branch: master
commit c441f5649871e7ba13bf0d4edb785105ce845efd
Author: Michal Nazarewicz <address@hidden>
Commit: Michal Nazarewicz <address@hidden>
Fix unused lexical variable
This fixes the following warning:
In toplevel form:
src/regex-tests.el:416:1:Warning: Unused lexical variable ‘newline’
* test/src/regex-tests.el (regex-tests-BOOST): Remove unused lexical
variable.
---
test/src/regex-tests.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/test/src/regex-tests.el b/test/src/regex-tests.el
index cce0108..898548d 100644
--- a/test/src/regex-tests.el
+++ b/test/src/regex-tests.el
@@ -399,7 +399,7 @@ differences in behavior.")
;; - if no "REG_BASIC" is found, with have an extended regex
;; - These set a flag:
;; - REG_ICASE
-;; - REG_NEWLINE
+;; - REG_NEWLINE (ignored by this function)
;; - REG_NOTBOL
;; - REG_NOTEOL
;;
@@ -415,13 +415,12 @@ differences in behavior.")
;; - end is the 0-based index of the first character past the group
(defun regex-tests-BOOST ()
(let (failures
- basic icase newline notbol noteol)
+ basic icase notbol noteol)
(regex-tests-generic-line
?; "BOOST.tests" regex-tests-BOOST-whitelist
(if (save-excursion (re-search-forward "^-" nil t))
(setq basic (save-excursion (re-search-forward "REG_BASIC" nil t))
icase (save-excursion (re-search-forward "REG_ICASE" nil t))
- newline (save-excursion (re-search-forward "REG_NEWLINE" nil t))
notbol (save-excursion (re-search-forward "REG_NOTBOL" nil t))
noteol (save-excursion (re-search-forward "REG_NOTEOL" nil t)))