From: Mattias Engdegård <mattiase@acm.org>
Date: Thu, 25 Apr 2024 09:33:25 +0000 (+0200)
Subject: Better eval-when-compile example in manual
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d570fd111f3c7c538359a12b3fe009e8b07edbd9;p=emacs.git

Better eval-when-compile example in manual

* doc/lispref/compile.texi (Eval During Compile):
`regexp-opt` makes for a poor example because as a pure function it
doesn't need `eval-when-compile` for constant inputs.

(cherry picked from commit 88ebabe23a253ce040de94e6396bc4f587ba6e69)
---

diff --git a/doc/lispref/compile.texi b/doc/lispref/compile.texi
index 00602198da5..08e824d2781 100644
--- a/doc/lispref/compile.texi
+++ b/doc/lispref/compile.texi
@@ -334,8 +334,8 @@ If you have a constant that needs some calculation to produce,
 @code{eval-when-compile} can do that at compile-time.  For example,
 
 @lisp
-(defvar my-regexp
-  (eval-when-compile (regexp-opt '("aaa" "aba" "abb"))))
+(defvar gauss-schoolboy-problem
+  (eval-when-compile (apply #'+ (number-sequence 1 100))))
 @end lisp
 
 @cindex macros, at compile time