(defpackage :charguess.cffi (:use :cl :cffi) (:export :guess)) (in-package :charguess.cffi) (load-foreign-library "/home/onjo/lisp/user/charguess/libcharguess/libcharguess.so") これにはいくつかやり方があって、FFI 経由で関数を呼び出す Lisp 関数を定義する方法と、 ;; パターン1: Lisp 関数を定義して使う (defcfun ("CharGuessInit" char-guess-init) :int) (defcfun ("GuessChardet" guess-chardet) :string (str (:pointer :uchar))) (defcfun ("CharGuessDone" ch