only retrieve pipe info if necessary

shikokuchuo · Nov 29, 2024 · cab230b · cab230b
1 parent df45d62
commit cab230b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/aio.c b/src/aio.c
@@ -423,7 +423,6 @@ SEXP rnng_unresolved2(SEXP x) {
 SEXP rnng_send_aio(SEXP con, SEXP data, SEXP mode, SEXP timeout, SEXP pipe, SEXP clo) {
 
   const nng_duration dur = timeout == R_NilValue ? NNG_DURATION_DEFAULT : (nng_duration) nano_integer(timeout);
-  const int pipeid = nano_integer(pipe);
   nano_aio *saio;
   SEXP aio, env, fun;
   nano_buf buf;
@@ -432,6 +431,7 @@ SEXP rnng_send_aio(SEXP con, SEXP data, SEXP mode, SEXP timeout, SEXP pipe, SEXP
   const SEXP ptrtag = NANO_TAG(con);
   if ((sock = ptrtag == nano_SocketSymbol) || ptrtag == nano_ContextSymbol) {
 
+    const int pipeid = nano_integer(pipe);
     nano_encodes(mode) == 2 ? nano_encode(&buf, data) : nano_serialize(&buf, data, NANO_PROT(con));
     nng_msg *msg;
     saio = R_Calloc(1, nano_aio);