X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftime.lisp;h=fe8e305402e8ccdccb5f8a5a27c1668d3a19f416;hb=c8d044ecb8a0181cf45b36f00984ecd487d44c62;hp=78accd28bf47f3a4f56b3652a97420d4b47e1c14;hpb=0824453227a26da41a3929c9117b66714980414b;p=uffi.git

diff --git a/tests/time.lisp b/tests/time.lisp
index 78accd2..fe8e305 100644
--- a/tests/time.lisp
+++ b/tests/time.lisp
@@ -36,14 +36,14 @@
 
 (uffi:def-function "gmtime"
     ((time (* time-t)))
-  :returning (* tm))
+  :returning (:struct-pointer tm))
 
 (uffi:def-function "asctime"
-    ((time (* tm)))
+    ((time (:struct-pointer tm)))
   :returning :cstring)
 
 (uffi:def-type time-t :unsigned-long)
-(uffi:def-type tm-pointer (* tm))
+(uffi:def-type tm-pointer (:struct-pointer tm))
 
 (deftest :time.1
    (uffi:with-foreign-object (time 'time-t)