load-test-file.lsp 132 Bytes
Newer Older
pfdietz's avatar
pfdietz committed
1
2
3
4
5
6
7
8
9
(in-package :cl-test)

(defun load-file-test-fun.1 ()
  '#.*load-pathname*)

(defun load-file-test-fun.2 ()
  '#.*load-truename*)