X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=doc%2Fref_primitive.xml;h=d9c3fda455bc44ca4473c423fc5ae04f9092c3c4;hb=895cdddc64ad069c4d8173a21d0d5ce47b79e919;hp=ca9d77e306d0698da4e80205cc7fdcba73150ebf;hpb=4536279431c3b1dda383ae4ddb5c68cc6377b456;p=uffi.git diff --git a/doc/ref_primitive.xml b/doc/ref_primitive.xml index ca9d77e..d9c3fda 100644 --- a/doc/ref_primitive.xml +++ b/doc/ref_primitive.xml @@ -1,7 +1,7 @@ - + + "http://www.oasis-open.org/docbook/xml/4.2/docbookx.dtd" [ + %myents; ]> @@ -126,10 +126,10 @@ Examples - + (def-constant pi2 (* 2 pi)) (def-constant exported-pi2 (* 2 pi) :export t) - + Side Effects @@ -185,11 +185,11 @@ Examples - + (def-foreign-type my-generic-pointer :pointer-void) (def-foreign-type a-double-float :double-float) (def-foreign-type char-ptr (* :char)) - + Side Effects @@ -253,14 +253,14 @@ Examples - + (def-array-pointer ca :unsigned-char) (let ((fs (convert-to-foreign-string "ab"))) (values (null-char-p (deref-array fs 'ca 0)) (null-char-p (deref-array fs 'ca 2)))) => &nil; &t; - + Side Effects