X-Git-Url: http://git.kpe.io/?p=uffi.git;a=blobdiff_plain;f=tests%2Fgetenv.lisp;h=6fafc45e2c370ad2e67a878cb921599b522175dc;hp=19fe1936ddf600b23a6804c18e0b68c7f3a93230;hb=7004c2691d5695471c7bce9d62b82a1914cf05a2;hpb=5a7117c2a750662b4ecd36c62c7c073d76f64b4e diff --git a/tests/getenv.lisp b/tests/getenv.lisp index 19fe193..6fafc45 100644 --- a/tests/getenv.lisp +++ b/tests/getenv.lisp @@ -18,16 +18,19 @@ (uffi:def-function ("getenv" c-getenv) ((name :cstring)) + :module "c" :returning :cstring) (uffi:def-function ("setenv" c-setenv) ((name :cstring) (value :cstring) (overwrite :int)) + :module "c" :returning :int) (uffi:def-function ("unsetenv" c-unsetenv) ((name :cstring)) + :module "c" :returning :void) (defun my-getenv (key)