Re: Defining functions on the fly

[Tassilo Horn]

Michael Heerdegen <michael_heerdegen@web.de> writes:

>> > Debugger entered--Lisp error: (wrong-type-argument symbolp (intern
>> > (concat pfxd
>> > "-foo")))
>> >   defalias((intern (concat pfxd "-foo")) (lambda nil nil))
>>
>> This might depend on emacs version.  At least with the current git
>> version, `defalias' evaluates its first argument:
>>
>>   (defalias (intern "foo-bar") #'forward-sexp) ;; Works fine
>
> In the example above, in the expansion of the `defun' call the first
> argument to defalias is the (unevaluated!) list:
>
>   (intern (concat pfxd "-foo"))
>
> The corresponding call to defalias will also fail on trunk.

Ah, yes, so that's basically as if

  (defalias '(intern (concat pfxd "-foo")) ...)

had been written.

Bye,
Tassilo