sig type tag_t val socktype : Cf_socket.ST.tag_t Cf_socket.socktype_t end