Re: Determine object passed as argument

On Sunday, April 12th, 2026 at 2:38 AM, [email protected] <[email protected]> wrote:

> [email protected] writes:
> 
> > Heime <[email protected]> writes:
> >
> >> Can a function determine the object being passed as argument and
> >> print its name.  For instance that I passed if I pass fpln when
> >> calling (lana-du-fpln 'fpln).
> >>
> >> (defun lana-du-fpln (datenstruk &optional bname)
> >>
> >
> >   (defun lana-du-fpln (datenstruk &optional bname)
> >     (symbol-name datenstruk))
> >
> >   (lana-du-fpln 'fpln)
> >   => "fpln"
> >
> > Or,
> >
> >   (defun lana-du-fpln (datenstruk &optional bname)
> >     (format "Name of symbol: %s" (symbol-name datenstruk)))
> >
> >   (lana-du-fpln 'fpln)
> >   => "Name of symbol: fpln"
> 
> Or,
> 
>   (defun lana-du-fpln (datenstruk &optional bname)
>     (if (cl-typep datenstruk 'symbol)
>       (symbol-name datenstruk)
>       ;; Else
>       "Not a symbol"))
> 
>   (lana-du-fpln 'fpln)
>   => "fpln"
>   (lana-du-fpln '(a b c))
>   => "Not a symbol"
>   (lana-du-fpln "abc")
>   => "Not a symbol"

No need for boundp as outlines by Jean?

> --
> The lyf so short, the craft so long to lerne.
> - Geoffrey Chaucer, The Parliament of Birds.
> 
>