[asdf-devel] how to query root of a system

[Attila Lendvai]

> (defun query-system-root (x) (asdf:component-pathname (asdf:find-system x)))

or with a not too old ASDF:

TEST> (asdf:system-relative-pathname :hu.dwim.stefil "")
#P"/home/ati/workspace/hu.dwim.stefil/"

-- 
 attila