("SYS:CONTRIB;**;*.*.*" ,(#2# "contrib/**/*.*"))))))
#+sbcl (require :sb-posix)
-#+(and unix (or sbcl clisp cmu))
+#+(and unix (or sbcl cmu))
(let ((#1=#:home (pathname (concatenate 'string
(or #+sbcl (sb-posix:getenv "HOME")
#+clisp (ext:getenv "HOME")