Skip to content
Snippets Groups Projects
Commit 2c1de32c authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Add docstrings for the latest two commands.

parent cc1336b9
No related branches found
No related tags found
No related merge requests found
......@@ -53,10 +53,14 @@
(sort (mapcar 'command-name (public-commands)) 'string<))
(defun show-commands ()
"print the (sorted list of) names of all the public commands of asdf-tools."
(format t "~{~A~^ ~}~%" (public-command-strings))
(values))
(defun makefile-targets ()
"print declaration for the public commands of asdf-tools as as many Makefile targets
so that, when included in the Makefile, they will enable shell completion
based on a list of targets"
(let ((c (public-command-strings)))
;;(format t ".PHONY: ~{~A~^ ~}~%~%~{~A:~%~}~%" c c))
(format t "~{~A:~%~}~%" c))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment