Erm, forgot the code excerpt.

   1143           {
   1144             struct sockaddr_in c_inet;
   1145
   1146             c_inet.sin_addr.s_addr =
   1147               htonl (scm_to_ulong (SCM_SIMPLE_VECTOR_REF (address, 1)));
   1148             c_inet.sin_port =
   1149               htons (scm_to_ushort (SCM_SIMPLE_VECTOR_REF (address, 
2)));
   1150             c_inet.sin_family = AF_INET;
   1151
   1152             *address_size = sizeof (c_inet);
   1153             c_address = scm_malloc (sizeof (c_inet));
   1154             memcpy (c_address, &c_inet, sizeof (c_inet));
   1155           }


-- 
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]
Archive: 
http://lists.debian.org/[email protected]

Reply via email to