anchor.diff:                          (reference-basic-page ()
                             (cl-who:with-html-output (hunchentoot::*standard-output*)
                               (str (3bmd:parse-and-print-to-stream ,(format nil "~(~A/~A~)" section (file-namestring file)) hunchentoot::*standard-output* :format :html))))))))
  +
  +;; Used to automatically build reference templates for all Common Lisp symbols
  +;; no longer needed, slot for removal
   
   (defun create-reference-files ()
     (loop for k being the hash-keys in *cl-reference-symbols* using (hash-value v)
  
positive.code:                           (cl-who:with-html-output (hunchentoot::*standard-output*)
                              (str (3bmd:parse-and-print-to-stream ,(format nil "book/~(~A~)" (file-namestring file)) hunchentoot::*standard-output* :format :html))))))))
  
  (defmacro create-reference-pages (files &key (section "reference"))
    "Loop over contents of passes FILES list, build pages automatically at compile time using REFERENCE-BASIC-PAGE template under folder labelled SECTION."
    `(progn
  
negative.code: (in-package :llthw)
  
  ;;; Most of the code in this file is deprecated
  
  ;; Slot for removal:
  ;; Loop over contents of passed FILES list, build pages automatically
  (defmacro create-book-pages (files)
    "Loop over contents of passed FILES list, build pages automatically at compile time."
  