>>648
compile-file前提なら

(defvar *file* #.*compile-file-pathname*)

でいける気がするけど、REPLとは相性が悪いと思うので、お勧めしない。

具体的にはどういうことがしたいの？