X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftime.lisp;h=9d9546364243e08e53deb1d7409f8e304efae311;hb=3ade95bab16abe09642554e9cbf56f117f01e507;hp=89382a86a1efca4345c04a6bed19eaa063ae8222;hpb=bbe3653207a655c6fc596474e75092fd0affd0bd;p=uffi.git diff --git a/tests/time.lisp b/tests/time.lisp index 89382a8..9d95463 100644 --- a/tests/time.lisp +++ b/tests/time.lisp @@ -9,7 +9,7 @@ ;;;; ;;;; $Id$ ;;;; -;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg +;;;; This file, part of UFFI, is Copyright (c) 2002-2005 by Kevin M. Rosenberg ;;;; ;;;; ************************************************************************* @@ -43,7 +43,7 @@ :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)