*** empty log message ***
[gnus] / lisp / parse-time.el
index e6725f3..b86cf94 100644 (file)
 (defvar parse-time-syntax (make-char-table 'parse-time-syntax))
 (defvar parse-time-digits (make-char-table 'parse-time-syntax))
 
+;; Byte-compiler warnings
+(defvar elt)
+(defvar val)
+
 (unless (aref parse-time-digits ?0)
   (loop for i from ?0 to ?9
        do (set-char-table-range parse-time-digits i (- i ?0))))
      ,#'(lambda () (car val))
      ,#'(lambda () (cadr val)))
     ((8)
-     ,#'(lambda () 
+     ,#'(lambda ()
          (and (stringp elt)
               (= 5 (length elt))
               (or (= (aref elt 0) ?+) (= (aref elt 0) ?-))))