Can parse a key file. Cleared up raw confusion.

[chiark-tcl.git] / dgram / sockaddr.c

diff --git a/dgram/sockaddr.c b/dgram/sockaddr.c
index 4df9aa0376414750f1c4e30b72e83b1027e2a24d..2a388d018226f63603088421f86fc9dc24af9879 100644 (file)
--- a/dgram/sockaddr.c
+++ b/dgram/sockaddr.c
@@ -76,7 +76,7 @@ static void sockaddr_t_ustr(Tcl_Obj *o) {
   const struct sockaddr *sa;
   char i46buf[INET6_ADDRSTRLEN], portbuf[50];
   const struct sockaddr_in *sin;
-  int al, sl, pl;
+  int al;
   const char *string, *prepend;
   
   sa= sockaddr_addr(OBJ_SOCKADDR(o));
@@ -106,12 +106,10 @@ static void sockaddr_t_ustr(Tcl_Obj *o) {
     return;
   }
 
-  pl= strlen(prepend);
-  sl= strlen(string);
-  o->length= pl+sl;
-  o->bytes= TALLOC(pl+sl+1);
-  memcpy(o->bytes, prepend, pl);
-  memcpy(o->bytes+pl, string, sl+1);
+  obj_updatestr_vstringls(o,
+                         prepend, strlen(prepend),
+                         string, strlen(string),
+                         (char*)0);
 }
 
 static int sockaddr_t_sfa(Tcl_Interp *ip, Tcl_Obj *o) {