;;; Bindings for bus API functions

(in-package :libdbus)

(export '(dbus-bus-get dbus-bus-request-name))

(defcfun "dbus_bus_get" :pointer 
  (type dbus-bus-type) 
  (error :pointer))
  
(defcfun "dbus_bus_request_name" :int
  (connection :pointer)
  (name :string)
  (flags :uint)
  (error :pointer))