X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftime.lisp;fp=tests%2Ftime.lisp;h=01c2090cafa46b3a719a8074c013a1b86ce29d52;hb=7004c2691d5695471c7bce9d62b82a1914cf05a2;hp=cccd0b40f80421aa319a6ae294099a470906e0cc;hpb=5a7117c2a750662b4ecd36c62c7c073d76f64b4e;p=uffi.git diff --git a/tests/time.lisp b/tests/time.lisp index cccd0b4..01c2090 100644 --- a/tests/time.lisp +++ b/tests/time.lisp @@ -32,14 +32,17 @@ (uffi:def-function ("time" c-time) ((time (* time-t))) + :module "c" :returning time-t) (uffi:def-function "gmtime" ((time (* time-t))) + :module "c" :returning (* tm)) (uffi:def-function "asctime" ((time (* tm))) + :module "c" :returning :cstring) (uffi:def-type time-t :unsigned-long) @@ -76,6 +79,7 @@ (uffi:def-function ("gettimeofday" c-gettimeofday) ((tv (* timeval)) (tz (* timezone))) + :module "c" :returning :int) (defun get-utime ()