Hi zeromq-dev,

In the common lisp bindings,
Is there a good reason for:
a) xreq and xrep not being exported?
b) the device function being missing in zeromq-api.lisp ?

If not, you can use the attached patch. :)
I did some simple testing and everything seems to work fine.

regards,
Sölvi
From dfcec72d1d53d41cc84971a2effe11b38f594d8b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?S=C3=B6lvi=20P=C3=A1ll=20=C3=81sgeirsson?= <[email protected]>
Date: Sun, 27 Jun 2010 18:57:12 +0000
Subject: [PATCH 1/2] Export xrep and xreq

---
 package.lisp |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/package.lisp b/package.lisp
index bd1b002..cb4c9cd 100644
--- a/package.lisp
+++ b/package.lisp
@@ -50,6 +50,8 @@
    #:unsubscribe
    #:upstream
    #:vsm
+   #:xrep
+   #:xreq
 
    #:events
 
-- 
1.7.0.1


From e94ab1f8fcfdc0092af9410f299154ef360b39ce Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?S=C3=B6lvi=20P=C3=A1ll=20=C3=81sgeirsson?= <[email protected]>
Date: Sun, 27 Jun 2010 19:59:16 +0000
Subject: [PATCH 2/2] Add support for device

---
 zeromq-api.lisp |    3 +++
 zeromq.lisp     |    8 ++++++++
 2 files changed, 11 insertions(+), 0 deletions(-)

diff --git a/zeromq-api.lisp b/zeromq-api.lisp
index c801ae1..06e705d 100644
--- a/zeromq-api.lisp
+++ b/zeromq-api.lisp
@@ -196,4 +196,7 @@ The string must be freed with FOREIGN-STRING-FREE."
            (mem-ref minor :int)
            (mem-ref patch :int))))
 
+(defun device (device insocket outsocket)
+  (%device device insocket outsocket))
+  
 ;
diff --git a/zeromq.lisp b/zeromq.lisp
index 18c22c3..9dcc5c4 100644
--- a/zeromq.lisp
+++ b/zeromq.lisp
@@ -192,6 +192,14 @@
 
 (defcfun ("zmq_errno" errno) :int)
 
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;  Devices
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defconstant streamer 1)
+(defconstant forwarder 2)
+(defconstant queue 3)
+
 (defcfun* ("zmq_device" %device) :int
   (device      :int)
   (insocket    :pointer)
-- 
1.7.0.1

Attachment: signature.asc
Description: OpenPGP digital signature

_______________________________________________
zeromq-dev mailing list
[email protected]
http://lists.zeromq.org/mailman/listinfo/zeromq-dev

Reply via email to