From 2c1de32c0d255e6874b71e3cd6e173f16cd8071f Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <tunes@google.com> Date: Mon, 2 Jun 2014 00:49:34 -0400 Subject: [PATCH] Add docstrings for the latest two commands. --- tools/main.lisp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/tools/main.lisp b/tools/main.lisp index 1810cc018..fef8ee5c7 100644 --- a/tools/main.lisp +++ b/tools/main.lisp @@ -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)) -- GitLab