CL DSL for generation API documentation

gistfile1.lisp

(generate-api-documentation
  :base "http://api.test.com"
  :title "API Documentaition for TEST"
  :author "fuzzyalej"
  (with-endpoint "/book"
    :method "GET"
    :description "This will fetch a book from the database"
    (parameters
      (id
        :type "String"
        :required t
        :format "5")
      (name
        :type "String"
        :required nil
        :format "Book Name"))
    (returns
      :200 "All went ok"
      :400 "Something went wrong")
    (example
      :title "Normal example"
      :status 200
      :format "json"
      :data "{'name':'Book Title'}")))