Skip to content

Instantly share code, notes, and snippets.

@khirbat
Created August 16, 2012 16:46
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save khirbat/3371605 to your computer and use it in GitHub Desktop.
Save khirbat/3371605 to your computer and use it in GitHub Desktop.
Quicklisp reverse dependencies
(defun rdep (system)
"Return list of Quicklisp packages that use SYSTEM"
(let (rdeps)
(dolist (s (ql-dist:provided-systems (ql-dist:find-dist "quicklisp")) rdeps)
(if (member system (ql-dist:required-systems s) :test #'equal)
(push (ql-dist:name s) rdeps)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment