r2885: *** empty log message ***

[uffi.git] / doc / notes.sgml

diff --git a/doc/notes.sgml b/doc/notes.sgml
index cdb5f6d8788a7e81bf3a5ecdd28392874f1f461d..c4e86036a66c38184e5fd0ef2df771bf2dcbd997 100644 (file)
--- a/doc/notes.sgml
+++ b/doc/notes.sgml
@@ -77,8 +77,9 @@
        Here is an example that should both methods being used for
        maximum cross-implementation optimization:
        <programlisting>
+(uffi:def-type the-struct-type-def the-struct-type)
 (let ((a-foreign-struct (allocate-foreign-object 'the-struct-type)))
-  (uffi-declare 'the-struct-type a-foreign-struct)
+  (declare 'the-struct-type-def a-foreign-struct)
   (get-slot-value a-foreign-struct 'the-struct-type 'field-name))
        </programlisting>
       </para>