Re: eval-when-compile vs defconst

[Stephen Leake <stephen_leake@member.fsf.org>]

Richard Stallman <rms@gnu.org> writes:

>     I ran across this construct in ada-mode.el:
>
>     (eval-when-compile
>       (defconst ada-95-string-keywords
> 	'("abstract" "aliased" "protected" "requeue" "tagged" "until")
> 	"List of keywords new in Ada 95.
>     Used to define `ada-*-keywords'."))
>
>     Is there any point to the 'eval-when-compile'? Help for
>     eval-when-compile says;
>
> No, you may as well define that variable in all cases.

Ok, thanks.

Now, how about this form:

(defvar ada-block-start-re
  (eval-when-compile
    (concat "\\<\\(" (regexp-opt '("begin" "declare" "else"
				   "exception" "generic" "loop" "or"
				   "private" "select" ))
	    "\\|\\(\\(limited\\|abstract\\|tagged\\)[ \t\n]+\\)*record\\)\\>"))
  "Regexp for keywords starting Ada blocks.")

Is the `eval-when-compile' useful here? I'm thinking it is.

The help for `defvar' says initvalue is evaluated, but it's not clear
whether that happens at compile time or load time.

-- 
-- Stephe