
  TYPE
    nat$sk_socket_status = record
      clear_to_send: boolean,
      data_pending_receive: integer,
      connection_pending: boolean,
    recend;
