X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=doc%2Fref_declare.xml;h=5352722ea45584b0d90e18eb0c34d61597ee0e73;hb=4536279431c3b1dda383ae4ddb5c68cc6377b456;hp=756ed870e481660fd44d4f15f8c83526aa23aa9d;hpb=6be0cb84dd1fc6a0ae9410f7ccdc34ac21ae4377;p=uffi.git

diff --git a/doc/ref_declare.xml b/doc/ref_declare.xml
index 756ed87..5352722 100644
--- a/doc/ref_declare.xml
+++ b/doc/ref_declare.xml
@@ -7,7 +7,7 @@
   
 <reference id="ref_declarations">
   <title>Declarations</title>
-
+  
   <partintro>
     <sect1>
       <title>Overview</title>
@@ -19,64 +19,64 @@
     </sect1>
   </partintro>
 
-      <refentry id="def-type">
-	<refnamediv>
-	  <refname>def-type</refname>
-	<refpurpose>Defines a Common Lisp type. 
-	</refpurpose>
-	<refclass>Macro</refclass>
-      </refnamediv>
-      <refsynopsisdiv>
-	<title>Syntax</title>
-	<synopsis>
-	  <function>def-type</function> <replaceable>name type</replaceable>
-	</synopsis>
-      </refsynopsisdiv>
-      <refsect1>
-	<title>Arguments and Values</title>
-	<variablelist>
-	  <varlistentry>
-	    <term><parameter>name</parameter></term>
-	    <listitem>
-	      <para>A symbol naming the type</para>
-	    </listitem>
-	  </varlistentry>
-	  <varlistentry>
-	    <term><parameter>type</parameter></term>
-	    <listitem>
-	      <para>A form that is evaluated that specifies the &uffi; type.
-	      </para>
-	    </listitem>
-	  </varlistentry>
-	</variablelist>
-      </refsect1>
-      <refsect1>
-	<title>Description</title>
-	<para>Defines a Common Lisp type based on a &uffi; type.
-	</para>
-      </refsect1>
-      <refsect1>
-	<title>Examples</title>
-	<programlisting>
+  <refentry id="def-type">
+    <refnamediv>
+      <refname>def-type</refname>
+      <refpurpose>Defines a Common Lisp type. 
+      </refpurpose>
+      <refclass>Macro</refclass>
+    </refnamediv>
+    <refsynopsisdiv>
+      <title>Syntax</title>
+      <synopsis>
+	<function>def-type</function> <replaceable>name type</replaceable>
+      </synopsis>
+    </refsynopsisdiv>
+    <refsect1>
+      <title>Arguments and Values</title>
+      <variablelist>
+	<varlistentry>
+	  <term><parameter>name</parameter></term>
+	  <listitem>
+	    <para>A symbol naming the type</para>
+	  </listitem>
+	</varlistentry>
+	<varlistentry>
+	  <term><parameter>type</parameter></term>
+	  <listitem>
+	    <para>A form that is evaluated that specifies the &uffi; type.
+	    </para>
+	  </listitem>
+	</varlistentry>
+      </variablelist>
+    </refsect1>
+    <refsect1>
+      <title>Description</title>
+      <para>Defines a Common Lisp type based on a &uffi; type.
+      </para>
+    </refsect1>
+    <refsect1>
+      <title>Examples</title>
+      <programlisting>
 (def-type char-ptr '(* :char))
 ...
 (defun foo (ptr)
-  (declare (type char-ptr ptr))
-  ...
-	</programlisting>
-      </refsect1>
-      <refsect1>
-	<title>Side Effects</title>
-	<para>Defines a new &cl; type.</para>
-      </refsect1>
-      <refsect1>
-	<title>Affected by</title>
-	<para>None.</para>
-      </refsect1>
-      <refsect1>
-	<title>Exceptional Situations</title>
-	<para>None.</para>
-      </refsect1>
-    </refentry>
-  </reference>
+(declare (type char-ptr ptr))
+...
+      </programlisting>
+    </refsect1>
+    <refsect1>
+      <title>Side Effects</title>
+      <para>Defines a new &cl; type.</para>
+    </refsect1>
+    <refsect1>
+      <title>Affected by</title>
+      <para>None.</para>
+    </refsect1>
+    <refsect1>
+      <title>Exceptional Situations</title>
+      <para>None.</para>
+    </refsect1>
+  </refentry>
+</reference>