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

Hi,

Suppose I have a library named MYLIBRARY which was installed in the directory /somewhere/foo/ (eg by ASDF-Install, clbuild or manually by the user). It has a /somewhere/foo/mylibrary.asd definition file, which was duly symlinked to mylibrary.asd in ASDF's central registry. The user can load it the usual way using ASDF.

Is it possible to query the root directory somehow using the name? Eg I am looking for

(query-system-root :mypackage) ; evaluates to #P"/somewhere/foo/"

I could not find how to do this in the manual.

Thanks,

Tamas