Maybe something like (notice the '$done).
(defmvar *finalevallist* nil)
(defun $addtofinalevallist (f)
;; Function to add function names to *finalevallist*
(cond
((mfboundp f) (push f *finalevallist*))
(t (merror "Argument to 'addtofinalevallist' must be a function")))
'$done)
(%i1) load(functionp)$
(%i2) addtofinalevallist('trigrat);
(%o2) DONE
(%i3) addtofinalevallist(f);
Argument to 'addtofinalevallist' must be a function
-- an error. Quitting. To debug this try DEBUGMODE(TRUE);
(%i4)
Barton
-----maxima-admin@math.utexas.edu wrote: -----
>To: C Y , maxima
>
>From: Richard Fateman
>Sent by: maxima-admin@math.utexas.edu
>Date: 03/18/2005 07:10PM
>Subject: Re: [Maxima] Curosity/educational
>question
>
>My guess:
>
>The difference is probably that you are asking
>the maxima display program, in the first place, to
>display something like ( $f1 ), whereas you need
>something like ((mlist) $f1)