X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=doc%2Fnotes.xml;h=7d6d366cbe3175fc024d906bd525cc19a235c2a4;hb=e23ce13827d1948c2e46f2b36a4a22127615844a;hp=139267ebc454a98c80b6e3b17f2906ba59aca3e7;hpb=e26a86e113f9139d1d4b009e74809faf51af166b;p=uffi.git

diff --git a/doc/notes.xml b/doc/notes.xml
index 139267e..7d6d366 100644
--- a/doc/notes.xml
+++ b/doc/notes.xml
@@ -81,12 +81,12 @@
       <para>
 	Here is an example that should both methods being used for
 	maximum cross-implementation optimization:
-	<programlisting>
+	<screen>
 (uffi:def-type the-struct-type-def the-struct-type)
 (let ((a-foreign-struct (allocate-foreign-object 'the-struct-type)))
   (declare 'the-struct-type-def a-foreign-struct)
   (get-slot-value a-foreign-struct 'the-struct-type 'field-name))
-	</programlisting>
+	</screen>
       </para>
     </sect2>
   </sect1>