package.lisp

   1 ;; Copyright 2009 Vitaly Mayatskikh <v.mayatskih@gmail.com>
   2 ;;
   3 ;; This file is a part of CL-ZMQ
   4 ;;
   5 ;; CL-ZMQ is free software: you can redistribute it and/or modify
   6 ;; it under the terms of the GNU General Public License as published by
   7 ;; the Free Software Foundation, either version 3 of the License, or
   8 ;; (at your option) any later version.
   9 ;;
  10 ;; CL-ZMQ is distributed in the hope that it will be useful,
  11 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 ;; GNU General Public License for more details.
  14 ;;
  15 ;; You should have received a copy of the GNU General Public License
  16 ;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17
  18 (defpackage #:cl-zmq
  19   (:nicknames :zmq)
  20   (:use :cl :cffi :closer-mop)
  21   (:shadow #:sleep #:close)
  22   (:export
  23    ;; constants
  24    #:hausnumero
  25    #:emthread
  26    #:efsm
  27    #:enocompatproto
  28    #:max-vsm-size
  29    #:delimiter
  30    #:vsm
  31    #:poll
  32    #:p2p
  33    #:pub
  34    #:sub
  35    #:req
  36    #:rep
  37    #:hwm
  38    #:lwm
  39    #:swap
  40    #:affinity
  41    #:identity
  42    #:subscribe
  43    #:unsubscribe
  44    #:rate
  45    #:recovery-ivl
  46    #:mcast-loop
  47    #:noblock
  48    #:noflush
  49
  50    ;; structures
  51    #:msg
  52    #:pollitem
  53
  54    ;; functions
  55    #:make-message
  56    #:free-message
  57    #:strerror
  58    #:msg-init
  59    #:msg-init-size
  60    #:msg-init-data
  61    #:msg-close
  62    #:msg-move
  63    #:msg-copy
  64    #:msg-data-as-string
  65    #:msg-data-as-array
  66    #:msg-size
  67    #:msg-type
  68    #:init
  69    #:term
  70    #:socket
  71    #:close
  72    #:setsockopt
  73    #:bind
  74    #:connect
  75    #:send
  76    #:flush
  77    #:recv
  78    #:stopwatch-start
  79    #:stopwatch-stop
  80    #:sleep
  81    #:poll
  82
  83    ;; macros
  84    #:with-context
  85    #:with-socket
  86    #:with-stopwatch
  87
  88    ;; conditions
  89    #:error-again))
  90
  91 (in-package :cl-zmq)
  92
  93 (eval-when (:compile-toplevel :load-toplevel :execute)
  94   (define-foreign-library zmq
  95     (:unix (:or "libzmq.so.0.0.0" "libzmq.so"))
  96     (t "libzmq")))
  97
  98 (use-foreign-library zmq)