Common Lisp通过CFFI调用C动态库

原创
2014/05/29 16:17
阅读数 905

以上篇博客Linux下动态链接库文件的编译与使用中的libmodulec.so库为例,编写调用代码:

(asdf:oos 'asdf:load-op :cffi)

(defpackage :cffi-user
  (:use :common-lisp :cffi))

(in-package :cffi-user)

(defvar *lib-handler* nil)

(defun load-foreign-lib ()
  (setq *lib-handler* 
        (load-foreign-library "libmodulec.so" :search-path "~/projects/swig_prj/")))

(defun exec-foreign-interface ()
  (foreign-funcall add-nums :int 4 :int 8 :int))

(defun unload-foreign-lib ()
  (close-foreign-library *lib-handler*))

执行过程及结果如下:




展开阅读全文
加载中

作者的其它热门文章

打赏
0
0 收藏
分享
打赏
2 评论
0 收藏
0
分享
返回顶部
顶部