summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2025-03-25 22:17:05 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2025-03-25 22:17:32 -0400
commitfb4db5c1a7b9dcb24e6cfed064b252a9f8fe97ef (patch)
tree38e97edd359e88049a9d2d6f7cf184d4c2a018f4
parent9a07d64f5c734f08baa741d763640943a7b407e7 (diff)
downloademacs-fb4db5c1a7b9dcb24e6cfed064b252a9f8fe97ef.tar.gz
emacs-fb4db5c1a7b9dcb24e6cfed064b252a9f8fe97ef.tar.bz2
emacs-fb4db5c1a7b9dcb24e6cfed064b252a9f8fe97ef.zip
PEG: Fix bug#76555
* doc/lispref/peg.texi (Parsing Expression Grammars): Fix `define-peg-ruleset` example. * lisp/progmodes/peg.el (define-peg-rule): Fix indent rule.
-rw-r--r--doc/lispref/peg.texi2
-rw-r--r--lisp/progmodes/peg.el2
2 files changed, 2 insertions, 2 deletions
diff --git a/doc/lispref/peg.texi b/doc/lispref/peg.texi
index 80e2581e7bb..e03ec57a457 100644
--- a/doc/lispref/peg.texi
+++ b/doc/lispref/peg.texi
@@ -141,8 +141,8 @@ Define @var{name} as an identifier for @var{rules}.
@example
@group
(define-peg-ruleset number-grammar
+ ;; `digit' here references the definition above.
'((number sign digit (* digit))
- digit ;; A reference to the definition above.
(sign (or "+" "-" ""))))
@end group
@end example
diff --git a/lisp/progmodes/peg.el b/lisp/progmodes/peg.el
index ebcf7f7455b..41e052b505f 100644
--- a/lisp/progmodes/peg.el
+++ b/lisp/progmodes/peg.el
@@ -369,7 +369,7 @@ defaults to `ignore'."
"Define PEG rule NAME as equivalent to PEXS.
The PEG expressions in PEXS are implicitly combined with the
sequencing `and' operator of PEG grammars."
- (declare (indent 1))
+ (declare (indent 2))
(let ((inline nil))
(while (keywordp (car pexs))
(pcase (pop pexs)