package/package.lisp

   1 (defpackage
   2     sane-lowlevel
   3   (:use cl cffi)
   4   (:export :ensure-ok))
   5
   6 (defpackage
   7     sane
   8   (:use cl iterate cffi sane-lowlevel trivial-gray-streams)
   9   (:export
  10    ;; Library
  11    :with-init
  12    ;; Device
  13    :devices
  14    :device-name :device-vendor :device-model :device-type
  15    :with-device
  16    ;; Option getters
  17    :get-name :get-title :get-description :get-device
  18    :get-capabilities :get-constraint
  19    ;; Constraints
  20    :get-min :get-step :get-max :get-list
  21    ;; Main option functions
  22    :option-value-readable-p
  23    :option :value))