;;;; -*- Mode: LISP -*- (in-package :asdf) (setf (logical-pathname-translations "bug") `(("**;*.*" ,(make-pathname :directory (append (pathname-directory *load-pathname*) '(:wild-inferiors)) :name :wild :type :wild)))) (defsystem :bug :name "Debugging the Bug" :author "Alan Ruttenberg and Jeremy Zucker" :version "1" :licence "" :components ((:file "merge")(:file "queries") (:file "parse-fact-pp")) :depends-on ("owl")) ;;;; eof