Update of /project/closure/cvsroot/closure/resources In directory clnet:/tmp/cvs-serv19989/resources Modified Files: resources.lisp Log Message: Move the HTML parser and its dependencies into a separate system. * INSTALL: Mention the dependency on Closure HTML. * closure.asd (RUNES): Depend on closure-html. (CLOSURE): Removed clex, lalr, net/mime, parse. Added renderer/pt. * resources/resources.lisp: Removed DTD parsing. * src/glisp/package.lisp: Import gstream symbols from html-glisp for re-export. * src/glisp/util.lisp (GSTREAM, USE-CHAR-FOR-BYTE-STREAM-FLAVOUR, G/READ-BYTE, G/UNREAD-BYTE, G/WRITE-BYTE, USE-BYTE-FOR-CHAR-STREAM-FLAVOUR, G/READ-CHAR, G/UNREAD-CHAR, G/WRITE-CHAR, CL-STREAM, G/FINISH-OUTPUT, G/CLOSE, CL-BYTE-STREAM, G/READ-BYTE-SEQUENCE, G/WRITE-BYTE-SEQUENCE, CL-CHAR-STREAM, G/WRITE-STRING, G/READ-LINE, G/READ-LINE*, VECTOR-OUTPUT-STREAM, G/MAKE-VECTOR-OUTPUT-STREAM, CL-BYTE-STREAM->GSTREAM, CL-CHAR-STREAM->GSTREAM): Removed from this file, because this code now lives in HTML-GLISP. * src/gui/gui.lisp s/cl-user::*html-dtd*/closure-html:*html-dtd*. (*html-dtd*): Removed defvar. * src/net/package.lisp: Use closure-mime-types. * src/parse/package.lisp: Removed. * src/parse/pt.lisp: Removed. * src/parse/sgml-dtd.lisp: Removed. * src/parse/sgml-parse.lisp: Removed. * resources/dtd/DTD-HTML-4.0: Removed. * resources/dtd/DTD-HTML-4.0-Frameset: Removed. * resources/dtd/DTD-HTML-4.0-Transitional: Removed. * resources/dtd/Entities-Latin1: Removed. * resources/dtd/Entities-Special: Removed. * resources/dtd/Entities-Symbols: Removed. * resources/dtd/HTML-3.0: Removed. * resources/dtd/NETSCAPE-Bookmark-file-1: Removed. * resources/dtd/catalog: Removed. --- /project/closure/cvsroot/closure/resources/resources.lisp 2007/01/07 17:29:47 1.4 +++ /project/closure/cvsroot/closure/resources/resources.lisp 2007/10/07 21:44:36 1.5 @@ -53,10 +53,3 @@ (setf r2::*default-style-sheet* (css::parse-style-sheet-from-url (url:parse-url "file://closure/resources/css/default.css") :name "Closure Default Style Sheet")) - -(format T "~&;; Parsing DTD~% ") -(sgml:slurp-catalog (url:parse-url "file://closure/resources/dtd/catalog")) -(setf cl-user::*html-dtd* (sgml:parse-dtd '(:public "-//W3C//DTD HTML 4.0 Frameset//EN"))) -(format T "~&;; done~%") - -