Update: README. Add: print-all-route-documentation

2 files changed, 9 insertions, 2 deletions

diff --git a/src/endpoint.lisp b/src/endpoint.lisp
index 9064c9f..4f44a41 100644
--- a/src/endpoint.lisp
+++ b/src/endpoint.lisp
@@ -141,6 +141,10 @@ endpoints are dispatching on which routes and methods.")
         (terpri)
         (princ doc)))))
 
+(defun print-all-route-documentation (&key (stream *standard-output*))
+  (loop :for class :being :the :hash-keys :of *endpoint-registry*
+        :do (print-route-documentation class :stream stream)
+            (terpri stream)))
 
 ;;; BODY PARSER REGISTRATION
 
diff --git a/src/package.lisp b/src/package.lisp
index e8f56b3..bb74e5f 100644
--- a/src/package.lisp
+++ b/src/package.lisp
@@ -29,8 +29,11 @@
    #:handle-static-file
    #:set-cookie
 
-
    ;; METACLASS
    #:endpoint
-   #:register-body-parser))
+   #:register-body-parser
+
+   ;; DOCGEN
+   #:print-route-documentation
+   #:print-all-route-documentation))