;;; Some initialization and common code

(defpackage :libdbus-swig
  (:use :common-lisp :cffi)
  (:documentation "A low-level binding for the DBus IPC system built with SWIG."))
  
(in-package :libdbus-swig)

; For libdbus from MacPorts
(push #p"/opt/local/lib/" *foreign-library-directories*)

(define-foreign-library libdbus
  (:darwin "libdbus-1.dylib")
  (:unix (:or "libdbus-1.so.0" "libdbus.so"))
  (t (:default "libdbus")))
  
(use-foreign-library libdbus)