Shammer's Philosophy

My private adversaria

Is this lisp function invoked on an interpreter or run as compiled program?

I have thought that there are any lisp standard function to judge whether this is running as an compiled program or running as an script on interpreter, this is in this article.
Although I have never looked for a such kind of function earnestly, I have never found it. And I wrote a small function to do it. This is for ClozureCL.

(defun is-running-as-script ()
  ""
  (let ((args0 (first *command-line-argument-list*)))
    (or (string= "/usr/local/share/ccl/dx86cl" args0)
	(string= "/usr/local/share/ccl/dx86cl64" args0))))

This is a just my memo.