X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=doc%2Fref_declare.xml;h=9c3f90292be87e6db02ce53e1c5174b5a36805d7;hb=27073cc090c29aa5dcf9ed9becdf3e73b937b0bb;hp=7043e33fb28773edf5bb93e5aedc8f224aa6e6a1;hpb=466148daa2e13a529e7338aeaf83cdc49c47ddbb;p=uffi.git

diff --git a/doc/ref_declare.xml b/doc/ref_declare.xml
index 7043e33..9c3f902 100644
--- a/doc/ref_declare.xml
+++ b/doc/ref_declare.xml
@@ -1,7 +1,7 @@
-<?xml version='1.0' ?>   <!-- -*- DocBook -*- -->
+<?xml version="1.0" encoding="utf-8"?>
 <!DOCTYPE book PUBLIC "-//OASIS//DTD DocBook XML V4.2//EN"
                "http://www.oasis-open.org/docbook/xml/4.2/docbookx.dtd" [
-<!ENTITY % myents SYSTEM "entities.xml">
+<!ENTITY % myents SYSTEM "entities.inc">
 %myents;
 ]>
   
@@ -44,7 +44,7 @@
 	<varlistentry>
 	  <term><parameter>type</parameter></term>
 	  <listitem>
-	    <para>A form that is evaluated that specifies the &uffi; type.
+	    <para>A form that specifies the &uffi; type. It is not evaluated.
 	    </para>
 	  </listitem>
 	</varlistentry>
@@ -57,13 +57,13 @@
     </refsect1>
     <refsect1>
       <title>Examples</title>
-      <programlisting>
+      <screen>
 (def-type char-ptr '(* :char))
 ...
 (defun foo (ptr)
 (declare (type char-ptr ptr))
 ...
-      </programlisting>
+      </screen>
     </refsect1>
     <refsect1>
       <title>Side Effects</title>