diff --git a/lib/krb5/send_to_kdc.c b/lib/krb5/send_to_kdc.c
index d690b5f91..110f56c85 100644
--- a/lib/krb5/send_to_kdc.c
+++ b/lib/krb5/send_to_kdc.c
@@ -106,7 +106,7 @@ recv_loop (int fd,
  * of a datagram socket.  See `recv_loop'.
  */
 
-static int
+int
 send_and_recv_udp(int fd, 
 		  time_t tmout,
 		  const krb5_data *req,
@@ -157,6 +157,15 @@ send_and_recv_tcp(int fd,
     return 0;
 }
 
+int
+_krb5_send_and_recv_tcp(int fd,
+			time_t tmout,
+			const krb5_data *req,
+			krb5_data *rep)
+{
+    return send_and_recv_tcp(fd, tmout, req, rep);
+}
+
 /*
  * `send_and_recv' tailored for the HTTP protocol.
  */