Sun Dec 13 11:17:08 CET 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>

* Update to the new Smoke ABI (v.3)

--- old-smoke/src/smoke-c/smoke-c.lisp 2014-10-30 08:10:02.000000000 +0100

+++ new-smoke/src/smoke-c/smoke-c.lisp 2014-10-30 08:10:02.000000000 +0100

@@ -3,7 +3,7 @@

;; Load the qt smoke binding to prevent undefined aliens.

(eval-when (:load-toplevel :compile-toplevel :execute)

(define-foreign-library libsmokeqt

- (:unix "libsmokeqt.so.2")

+ (:unix "libsmokeqt.so.3")

(t (:default "libsmokeqt")))

#-mudballs

(define-foreign-library libsmoke-c

@@ -51,6 +51,8 @@

(defcfun smoke-destruct :void

(smoke smoke-binding))

+;; Smoke::ModuleIndex is a POD-struct.

+;; Thus we can treat it as a C struct.

(defcstruct smoke-module-index

(smoke :pointer)

(index smoke-index))