Advanced Search

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