Return to Snippet

Revision: 27959
at June 28, 2010 17:45 by tprimke


Initial Code
;; creates an empty TOC context
(define (init-toc)
  (set 'TOC:toc (list SETUP:toc-start))
  (set 'TOC:lvl 1)
  (set 'TOC:anchor 0)
  (set 'TOC:found false))

Initial URL


Initial Description


Initial Title
Initialize TOC context

Initial Tags


Initial Language
Lisp