zeromq: fix for ERROR: change.

diff --git a/extra/zeromq/zeromq.factor b/extra/zeromq/zeromq.factor
index 6f17a2385103afc6222c0da0a58f2b71189f67c4..b92e95f85adc6c1b7444eb2b660a635dd1a664d2 100644 (file)
--- a/extra/zeromq/zeromq.factor
+++ b/extra/zeromq/zeromq.factor
@@ -7,10 +7,10 @@ kernel libc math namespaces sequences zeromq.ffi ;
 
 IN: zeromq
 
-ERROR: zmq-error n string ;
+TUPLE: zmq-error n string ;
 
 : throw-zmq-error ( -- )
-    zmq_errno dup zmq_strerror zmq-error ; inline
+    zmq_errno dup zmq_strerror zmq-error boa throw ; inline
 
 : check-zmq-error ( retval -- )
     [ throw-zmq-error ] unless-zero ; inline