From 17dfdf2288418a9f571e1a74bdd09766ed9d4338 Mon Sep 17 00:00:00 2001
From: David Lichteblau <david@lichteblau.com>
Date: Sat, 21 Apr 2007 14:54:17 +0200
Subject: [PATCH] Dokumentation

---
 GNUmakefile     |   9 +
 doc/GNUmakefile |   4 +
 doc/doc.css     | 146 +++++++++++++++
 doc/html.xsl    | 548 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 doc/logo.png    | Bin 0 -> 2902 bytes
 index.css       | 154 ++++++++++++++++
 index.html      |  91 ++++++++++
 index.xsl       | 118 ++++++++++++
 package.lisp    |  27 ++-
 9 files changed, 1095 insertions(+), 2 deletions(-)
 create mode 100644 GNUmakefile
 create mode 100644 doc/GNUmakefile
 create mode 100644 doc/doc.css
 create mode 100644 doc/html.xsl
 create mode 100644 doc/logo.png
 create mode 100644 index.css
 create mode 100644 index.html
 create mode 100644 index.xsl

diff --git a/GNUmakefile b/GNUmakefile
new file mode 100644
index 0000000..0dd2376
--- /dev/null
+++ b/GNUmakefile
@@ -0,0 +1,9 @@
+all: index.html doc
+
+.PHONY: index.html
+index.html:
+	echo '<empty/>' | xsltproc index.xsl - >index.html
+
+.PHONY: doc
+doc:
+	cd doc && make
diff --git a/doc/GNUmakefile b/doc/GNUmakefile
new file mode 100644
index 0000000..e071876
--- /dev/null
+++ b/doc/GNUmakefile
@@ -0,0 +1,4 @@
+.PHONY: index.html
+
+index.html: doc.xml
+	xsltproc html.xsl doc.xml >index.html
diff --git a/doc/doc.css b/doc/doc.css
new file mode 100644
index 0000000..4d157ce
--- /dev/null
+++ b/doc/doc.css
@@ -0,0 +1,146 @@
+div.sidebar {
+  float: right;
+  min-width: 15%;
+  padding: 0pt 5pt 5pt 5pt;
+  font-family: verdana, arial;
+}
+
+a {
+  text-decoration: none;
+  color: #000000;
+  border-bottom: 1px dotted black;
+  border-top: 1px solid white;
+  border-left: 1px solid white;
+  border-right: 1px solid white;
+}
+
+.sidebar a {
+  border-top: 1px solid #eeeeee;
+  border-left: 1px solid #eeeeee;
+  border-right: 1px solid #eeeeee;
+}
+
+a:hover {
+  color: #000000;
+  border: 1px solid black;
+}
+
+div.sidebar-title {
+  font-weight: bold;
+  color: #ffffff;
+  background-color: #000000; /* #0000aa */
+  border: solid #000000; /* #0000aa */
+  border-top-width: 1px;
+  border-bottom-width: 0px;
+  border-left-width: 4px;
+  border-right-width: 0px;
+  margin: 0em 2pt 1px 2em;
+}
+
+div.sidebar-title a {
+  color: #ffffff;
+}
+
+div.sidebar-main {
+  background-color: #eeeeee;
+  border: solid #000000; /* #0000aa */
+  border-top-width: 0px;
+  border-bottom-width: 0px;
+  border-left-width: 4px;
+  border-right-width: 0px;
+  margin: 0em 2pt 1em 2em;
+  padding-top: 2px;
+  padding-left: 2px;
+}
+
+div.sidebar ul {
+  list-style-type: square;
+  padding: 0pt 0pt 0pt 1em;
+  margin: 0 0 1em;
+}
+
+div.sidebar ul.sub {
+  list-style-type: disc;
+  padding: 0pt 0pt 0pt 1em;
+  margin: 0 0 1em;
+}
+
+body {
+  color: #000000;
+  background-color: #ffffff;
+  margin-right: 0pt;
+  margin-bottom: 10%;
+  font-family: verdana, arial;
+//   background-image: url(bg.png);
+//   background-position: top left;
+//   background-attachment: fixed;
+//   background-repeat: no-repeat;
+}
+
+.main {
+  margin-top: 20px;
+  margin-left: 40px;
+  padding-left: 30px;
+}
+
+h1,h2 {
+  margin-left: -30px;
+}
+
+.code {
+  border: solid 1px #d0d0d0;
+  padding: 1em;
+  margin-right: 10%;
+}
+
+.def {
+//  background-color: #ffcd87;
+//  background-color: #ffb247;
+//  background-color: #e0a655;
+  border-bottom: 1px solid black;
+  padding: 1px 1px 1px 1px;
+  margin-bottom: 1px;
+  font-weight: bold;
+  margin-right: 40px;
+}
+
+.def:hover {
+//  background-color: #ffcd87;
+//  background-color: #ffb247;
+  background-color: #e0a655;
+}
+
+.def a {
+  text-decoration: none;
+  color: #000000;
+  border-bottom: 0px solid white;
+  border-top: 0px solid white;
+  border-left: 0px solid white;
+  border-right: 0px solid white;
+}
+
+.def a:hover {
+  background-color: #e0a655;
+  color: #000000;
+  text-decoration: none;
+  border-bottom: 0px solid white;
+  border-top: 0px solid white;
+  border-left: 0px solid white;
+  border-right: 0px solid white;
+}
+
+.nomargin {
+  margin-bottom: 0;
+  margin-top: 0;
+}
+
+.noindent {
+  margin-left: -30px;
+}
+
+#header {
+  margin-right: 22px;
+  border-bottom: 1px solid black;
+  font-family: verdana, arial;
+  font-size: 12pt;
+}
diff --git a/doc/html.xsl b/doc/html.xsl
new file mode 100644
index 0000000..9ddf336
--- /dev/null
+++ b/doc/html.xsl
@@ -0,0 +1,548 @@
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
+  <xsl:output method="html"
+	      indent="yes"
+	      doctype-public="-//W3C//DTD HTML 4.01 Transitional//EN"
+	      doctype-system="http://www.w3.org/TR/html4/loose.dtd"/>
+
+  <xsl:template match="documentation">
+    <html>
+      <head>
+	<title>
+	  <xsl:value-of select="@title"/>
+	</title>
+	<link rel="stylesheet" type="text/css" href="doc.css"/>
+	<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
+      </head>
+      <body>
+	<xsl:call-template name="header"/>
+	<div class="main">
+	  Index of packages:
+	  <xsl:apply-templates/>
+	</div>
+      </body>
+    </html>
+  </xsl:template>
+
+  <xsl:template name="main">
+    <xsl:if test="documentation-string//arg">
+      <h3>Arguments</h3>
+      <ul>
+	<xsl:apply-templates select="documentation-string//arg" mode="meta"/>
+      </ul>
+    </xsl:if>
+    <xsl:choose>
+      <xsl:when test="documentation-string">
+	<h3>Details<a name="details"/></h3>
+	<xsl:apply-templates select="documentation-string"/>
+      </xsl:when>
+      <xsl:otherwise>
+	<p style="color: red; font-weight: bold">
+	  No documentation string.  Possibly unimplemented or incomplete.
+	</p>
+      </xsl:otherwise>
+    </xsl:choose>
+    <xsl:if test="documentation-string//implementation-note">
+      <h3>Implementation notes</h3>
+      <xsl:apply-templates select="documentation-string//implementation-note"
+			   mode="meta"/>
+    </xsl:if>
+    <xsl:if test="documentation-string//see">
+      <h3>See also</h3>
+      <xsl:apply-templates select="documentation-string//see" mode="meta"/>
+    </xsl:if>
+  </xsl:template>
+
+  <xsl:template match="package">
+    <h2>
+      <a href="pages/{@id}.html">
+	Package
+	<xsl:value-of select="@name"/>
+      </a>
+    </h2>
+    <div style="left: 100px">
+      <xsl:apply-templates select="documentation-string"/>
+    </div>
+    <xsl:document href="pages/{@id}.html"
+		  method="html"
+		  indent="yes"
+		  doctype-public="-//W3C//DTD HTML 4.01 Transitional//EN"
+		  doctype-system="http://www.w3.org/TR/html4/loose.dtd">
+      <html>
+	<head>
+	  <title>
+	    <xsl:text>Package </xsl:text>
+	    <xsl:value-of select="@name"/>
+	  </title>
+	  <link rel="stylesheet" type="text/css" href="../doc.css"/>
+	  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
+	</head>
+	<body>
+	  <xsl:call-template name="page-header"/>
+	  <div class="main">
+	    <p class="noindent">
+	      Up:
+	      <a href="../index.html">
+		<xsl:value-of select="/documentation/@title"/>
+	      </a>
+	    </p>
+	    <h1>
+	      Package
+	      <xsl:value-of select="@name"/>
+	    </h1>
+	    <xsl:apply-templates select="documentation-string"/>
+	    <xsl:if test="documentation-string//section">
+	      <h2>Contents</h2>
+	      <xsl:apply-templates select="documentation-string//section"
+				   mode="toc"/>
+	      <br/>
+	      <a href="#index" style="font-weight: bold">
+		Index
+	      </a>
+	      <xsl:apply-templates select="documentation-string//section"
+				   mode="meta"/>
+	    </xsl:if>
+	    <h2><a name="index"></a>Index</h2>
+	    <xsl:apply-templates select="symbols" mode="symbol-index"/>
+	  </div>
+	</body>
+      </html>
+    </xsl:document>
+  </xsl:template>
+
+  <xsl:template match="*" mode="symbol-index"/>
+
+  <xsl:template match="symbols" mode="symbol-index">
+    <xsl:apply-templates mode="symbol-index">
+      <xsl:sort select="@id" data-type="text" order="ascending"/>
+    </xsl:apply-templates>
+  </xsl:template>
+
+  <xsl:template match="class" mode="symbol-index">
+    <a href="{@id}.html">
+      <tt><xsl:value-of select="@name"/></tt>
+    </a>
+    <xsl:text>, class</xsl:text>
+    <xsl:call-template name="undocumented"/>
+    <br/>
+
+    <xsl:document href="{@id}.html"
+		  method="html"
+		  indent="yes"
+		  doctype-public="-//W3C//DTD HTML 4.01 Transitional//EN"
+		  doctype-system="http://www.w3.org/TR/html4/loose.dtd">
+      <html>
+	<head>
+	  <title>
+	    <xsl:text>Class </xsl:text>
+	    <xsl:value-of select="@name"/>
+	  </title>
+	  <link rel="stylesheet" type="text/css" href="../doc.css"/>
+	  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
+	</head>
+	<body>
+	  <xsl:call-template name="page-header"/>
+	  <div class="main">
+	    <p class="noindent">
+	      Package:
+	      <a href="{../../@id}.html">
+		<xsl:value-of select="../../@name"/>
+	      </a>
+	    </p>
+	    <xsl:apply-templates select="." mode="page"/>
+	  </div>
+	</body>
+      </html>
+    </xsl:document>
+  </xsl:template>
+
+  <xsl:template match="function" mode="symbol-index">
+    <a href="{@id}.html">
+      <tt><xsl:value-of select="@name"/></tt>
+    </a>
+    <xsl:text>, function</xsl:text>
+    <xsl:call-template name="undocumented"/>
+    <br/>
+
+    <xsl:document href="{@id}.html"
+		  method="html"
+		  indent="yes"
+		  doctype-public="-//W3C//DTD HTML 4.01 Transitional//EN"
+		  doctype-system="http://www.w3.org/TR/html4/loose.dtd">
+      <html>
+	<head>
+	  <title>
+	    <xsl:text>Function </xsl:text>
+	    <xsl:value-of select="@name"/>
+	  </title>
+	  <link rel="stylesheet" type="text/css" href="../doc.css"/>
+	  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
+	</head>
+	<body>
+	  <xsl:call-template name="page-header"/>
+	  <div class="main">
+	    <p class="noindent">
+	      Package:
+	      <a href="{../../@id}.html">
+		<xsl:value-of select="../../@name"/>
+	      </a>
+	    </p>
+	    <xsl:apply-templates select="." mode="page"/>
+	  </div>
+	</body>
+      </html>
+    </xsl:document>
+  </xsl:template>
+
+  <xsl:template match="macro" mode="symbol-index">
+    <a href="{@id}.html">
+      <tt><xsl:value-of select="@name"/></tt>
+    </a>
+    <xsl:text>, macro</xsl:text>
+    <xsl:call-template name="undocumented"/>
+    <br/>
+
+    <xsl:document href="{@id}.html"
+		  method="html"
+		  indent="yes"
+		  doctype-public="-//W3C//DTD HTML 4.01 Transitional//EN"
+		  doctype-system="http://www.w3.org/TR/html4/loose.dtd">
+      <html>
+	<head>
+	  <title>
+	    <xsl:text>Macro </xsl:text>
+	    <xsl:value-of select="@name"/>
+	  </title>
+	  <link rel="stylesheet" type="text/css" href="../doc.css"/>
+	  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
+	</head>
+	<body>
+	  <xsl:call-template name="page-header"/>
+	  <div class="main">
+	    <p class="noindent">
+	      Package:
+	      <a href="{../../@id}.html">
+		<xsl:value-of select="../../@name"/>
+	      </a>
+	    </p>
+	    <xsl:apply-templates select="." mode="page"/>
+	  </div>
+	</body>
+      </html>
+    </xsl:document>
+  </xsl:template>
+
+  <xsl:template name="undocumented">
+    <xsl:if test="not(documentation-string)">
+      <xsl:text>&#160;</xsl:text>
+      <span style="color: red">
+	(undocumented)
+      </span>
+    </xsl:if>
+  </xsl:template>
+
+  <xsl:template match="variable" mode="symbol-index">
+    <a href="{@id}.html">
+      <tt><xsl:value-of select="@name"/></tt>
+    </a>
+    <xsl:text>, variable</xsl:text>
+    <xsl:call-template name="undocumented"/>
+    <br/>
+
+    <xsl:document href="{@id}.html"
+		  method="html"
+		  indent="yes"
+		  doctype-public="-//W3C//DTD HTML 4.01 Transitional//EN"
+		  doctype-system="http://www.w3.org/TR/html4/loose.dtd">
+      <html>
+	<head>
+	  <title>
+	    <xsl:text>Variable </xsl:text>
+	    <xsl:value-of select="@name"/>
+	  </title>
+	  <link rel="stylesheet" type="text/css" href="../doc.css"/>
+	  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
+	</head>
+	<body>
+	  <xsl:call-template name="page-header"/>
+	  <div class="main">
+	    <p class="noindent">
+	      Package:
+	      <a href="{../../@id}.html">
+		<xsl:value-of select="../../@name"/>
+	      </a>
+	    </p>
+	    <xsl:apply-templates select="." mode="page"/>
+	  </div>
+	</body>
+      </html>
+    </xsl:document>
+  </xsl:template>
+
+  <xsl:template match="class" mode="page">
+    <h2>
+      Class
+      <xsl:value-of select="@name"/>
+    </h2>
+    <xsl:call-template name="main"/>
+  </xsl:template>
+
+  <xsl:template match="function" mode="page">
+    <h2>
+      Function
+      <xsl:value-of select="@name"/>
+    </h2>
+    <xsl:apply-templates select="arguments"/>
+    <xsl:if test="documentation-string//return">
+      <h3>Returns</h3>
+      <xsl:apply-templates select="documentation-string//return" mode="meta"/>
+    </xsl:if>
+    <xsl:call-template name="main"/>
+  </xsl:template>
+
+  <xsl:template match="macro" mode="page">
+    <h2>
+      Macro
+      <xsl:value-of select="@name"/>
+    </h2>
+    <xsl:apply-templates select="arguments"/>
+    <xsl:call-template name="main"/>
+  </xsl:template>
+
+  <xsl:template match="variable" mode="page">
+    <h2>
+      Variable
+      <xsl:value-of select="@name"/>
+    </h2>
+    <xsl:call-template name="main"/>
+  </xsl:template>
+
+  <xsl:template match="arguments">
+    <tt><xsl:value-of select="../@name"/></tt>
+    <xsl:text> (</xsl:text>
+    <xsl:apply-templates/>
+    <xsl:text>)</xsl:text>
+  </xsl:template>
+
+  <xsl:template match="argument">
+    <xsl:if test="position() != 1">
+      <xsl:text>&#160;</xsl:text>
+    </xsl:if>
+    <b><xsl:value-of select="text()"/></b>
+  </xsl:template>
+
+  <xsl:template mode="about-arguments" match="arguments">
+    <div class="def">
+      <a href="{../@id}.html">
+	Function
+	<xsl:value-of select="../@name"/>
+	<xsl:text> (</xsl:text>
+	<xsl:apply-templates mode="about-arguments"/>
+	<xsl:text>)</xsl:text>
+      </a>
+    </div>
+  </xsl:template>
+
+  <xsl:template mode="about-arguments" match="argument">
+    <xsl:if test="position() != 1">
+      <xsl:text>&#160;</xsl:text>
+    </xsl:if>
+    <xsl:value-of select="text()"/>
+  </xsl:template>
+
+  <xsl:template match="documentation-string">
+    <xsl:apply-templates/>
+  </xsl:template>
+
+  <xsl:template match="short">
+    <xsl:apply-templates/>
+  </xsl:template>
+
+  <xsl:template match="em">
+    <i>
+      <xsl:apply-templates/>
+    </i>
+  </xsl:template>
+
+  <xsl:template match="var">
+    <tt>
+      <xsl:apply-templates/>
+    </tt>
+  </xsl:template>
+
+  <xsl:template match="code">
+    <tt>
+      <xsl:apply-templates/>
+    </tt>
+  </xsl:template>
+
+  <xsl:template match="fun">
+    <a href="{@id}.html">
+      <tt>
+	<xsl:apply-templates/>
+      </tt>
+    </a>
+  </xsl:template>
+
+  <xsl:template match="a">
+    <a href="{@a}">
+      <xsl:apply-templates/>
+    </a>
+  </xsl:template>
+
+  <xsl:template match="class">
+    <a href="{@id}.html">
+      <tt>
+	<xsl:apply-templates/>
+      </tt>
+    </a>
+  </xsl:template>
+
+  <xsl:template match="variable">
+    <a href="{@id}.html">
+      <tt>
+	<xsl:apply-templates/>
+      </tt>
+    </a>
+  </xsl:template>
+
+  <xsl:template match="itemize">
+    <ul>
+      <xsl:apply-templates/>
+    </ul>
+  </xsl:template>
+
+  <xsl:template match="item">
+    <li>
+      <xsl:apply-templates/>
+    </li>
+  </xsl:template>
+
+  <xsl:template match="see"/>
+  <xsl:template match="arg"/>
+  <xsl:template match="return"/>
+  <xsl:template match="implementation-note"/>
+
+  <xsl:template match="see" mode="meta">
+    <a href="{@id}.html">
+      <tt>
+	<xsl:apply-templates/>
+      </tt>
+    </a>
+    <br/>
+  </xsl:template>
+
+  <xsl:template match="arg" mode="meta">
+    <li>
+      <tt>
+	<xsl:value-of select="@arg"/>
+      </tt>
+      <xsl:text> -- </xsl:text>
+      <xsl:apply-templates/>
+    </li>
+  </xsl:template>
+
+  <xsl:template match="return" mode="meta">
+    <xsl:apply-templates/>
+  </xsl:template>
+
+  <xsl:template match="implementation-note" mode="meta">
+    <xsl:apply-templates/>
+  </xsl:template>
+
+  <xsl:template match="break">
+    <br/><br/>
+  </xsl:template>
+
+  <xsl:template match="section"/>
+
+  <xsl:template match="section" mode="meta">
+    <h2>
+      <a name="{generate-id()}"/>
+      <xsl:value-of select="@section"/>
+    </h2>
+    <xsl:apply-templates/>
+  </xsl:template>
+
+  <xsl:template match="section" mode="toc">
+    <a href="#{generate-id()}" style="font-weight: bold">
+      <xsl:value-of select="@section"/>
+    </a>
+    <br/>
+  </xsl:template>
+
+  <xsl:template match="aboutfun">
+    <xsl:variable name="fun" select="text()"/>
+    <xsl:apply-templates mode="about-arguments"
+			 select="//function[@name=$fun]/arguments"/>
+    <div style="margin-left: 3em">
+      <xsl:choose>
+	<xsl:when test="//function[@name=$fun]/documentation-string//short">
+	  <xsl:for-each select="//function[@name=$fun]">
+	    <xsl:apply-templates select="documentation-string//short"/>
+	    <xsl:text> </xsl:text>
+	    <a href="{@id}.html#details">...</a>
+	  </xsl:for-each>
+	</xsl:when>
+	<xsl:otherwise>
+	  <xsl:apply-templates
+	     select="//function[@name=$fun]/documentation-string"/>
+	</xsl:otherwise>
+      </xsl:choose>
+    </div>
+    <br/>
+  </xsl:template>
+
+  <xsl:template match="aboutclass">
+    <xsl:variable name="name" select="text()"/>
+    <xsl:for-each select="//class[@name=$name]">
+      <div class="def">
+	<a href="{@id}.html">
+	  Class
+	  <xsl:value-of select="@name"/>
+	</a>
+      </div>
+    </xsl:for-each>
+    <div style="margin-left: 3em">
+      <xsl:choose>
+	<xsl:when test="//class[@name=$name]/documentation-string//short">
+	  <xsl:for-each select="//class[@name=$name]">
+	    <xsl:apply-templates select="documentation-string//short"/>
+	    <xsl:text> </xsl:text>
+	    <a href="{@id}.html#details">...</a>
+	  </xsl:for-each>
+	</xsl:when>
+	<xsl:otherwise>
+	  <xsl:apply-templates
+	     select="//class[@name=$name]/documentation-string"/>
+	</xsl:otherwise>
+      </xsl:choose>
+    </div>
+    <br/>
+  </xsl:template>
+
+  <xsl:template name="page-header">
+    <xsl:call-template name="header">
+      <xsl:with-param name="base" select="'../'"/>
+    </xsl:call-template>
+  </xsl:template>
+
+  <xsl:template name="header">
+    <xsl:param name="base"/>
+    <div id="header">
+      <table cellspacing="0" cellpadding="0" width="100%">
+	<tr>
+	  <td width="176">
+	    <img src="{$base}logo.png"/>
+	  </td>
+	  <td valign="center">
+	    &#x2014;
+	    <b> Relax NG for Closure XML</b>
+	  </td>
+	  <td valign="center" align="right">
+            <b>API documentation</b>
+	  </td>
+	</tr>
+      </table>
+    </div>
+  </xsl:template>
+</xsl:stylesheet>
diff --git a/doc/logo.png b/doc/logo.png
new file mode 100644
index 0000000000000000000000000000000000000000..0acc5917f25785e73123491dc073e5770946994d
GIT binary patch
literal 2902
zcwPZk3#s&pP)<h;3K|Lk000e1NJLTq006N7001Be1^@s6T@#rj00006VoOIv0RI60
z0RN!9r;`8x010qNS#tmY3ljhU3ljkVnw%H_000McNliru*8~*{8XsWTpOpXr3gbyc
zK~#9!?VEc{R97CyKLZ1f3_}r=0xGatiUp|;j8GNpDpswvzG9L3Xf+zGajk)@uGQGM
zmY9axSQH!6ZdbIetCdz#CmkPUsa>@ot9FYI3?d@(SVROn2o5u6|F}AExq~t)p>*#z
znZW&>-#Pc(bHC@D-{V}35JI3rMHhyPIs__I601<5l30ZbmBcFk&!JU^;K3*^F2-my
za_7z+nOvjMFm2j2`uFdz4w6dZ-!6m@j2=CjYuBzhEH5uF=YtPEPzOpiCw{xITCJ3p
zmZ}4xlDG?RQ(7%=z4aDat-4{UB<{jUOG~4%u@Q^K!v6jH)d5j$;x0PVU0iT+alzHq
zRUM4q8;NZ;8%K{G#b`8g?%X+QYHHBwbcBY6GIs1(X3Utu#fukNzI-`7d-i0{o;?^0
z27CQer%v(HPd{O`TJ17dS65zo=_SI#!mwJc?BBni^73*Sp@t3}%BWGJ?6Tv>kCT^|
zhY$jdM#IF36Y=oy;QjaC=hUfF=yW>b<KtPnbSXteMWm*tlAD_gz~I4yNlHp0G&Hp9
zyfvE@u4KZm*MJtM2Kr6_pXa3in;PKK7f}2y)D?lo6`mdrL)U;;$UURK5sJQs`pV`u
zdJcx(W8mg_IJX0;PD4{Y7=j?=RS260F72R=5K#W3)PD7Upz#)T^9H|Yh*$#pKqyED
zi&@gwxPt!(@QZSKI5dxXb|O1Fn`O(EapA&+Hg$UR=z+mtproV(fPMS+F>BT=04`p<
zNO*WSj&2_q7)WVpDe39yELgC>VcU6mc|=7;QCeC`aBwg-o6TMp9UaZ(%a^%v<A$ux
zv}w~gbm)*GT;}cV&6zW22nh*!;4>dMaDeI4r`xZSl9D<nI`N;a@UIn0`E!flkDox<
zF*rIOe!Z&H@d$)D1>oihCsx7P6nVMtV0ivdki7&%ld^uFIGAh%SNFF2cl#=Q{|1!(
z;JDmX2SZjt-d|g>(G}(ugJ++Pw~0Uf^i#%-8}~p01Ju;i*a-|!U0rSezoevuw&qWH
zdHF*l16Qv~FQ~GzQbu5aoSYm5f$x*BHGu(c-MYnxAAZ<%R^nf;wYB^~!EVSL=a|3%
z^<_|T@*dfWmF0Cs@Xy7L2@Ftr6n@#-cHe3XVSjYn1O~7+C<zQ8tY9whc*ia~JDVj-
zmMDlbYSbta6B9{HOyuR4U&hVN?SbvY#KbUU$PkBRD_5>WtJN}d=1ltb?W-ssIB+0i
z#*6_VGBT2pBS)gqXk<D80Re2<w22p9ctKHr{`~o@S+fQg7Z=%cbs0Pp4~7tF<&qKX
zduau{Pe9Kg@am_0<@aUJEd*UJd9kGquz^-D-6!k~=;kBWx$w8P&74E=aHmqax(`_m
zgOb2ItPPvM75a>q%o%4PoPgD872)CG;+`QU0AVl~#E~OM6uQO5#bW5tp)%c%KmJ&u
z*Vx!7-g)O8ncn2dlSNZglQ?|%uyAv8v&*+^*&-Sm8XWd*_3G8KHZn6ag%CoVJ$qIr
zkByBLHk(ZdA;iRq6YX*@FRzC_|2N-!BWo)uDM@rXK6y%rG~~ZeyoD(ELI|5x2%Ala
z!VDq4og~E9qlGB^O4-JNaq{|q4-lfZsJXo6k`UXqa-GInWjlpmDf@EbFH%43B(eyR
zwMeOV^}9zN0;e3i<HwJ4{``4G2r4cvPN5qd9E{OuBs@HvnwlB_^m@HQ&)waf_uhMt
z+S*#u($WAh8jZxq$73>?uvjbrtX;d7x8Hud-F=OXjg@?zRx5dIY^;6NZdq1eU;q1X
z)xG+|6car4OtY;24C&WiM6Cm_KeTWfLM5lL;zYB|Tn6r5@_L2)<kvot5R(j=78|~c
z7DjJ_5)+u8Od`oCbK=;sV+zMDAt9kneSd#{_U_$FL_`E*#*AU|<jIbA5{-t`)Kuoq
zookn6WMp7AOP=fE#f#avaidcY*1daodo;t5ymeVeejAXIl7d#Nb^14T>Qv`$<k}sk
z|0pN$qaa|EQl{^tv};@A#?SKWe$(Xyw)e9egiPt25L;PUnd~|=H1wg_tnuT=lb@g8
zu2}46pM6GUWhF<B9BCehe*M_KeY?Wu?Mk?Q{kklS=uAE5-lhlW10KJ_ZXOO^P&=q%
zxh=oe^?bl8<M-s^_|7Q1yUW8WPkIYJckUc{d3iEfQBe_ziHUUOuc#h%0{*rpZaezY
z&0862YcmX2+&L?8SeV?iJb(T?6%`fu`};q3NAmOYiHnP~+s^?30rn)v)~#D{cXuZx
zC8bNQ$aCh*d8A4B;)^eKtq1KD1vM?gu7&@A;TyoMl`qtAQ%cr!28kz4nuJE9vA+<T
z&Bm%#t4L2zcStTF1V*Eg_3PJDUtf>OWOA5LxNzYDW5<rQ$B{>l9Er(fA|WAxg9i@+
zuzB-l+}+(tPEPJ}L>@M57{i7Q<9CnH1i18h3+L}T9G(s1(m{7GOjlnChvVVyt<E8F
zaBwgQ2?>1p<(GEZ?%lgFo6WrY?z==rMxxPZFq_R}Wo5Bt%NDY-vh2DC4jf?R%9Zx(
zvuDp@GMV`3qmQVnssg~z&yS3Z3_LwO*|TR4QBhG`x^xMEO`A4RSy@R;Obm19&b2#f
zCr_T_^y$;GzV6z!i`lbhE1n@ICx@Jz9HOJ6<snX+jh#Dp^4e>!;o;$d#bO~dGn0yn
z3cJqFKg%7LGiT1QZQC~cwZULu%9JVi`1o`zS!xTRGz)BZrPQ(A*}4P2Y?JGH_J!bA
zz{SD2kERAGqR@KVznCtim%X0_s|7B91vT=h6qmjL7dP;UXqE*{g5Klc`uEMUs|R6M
zUwAr3icD6VbnFy9j-lgh+PSK#is8eDQ(UaHY4mzMI-QQ2H*YGoPmM-HZf>r9MQUhh
zz|YT*+qZ8k+F7=28EI*0Bqt}cZrwVE{kWg<Eh{S{C@9FG<FsheB2rRP=+UExeCBGk
zl$4aPVZ#P??AYP3-HjVJvVQ$~rw4SxgbA2Trj8?UQv>Yuhr6}yuM@i!B9|-Wj?&I{
z`_>oUESJi2*0$jQ8YG>T=E9vSDPwr^7w4YqmG2;EV#hmn0KIzkB0D>qL4yV<%FJdn
z)z#Gs0_$`-cJACM+fwW5>Kqan;L4RNvcC_~xu2qTg!`#!1rM5<WQU3z)oJT%j)$RT
zn!Q7Cx6U~N1Kcig-nnY5mZA-HR~{UVXsB)#b?5~%Pr#r=DO%zPPshN3g`E?fXlYjD
z=H`-`nyPU2TEgGopA{=sP*707{Q2`0li~H(Ust53Jv=<@@#0ytX5r=K<!~Y`Tqq4f
zL_~zc)UsZ$XWqPdbnDg)UteEY*@zJ%h=_<FFfdTQ^Lly`A0Kab#+-Fn^?E%^moDvC
z5_j(f&(4*$@^*EqkCZ-kgaL0V)6M`It#l8ak7QPOI0)NmT%q3#$y`ya(4H`IGc5S8
zw8F-2g%O(}?sJ$^2s2MgC)PU4oN(m46&DwipPz3(bmQym%YXp`2n`MG((zpt9f+KD
z@bBd2>#5n$`^C;7u?iJV!(xWL&r2uf>~YA;@KnE!k4~si(a!BzIt+iSKsx-c?=78*
zv)z?s`P=0L_6(Ar)lf;SqSH~70f%O_Uw_D-;W5lk^+Qn=Pafv7_UjH<00WnGu4AV{
zg#veP!w*ZPB#F)9VCi&+z|m6dI^@;IT7?1r2Xmm)yAwqa&j0`b07*qoM6N<$g8c5B
AhX4Qo

literal 0
HcwPel00001

diff --git a/index.css b/index.css
new file mode 100644
index 0000000..96df010
--- /dev/null
+++ b/index.css
@@ -0,0 +1,154 @@
+div.sidebar {
+  float: right;
+  min-width: 15%;
+  padding: 0pt 5pt 5pt 5pt;
+  font-family: verdana, arial;
+}
+
+.sidebar a {
+  border-top: 1px solid #eeeeee;
+  border-left: 1px solid #eeeeee;
+  border-right: 1px solid #eeeeee;
+}
+
+#homepage a {
+  text-decoration: none;
+  color: black;
+  border-bottom: 1px solid #ff9500;
+  border-top: 1px solid white;
+  border-left: 1px solid white;
+  border-right: 1px solid white;
+}
+
+#homepage a:hover {
+  color: #ff9500;
+  border-bottom: 1px solid #aaaaaa;
+}
+
+div.sidebar-title {
+  font-weight: bold;
+  color: #ffffff;
+  background-color: #000000; /* #0000aa */
+  border: solid #000000; /* #0000aa */
+  border-top-width: 1px;
+  border-bottom-width: 0px;
+  border-left-width: 4px;
+  border-right-width: 0px;
+  margin: 0em 2pt 1px 2em;
+}
+
+div.sidebar-title a {
+  color: #ffffff;
+}
+
+div.sidebar-main {
+  background-color: #eeeeee;
+  border: solid #000000; /* #0000aa */
+  border-top-width: 0px;
+  border-bottom-width: 0px;
+  border-left-width: 4px;
+  border-right-width: 0px;
+  margin: 0em 2pt 1em 2em;
+  padding-top: 2px;
+  padding-left: 2px;
+}
+
+div.sidebar ul {
+  list-style-type: square;
+  padding: 0pt 0pt 0pt 1em;
+  margin: 0 0 1em;
+}
+
+div.sidebar ul.sub {
+  list-style-type: disc;
+  padding: 0pt 0pt 0pt 1em;
+  margin: 0 0 1em;
+}
+
+body {
+  color: #000000;
+  background-color: #ffffff;
+  margin-right: 0pt;
+  margin-bottom: 10%;
+  font-family: verdana, arial;
+//   background-image: url(bg.png);
+//   background-position: top left;
+//   background-attachment: fixed;
+//   background-repeat: no-repeat;
+}
+
+.main {
+  margin-top: 20px;
+  margin-left: 40px;
+  padding-left: 30px;
+}
+
+h1,h2,h3 {
+  margin-top: 2em;
+  margin-left: -30px;
+}
+
+.code {
+  border: solid 1px #d0d0d0;
+  padding: 1em;
+  margin-right: 10%;
+}
+
+.def {
+//  background-color: #ffcd87;
+//  background-color: #ffb247;
+//  background-color: #e0a655;
+  border-bottom: 1px solid black;
+  padding: 1px 1px 1px 1px;
+  margin-bottom: 1px;
+  font-weight: bold;
+  margin-right: 40px;
+}
+
+.def:hover {
+//  background-color: #ffcd87;
+//  background-color: #ffb247;
+  background-color: #e0a655;
+}
+
+.def a {
+  text-decoration: none;
+  color: #000000;
+  border-bottom: 0px solid white;
+  border-top: 0px solid white;
+  border-left: 0px solid white;
+  border-right: 0px solid white;
+}
+
+.def a:hover {
+  background-color: #e0a655;
+  color: #000000;
+  text-decoration: none;
+  border-bottom: 0px solid white;
+  border-top: 0px solid white;
+  border-left: 0px solid white;
+  border-right: 0px solid white;
+}
+
+.nomargin {
+  margin-bottom: 0;
+  margin-top: 0;
+}
+
+.noindent {
+  margin-left: -30px;
+}
+
+#header {
+  margin-right: 22px;
+  border-bottom: 1px solid black;
+  font-family: verdana, arial;
+  font-size: 12pt;
+}
+
+.code {
+  background-color: #eeeeee;
+  border: solid 1px #d0d0d0;
+  padding: 1em;
+  margin-right: 10%;
+}
diff --git a/index.html b/index.html
new file mode 100644
index 0000000..bd0b18e
--- /dev/null
+++ b/index.html
@@ -0,0 +1,91 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
+<html>
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
+<title>
+	  cxml-rng: Relax NG for Closure XML
+	</title>
+<link rel="stylesheet" type="text/css" href="index.css">
+</head>
+<body style="width: 60%">
+<div id="header"><table cellspacing="0" cellpadding="0" width="100%"><tr>
+<td width="176"><img src="doc/logo.png"></td>
+<td valign="center">
+	    —
+	    <b> Relax NG for Closure XML</b>
+</td>
+</tr></table></div>
+<div id="homepage" class="main">
+<p>
+	    An implementation
+	    of <a href="http://relaxng.org/spec-20011203.html">Relax
+	    NG</a> schema validation
+	    written in Common Lisp.
+	  </p>
+<p>
+	    cxml-rng was written
+	    by <a href="mailto:david@lichteblau.com">David
+	    Lichteblau</a> and is designed as an add-on library for
+	    <a href="http://common-lisp.net/project/cxml">Closure XML</a>.
+	    It is available under an X11-style license.
+	  </p>
+<p>
+	    Please send bug reports
+	    to <a href="mailto:cxml-devel@common-lisp.net">
+	      cxml-devel@common-lisp.net</a>
+	    (<a href="http://common-lisp.net/cgi-bin/mailman/listinfo/cxml-devel">list information</a>).
+	  </p>
+<h3>Download and Installation</h3>
+<p>
+	    Download
+	    cxml-rng <a href="http://www.lichteblau.com/cxml-rng/download/">tarballs</a>
+	    or get it from
+	    git: <tt>http://www.lichteblau.com/git/cxml-rng.git</tt></p>
+<p>
+	    cxml-rng
+	    needs <a href="http://common-lisp.net/project/cxml">Closure
+	    XML</a> and <a href="http://weitz.de/cl-ppcre/">CL-PPCE</a>.
+	    <a href="http://www.cliki.net/asdf">ASDF</a> is used for
+	    compilation.  Register the .asd file, e.g. by symlinking it,
+	    then compile cxml-rng using <tt>asdf:operate</tt>.
+	  </p>
+<pre>$ ln -sf `pwd`/cxml-rng.asd /path/to/your/registry/
+* (asdf:operate 'asdf:load-op :cxml-rng)</pre>
+<h3>Implementation-specific notes</h3>
+<p>
+	    At this point, cxml-rng is written to use Lisp strings (as opposed
+	    to runes), and as meant to be used on Lisp implementations
+	    with Unicode support.
+	  </p>
+<h3>Example</h3>
+<p>
+	    Use <a href="doc/pages/cxml-rng__parse-relax-ng.html">cxml-rng:parse-relax-ng</a>
+	    to parse a Relax NG schema file.  The
+	    resulting <a href="doc/pages/cxml-rng__parsed-grammar.html">parsed-grammar</a>
+	    object is a representation of a simplified schema using Lisp
+	    objects, which has gone through most stages of simplification as
+	    described the Relax NG
+	    specification.  <a href="doc/pages/cxml-rng__serialize-grammar.html">cxml-rng:serialize-grammar</a>
+	    can be used to write a Relax NG file in XML syntax for this
+	    grammar.
+	  </p>
+<p>
+	    In order to validate XML against a schema, create a
+	    validation handler for the grammar
+	    using <a href="doc/pages/cxml-rng__make-validator.html">cxml-rng:make-validator</a>.
+	    The validation
+	    handler processes SAX events and can be used with any
+	    function generating such events, in particular
+	    with <a href="http://common-lisp.net/project/cxml/sax.html#parser">cxml:parse-file</a>.
+	  </p>
+<pre class="code">(cxml:parse-file "test.xml"
+                 (cxml-rng:make-validator
+                  (cxml-rng:parse-relax-ng #p"test.rng")))</pre>
+<h3>Documentation</h3>
+<p>
+	    Detailed <a href="doc/index.html">API documentation</a>
+	    is available.
+	  </p>
+</div>
+</body>
+</html>
diff --git a/index.xsl b/index.xsl
new file mode 100644
index 0000000..94734bf
--- /dev/null
+++ b/index.xsl
@@ -0,0 +1,118 @@
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
+  <xsl:output method="html"
+	      indent="yes"
+	      doctype-public="-//W3C//DTD HTML 4.01 Transitional//EN"
+	      doctype-system="http://www.w3.org/TR/html4/loose.dtd"/>
+
+  <xsl:template match="/">
+    <html>
+      <head>
+	<title>
+	  cxml-rng: Relax NG for Closure XML
+	</title>
+	<link rel="stylesheet" type="text/css" href="index.css"/>
+	<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
+      </head>
+      <body style="width: 60%">
+	<xsl:call-template name="header"/>
+	<div id="homepage" class="main">
+	  <p>
+	    An implementation
+	    of <a href="http://relaxng.org/spec-20011203.html">Relax
+	    NG</a> schema validation
+	    written in Common Lisp.
+	  </p>
+	  <p>
+	    cxml-rng was written
+	    by <a href="mailto:david@lichteblau.com">David
+	    Lichteblau</a> and is designed as an add-on library for
+	    <a href="http://common-lisp.net/project/cxml">Closure XML</a>.
+	    It is available under an X11-style license.
+	  </p>
+	  <p>
+	    Please send bug reports
+	    to <a href="mailto:cxml-devel@common-lisp.net">
+	      cxml-devel@common-lisp.net</a>
+	    (<a href="http://common-lisp.net/cgi-bin/mailman/listinfo/cxml-devel">list information</a>).
+	  </p>
+
+	  <h3>Download and Installation</h3>
+
+	  <p>
+	    Download
+	    cxml-rng <a
+	    href="http://www.lichteblau.com/cxml-rng/download/">tarballs</a>
+	    or get it from
+	    git: <tt>http://www.lichteblau.com/git/cxml-rng.git</tt>
+	  </p>
+	  <p>
+	    cxml-rng
+	    needs <a href="http://common-lisp.net/project/cxml">Closure
+	    XML</a> and <a href="http://weitz.de/cl-ppcre/">CL-PPCE</a>.
+	    <a href="http://www.cliki.net/asdf">ASDF</a> is used for
+	    compilation.  Register the .asd file, e.g. by symlinking it,
+	    then compile cxml-rng using <tt>asdf:operate</tt>.
+	  </p>
+	  <pre>$ ln -sf `pwd`/cxml-rng.asd /path/to/your/registry/
+* (asdf:operate 'asdf:load-op :cxml-rng)</pre>
+
+	  <h3>Implementation-specific notes</h3>
+	  <p>
+	    At this point, cxml-rng is written to use Lisp strings (as opposed
+	    to runes), and as meant to be used on Lisp implementations
+	    with Unicode support.
+	  </p>
+
+	  <h3>Example</h3>
+	  <p>
+	    Use <a href="doc/pages/cxml-rng__parse-relax-ng.html">cxml-rng:parse-relax-ng</a>
+	    to parse a Relax NG schema file.  The
+	    resulting <a
+	    href="doc/pages/cxml-rng__parsed-grammar.html">parsed-grammar</a>
+	    object is a representation of a simplified schema using Lisp
+	    objects, which has gone through most stages of simplification as
+	    described the Relax NG
+	    specification.  <a href="doc/pages/cxml-rng__serialize-grammar.html">cxml-rng:serialize-grammar</a>
+	    can be used to write a Relax NG file in XML syntax for this
+	    grammar.
+	  </p>
+	  <p>
+	    In order to validate XML against a schema, create a
+	    validation handler for the grammar
+	    using <a href="doc/pages/cxml-rng__make-validator.html">cxml-rng:make-validator</a>.
+	    The validation
+	    handler processes SAX events and can be used with any
+	    function generating such events, in particular
+	    with <a
+	    href="http://common-lisp.net/project/cxml/sax.html#parser">cxml:parse-file</a>.
+	  </p>
+	  <pre class="code">(cxml:parse-file "test.xml"
+                 (cxml-rng:make-validator
+                  (cxml-rng:parse-relax-ng #p"test.rng")))</pre>
+
+	  <h3>Documentation</h3>
+	  <p>
+	    Detailed <a href="doc/index.html">API documentation</a>
+	    is available.
+	  </p>
+	</div>
+      </body>
+    </html>
+  </xsl:template>
+
+  <xsl:template name="header">
+    <div id="header">
+      <table cellspacing="0" cellpadding="0" width="100%">
+	<tr>
+	  <td width="176">
+	    <img src="doc/logo.png"/>
+	  </td>
+	  <td valign="center">
+	    &#x2014;
+	    <b> Relax NG for Closure XML</b>
+	  </td>
+	</tr>
+      </table>
+    </div>
+  </xsl:template>
+</xsl:stylesheet>
diff --git a/package.lisp b/package.lisp
index 04d745e..e0d87dc 100644
--- a/package.lisp
+++ b/package.lisp
@@ -1,4 +1,27 @@
 (defpackage :cxml-rng
   (:use :cl)
-  (:export #:parse-relax-ng
-	   #:make-validator))
+  (:export #:rng-error
+	   #:parsed-grammar
+	   #:parse-relax-ng
+	   #:serialize-grammar
+	   #:make-validator)
+  (:documentation
+   "@code{cxml-rng} implements @a[http://relaxng.org/spec-20011203.html]{
+    Relax NG} schema validation for Closure XML.
+
+    @begin[Example]{section}
+    @begin{code}
+    (cxml:parse-file \"test.xml\"
+                     (cxml-rng:make-validator
+                      (cxml-rng:parse-relax-ng #p\"test.rng\")))
+    @end{code}
+    @end{section}
+    @begin[Classes]{section}
+    @aboutclass{parsed-grammar}
+    @aboutclass{rng-error}
+    @end{section}
+    @begin[Parsing and validating]{section}
+    @aboutfun{parse-relax-ng}
+    @aboutfun{make-validator}
+    @aboutfun{serialize-grammar}
+    @end{section}"))
-- 
2.11.4.GIT