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

* lisp/progmodes/ebnf-*.el: Use lexical-binding

Browse source 
* lisp/progmodes/ebnf-abn.el:
* lisp/progmodes/ebnf-bnf.el:
* lisp/progmodes/ebnf-dtd.el:
* lisp/progmodes/ebnf-ebx.el:
* lisp/progmodes/ebnf-iso.el:
* lisp/progmodes/ebnf-otz.el:
* lisp/progmodes/ebnf-yac.el: Enable lexical-binding.
* lisp/progmodes/ebnf2ps.el (ebnf-apply-style1)
(ebnf-insert-ebnf-prologue): Use lexical-binding.
This commit is contained in:
Stefan Monnier 2021-03-23 22:38:41 -04:00
parent 667e002e91
commit 952550258d
8 changed files with 10 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/progmodes/ebnf-abn.el
View file

@ -1,4 +1,4 @@
;;; ebnf-abn.el --- parser for ABNF (Augmented BNF)
;;; ebnf-abn.el --- parser for ABNF (Augmented BNF) -*- lexical-binding: t; -*-
;; Copyright (C) 2001-2021 Free Software Foundation, Inc.

2
lisp/progmodes/ebnf-bnf.el
View file

@ -1,4 +1,4 @@
;;; ebnf-bnf.el --- parser for EBNF
;;; ebnf-bnf.el --- parser for EBNF -*- lexical-binding: t; -*-
;; Copyright (C) 1999-2021 Free Software Foundation, Inc.

2
lisp/progmodes/ebnf-dtd.el
View file

@ -1,4 +1,4 @@
;;; ebnf-dtd.el --- parser for DTD (Data Type Description for XML)
;;; ebnf-dtd.el --- parser for DTD (Data Type Description for XML) -*- lexical-binding: t; -*-
;; Copyright (C) 2001-2021 Free Software Foundation, Inc.

2
lisp/progmodes/ebnf-ebx.el
View file

@ -1,4 +1,4 @@
;;; ebnf-ebx.el --- parser for EBNF used to specify XML (EBNFX)
;;; ebnf-ebx.el --- parser for EBNF used to specify XML (EBNFX) -*- lexical-binding: t; -*-
;; Copyright (C) 2001-2021 Free Software Foundation, Inc.

2
lisp/progmodes/ebnf-iso.el
View file

@ -1,4 +1,4 @@
;;; ebnf-iso.el --- parser for ISO EBNF
;;; ebnf-iso.el --- parser for ISO EBNF -*- lexical-binding: t; -*-
;; Copyright (C) 1999-2021 Free Software Foundation, Inc.

2
lisp/progmodes/ebnf-otz.el
View file

@ -1,4 +1,4 @@
;;; ebnf-otz.el --- syntactic chart OpTimiZer
;;; ebnf-otz.el --- syntactic chart OpTimiZer -*- lexical-binding: t; -*-
;; Copyright (C) 1999-2021 Free Software Foundation, Inc.

2
lisp/progmodes/ebnf-yac.el
View file

@ -1,4 +1,4 @@
;;; ebnf-yac.el --- parser for Yacc/Bison
;;; ebnf-yac.el --- parser for Yacc/Bison -*- lexical-binding: t; -*-
;; Copyright (C) 1999-2021 Free Software Foundation, Inc.

6
lisp/progmodes/ebnf2ps.el
View file

@ -2920,7 +2920,7 @@ See `ebnf-style-database' documentation."
value
(and (car value) (ebnf-apply-style1 (car value)))
(while (setq value (cdr value))
(set (caar value) (eval (cdar value)))))))
(set (caar value) (eval (cdar value) t))))))
(defun ebnf-check-style-values (values)
@ -5487,7 +5487,7 @@ killed after process termination."
(ebnf-shape-value ebnf-chart-shape
ebnf-terminal-shape-alist))
(format "/UserArrow{%s}def\n"
(let ((arrow (eval ebnf-user-arrow)))
(let ((arrow (eval ebnf-user-arrow t)))
(if (stringp arrow)
arrow
"")))
@ -6290,7 +6290,7 @@ killed after process termination."
(defun ebnf-log-header (format-str &rest args)
(when ebnf-log
(apply
'ebnf-log
#'ebnf-log
(concat
"\n\n===============================================================\n\n"
format-str)