src/coleslaw-conf.lisp (285 bytes)
1 (defpackage #:coleslaw-conf 2 (:use #:cl) 3 (:export #:*basedir*)) 4 5 (in-package #:coleslaw-conf) 6 7 (defparameter *basedir* 8 (uiop/pathname:pathname-parent-directory-pathname 9 #.(or *compile-file-truename* *load-truename*)) 10 "A pathname pointing to Coleslaw's top level directory.")