This is 0.1 -- so be advised that defsystems using asdf features not found in my own work are likely to go BOINK. Source is in the CCLAN CVS.
release-op
(oos 'release-op :some-system :directory "/my/tarball/dir/")
Creates a tarball based on the ASDF defsystem, GPG signs it, and makes a latest symlinks for both the signature and the tarball.
lint-op
(oos 'lint-op :some-system)
Scans the system source looking for bad style.