find the file name of the running function programatically

[Xah]

how to find out the file name of the running function
programmatically?

for example, i have:

(defun command-frequency-write-file (file-name)
  (with-temp-file file-name
    (insert (command-frequency)))
  (with-temp-message (format "Wrote %s" file-name)))

i want to change this function so that it doesn't require any arg.
The file name will just be in the same dir but with a “.txt” suffix.

Thanks.

  Xah
∑ http://xahlee.org/

☄