(bind-func nnsock_create "return socket id (i32)" (lambda (protocol) (let ((sock (nn_socket AF_SP protocol))) (if (< sock 0) (nn_println_strerror "error creating socket")) sock)))