File Coverage

xs/Proxy.xs
Criterion Covered Total %
statement 9 11 81.8
branch 6 12 50.0
condition n/a
subroutine n/a
pod n/a
total 15 23 65.2


line stmt bran cond sub pod time code
1             MODULE = ZMQ::Raw PACKAGE = ZMQ::Raw::Proxy
2              
3             SV *
4             new (class)
5             SV *class
6              
7             PREINIT:
8 1           zmq_raw_proxy *proxy = NULL;
9              
10             CODE:
11 1           Newxz (proxy, 1, zmq_raw_proxy);
12 1           ZMQ_NEW_OBJ (RETVAL, "ZMQ::Raw::Proxy", proxy);
13              
14             OUTPUT: RETVAL
15              
16             void
17             start (self, frontend, backend, ...)
18             SV *self
19             SV *frontend
20             SV *backend
21              
22             PREINIT:
23 1           zmq_raw_socket *f, *b, *c = NULL, *s = NULL;
24              
25             CODE:
26 1           f = ZMQ_SV_TO_PTR (Socket, frontend);
27 1           b = ZMQ_SV_TO_PTR (Socket, backend);
28 1 50         if (SvOK (ST (3)))
    50          
    50          
29 0           c = ZMQ_SV_TO_PTR (Socket, ST (3));
30 1 50         if (SvOK (ST (4)))
    50          
    50          
31 0           s = ZMQ_SV_TO_PTR (Socket, ST (4));
32             #ifdef USE_ITHREADS
33             zmq_proxy_steerable (f->socket, b->socket,
34             c ? c->socket : NULL,
35             s ? s->socket : NULL);
36             #else
37 1           croak_usage ("proxy requires interpreter threads");
38             #endif
39