text: /*
   * Code for class NETWORK_STREAM_SOCKET
   */
  
  #include "eif_eiffel.h"
  #include "../E1/estructure.h"
  
  
  #ifdef __cplusplus
  extern "C" {
  #endif
  
  extern void F1022_8177(EIF_REFERENCE);
  extern void F1022_8178(EIF_REFERENCE);
  extern void F1022_8179(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);
  extern void F1022_8180(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);
  extern void F1022_8181(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern void F1022_8182(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern void F1022_8183(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);
  extern void F1022_8184(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);
  extern void F1022_8185(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern EIF_TYPED_VALUE F1022_8186(EIF_REFERENCE);
  extern void F1022_8187(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern EIF_TYPED_VALUE F1022_8188(EIF_REFERENCE);
  extern void F1022_8189(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern void F1022_8190(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern void F1022_8191(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern void F1022_8192(EIF_REFERENCE);
  extern EIF_TYPED_VALUE F1022_8193(EIF_REFERENCE);
  extern EIF_TYPED_VALUE F1022_8194(EIF_REFERENCE);
  extern EIF_TYPED_VALUE F1022_8195(EIF_REFERENCE);
  extern EIF_TYPED_VALUE F1022_8196(EIF_REFERENCE);
  extern EIF_TYPED_VALUE F1022_8197(EIF_REFERENCE);
  extern EIF_TYPED_VALUE F1022_8198(EIF_REFERENCE);
  extern void F1022_8199(EIF_REFERENCE);
  extern void F1022_8200(EIF_REFERENCE);
  extern void F1022_8201(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);
  extern void F1022_8202(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern void F1022_8203(EIF_REFERENCE);
  extern void F1022_8204(EIF_REFERENCE);
  extern void F1022_8205(EIF_REFERENCE);
  extern void F1022_8206(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern void F1022_8207(EIF_REFERENCE, EIF_TYPED_VALUE);
  extern void F1022_8208(EIF_REFERENCE);
  extern void F1022_8209(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);
  extern void F1022_8210(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);extern void en_socket_stream_create(EIF_INTEGER_32*, EIF_INTEGER_32*);
  
  extern void F1022_8211(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);extern void en_socket_stream_connect(EIF_INTEGER_32*, EIF_INTEGER_32*, EIF_INTEGER_32*, EIF_POINTER, EIF_INTEGER_32, EIF_BOOLEAN);
  
  extern void F1022_8212(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);extern void en_socket_stream_bind(EIF_INTEGER_32*, EIF_INTEGER_32*, EIF_INTEGER_32*, EIF_POINTER);
  
  extern void F1022_8213(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);extern void en_socket_stream_listen(EIF_INTEGER_32*, EIF_INTEGER_32*, EIF_POINTER, EIF_INTEGER_32);
  
  extern EIF_TYPED_VALUE F1022_8214(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);extern EIF_INTEGER_32 en_socket_stream_accept(EIF_INTEGER_32, EIF_INTEGER_32, EIF_INTEGER_32*, EIF_POINTER, EIF_INTEGER_32);
  
  extern void F1022_8215(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);extern void c_sock_name(EIF_INTEGER_32, EIF_POINTER, EIF_INTEGER_32);
  
  extern EIF_TYPED_VALUE F1022_8216(EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE);extern EIF_INTEGER_32 c_set_sock_opt_linger(EIF_INTEGER_32, EIF_BOOLEAN, EIF_INTEGER_32);
  
  extern EIF_TYPED_VALUE F1022_8217(EIF_REFERENCE, EIF_TYPED_VALUE);extern EIF_BOOLEAN c_is_linger_on(EIF_INTEGER_32);
  
  extern EIF_TYPED_VALUE F1022_8218(EIF_REFERENCE, EIF_TYPED_VALUE);extern EIF_INTEGER_32 c_linger_time(EIF_INTEGER_32);
  
  extern void EIF_Minit1022(void);
  
  #ifdef __cplusplus
  }
  #endif
  
  
  #ifdef __cplusplus
  extern "C" {
  #endif
  
  
  #ifdef __cplusplus
  }
  #endif
  
  
  #ifdef __cplusplus
  extern "C" {
  #endif
  
  /* {NETWORK_STREAM_SOCKET}.make_empty */
  void F1022_8177 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "make_empty";
  	RTEX;
  	EIF_REFERENCE tr1 = NULL;
  	EIF_NATURAL_64 tu8_1;
  	EIF_NATURAL_64 tu8_2;
  	EIF_NATURAL_64 tu8_3;
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(2);
  	RTLR(0,Current);
  	RTLR(1,tr1);
  	RTLIU(2);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14424);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14424);
  	RTIV(Current, RTAL);
  	RTHOOK(1);
  	RTDBGAA(Current, dtype, 5759, 0x04000000, 1); /* is_closed */
  	*(EIF_BOOLEAN *)(Current + RTWA(5759, dtype)) = (EIF_BOOLEAN) (EIF_BOOLEAN) 1;
  	RTHOOK(2);
  	(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWF(5396, dtype))(Current);
  	RTHOOK(3);
  	RTDBGAA(Current, dtype, 5648, 0x10000000, 1); /* family */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5421, dtype))(Current)).it_i4);
  	*(EIF_INTEGER_32 *)(Current + RTWA(5648, dtype)) = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(4);
  	RTDBGAA(Current, dtype, 5650, 0x10000000, 1); /* type */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5419, dtype))(Current)).it_i4);
  	*(EIF_INTEGER_32 *)(Current + RTWA(5650, dtype)) = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(5);
  	RTDBGAA(Current, dtype, 3535, 0xF80000E8, 0); /* last_string */
  	tr1 = RTLNSMART(RTWCT(3535, dtype, Dftype(Current)).id);
  	(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWC(4643, Dtype(tr1)))(tr1);
  	RTNHOOK(5,1);
  	tr1 = RTCCL(tr1);
  	RTAR(Current, tr1);
  	*(EIF_REFERENCE *)(Current + RTWA(3535, dtype)) = (EIF_REFERENCE) tr1;
  	RTHOOK(6);
  	RTDBGAA(Current, dtype, 5730, 0x3C000000, 1); /* timeout_ns */
  	tu8_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5127, dtype))(Current)).it_n8);
  	ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5752, dtype));
  	tu8_2 = (EIF_NATURAL_64) ti4_1;
  	*(EIF_NATURAL_64 *)(Current + RTWA(5730, dtype)) = (EIF_NATURAL_64) (EIF_NATURAL_64) (tu8_1 * tu8_2);
  	if (RTAL & CK_ENSURE) {
  		RTHOOK(7);
  		RTCT("timeout_set_to_default", EX_POST);
  		tu8_1 = *(EIF_NATURAL_64 *)(Current + RTWA(5730, dtype));
  		tu8_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5127, dtype))(Current)).it_n8);
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5752, dtype));
  		tu8_3 = (EIF_NATURAL_64) ti4_1;
  		if ((EIF_BOOLEAN)(tu8_1 == (EIF_NATURAL_64) (tu8_2 * tu8_3))) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  		RTHOOK(8);
  		RTCT("no_socket_created", EX_POST);
  		tb1 = *(EIF_BOOLEAN *)(Current + RTWA(5720, dtype));
  		if ((EIF_BOOLEAN) !tb1) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  	}
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(9);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  }
  
  /* {NETWORK_STREAM_SOCKET}.make */
  void F1022_8178 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "make";
  	RTEX;
  	EIF_NATURAL_64 tu8_1;
  	EIF_NATURAL_64 tu8_2;
  	EIF_NATURAL_64 tu8_3;
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14425);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14425);
  	RTIV(Current, RTAL);
  	RTHOOK(1);
  	(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWF(5760, dtype))(Current);
  	RTHOOK(2);
  	(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWF(5645, dtype))(Current);
  	if (RTAL & CK_ENSURE) {
  		RTHOOK(3);
  		RTCT("timeout_set_to_default", EX_POST);
  		tu8_1 = *(EIF_NATURAL_64 *)(Current + RTWA(5730, dtype));
  		tu8_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5127, dtype))(Current)).it_n8);
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5752, dtype));
  		tu8_3 = (EIF_NATURAL_64) ti4_1;
  		if ((EIF_BOOLEAN)(tu8_1 == (EIF_NATURAL_64) (tu8_2 * tu8_3))) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  		RTHOOK(4);
  		RTCT("socket_created", EX_POST);
  		tb1 = *(EIF_BOOLEAN *)(Current + RTWA(5720, dtype));
  		if (tb1) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  	}
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(5);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  }
  
  /* {NETWORK_STREAM_SOCKET}.make_client_by_port */
  void F1022_8179 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x)
  {
  	GTCX
  	char *l_feature_name = "make_client_by_port";
  	RTEX;
  	EIF_REFERENCE loc1 = (EIF_REFERENCE) 0;
  #define arg1 arg1x.it_i4
  #define arg2 arg2x.it_r
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_REFERENCE tr1 = NULL;
  	EIF_BOOLEAN tb1;
  	EIF_BOOLEAN tb2;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(5);
  	RTLR(0,arg2);
  	RTLR(1,loc1);
  	RTLR(2,ur1);
  	RTLR(3,Current);
  	RTLR(4,tr1);
  	RTLIU(5);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU(SK_REF,&arg2);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_REF, &loc1);
  	
  	RTEAA(l_feature_name, 1021, Current, 1, 2, 14426);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14426);
  	RTCC(arg2, 1021, l_feature_name, 2, eif_new_type(232, 0x01), 0x01);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("valid_peer_host", EX_PRE);
  		tb1 = '\0';
  		if ((EIF_BOOLEAN)(arg2 != NULL)) {
  			tb2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(4659, "is_empty", arg2))(arg2)).it_b);
  			tb1 = (EIF_BOOLEAN) !tb2;
  		}
  		RTTE(tb1, label_1);
  		RTCK;
  		RTHOOK(2);
  		RTCT("valid_port", EX_PRE);
  		RTTE((EIF_BOOLEAN) (arg1 >= ((EIF_INTEGER_32) 0L)), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(3);
  	RTCT0("attached create_from_name (a_peer_host) as l_peer_address", EX_CHECK);
  	ur1 = RTCCL(arg2);
  	tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWF(5433, dtype))(Current, ur1x)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  	loc1 = RTCCL(tr1);
  	if (EIF_TEST(loc1)) {
  		RTCK0;
  	} else {
  		RTCF0;
  	}
  	RTHOOK(4);
  	ur1 = RTCCL(loc1);
  	ui4_1 = arg1;
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5766, dtype))(Current, ur1x, ui4_1x);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(5);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(5);
  	RTEE;
  #undef up1
  #undef ur1
  #undef ui4_1
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.make_server_by_address_and_port */
  void F1022_8180 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x)
  {
  	GTCX
  	char *l_feature_name = "make_server_by_address_and_port";
  	RTEX;
  #define arg1 arg1x.it_r
  #define arg2 arg2x.it_i4
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_REFERENCE tr1 = NULL;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_i4 = * (EIF_INTEGER_32 *) arg2x.it_r;
  	
  	RTLI(4);
  	RTLR(0,arg1);
  	RTLR(1,Current);
  	RTLR(2,tr1);
  	RTLR(3,ur1);
  	RTLIU(4);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_REF,&arg1);
  	RTLU(SK_INT32,&arg2);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 2, 14427);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14427);
  	RTCC(arg1, 1021, l_feature_name, 1, eif_new_type(996, 0x01), 0x01);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("valid_port", EX_PRE);
  		RTTE((EIF_BOOLEAN) (arg2 >= ((EIF_INTEGER_32) 0L)), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWF(5761, dtype))(Current);
  	RTHOOK(3);
  	RTDBGAA(Current, dtype, 5651, 0xF80003EB, 0); /* address */
  	tr1 = RTLNSMART(RTWCT(5651, dtype, Dftype(Current)).id);
  	ur1 = RTCCL(arg1);
  	ui4_1 = arg2;
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWC(5451, Dtype(tr1)))(tr1, ur1x, ui4_1x);
  	RTNHOOK(3,1);
  	tr1 = RTCCL(tr1);
  	RTAR(Current, tr1);
  	*(EIF_REFERENCE *)(Current + RTWA(5651, dtype)) = (EIF_REFERENCE) tr1;
  	RTHOOK(4);
  	(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWF(5643, dtype))(Current);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(5);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(4);
  	RTEE;
  #undef ur1
  #undef ui4_1
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.make_server_by_port */
  void F1022_8181 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "make_server_by_port";
  	RTEX;
  #define arg1 arg1x.it_i4
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_REFERENCE tr1 = NULL;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(3);
  	RTLR(0,Current);
  	RTLR(1,tr1);
  	RTLR(2,ur1);
  	RTLIU(3);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 1, 14428);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14428);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("valid_port", EX_PRE);
  		RTTE((EIF_BOOLEAN) (arg1 >= ((EIF_INTEGER_32) 0L)), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5430, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  	ur1 = RTCCL(tr1);
  	ui4_1 = arg1;
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5763, dtype))(Current, ur1x, ui4_1x);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(3);
  	RTEE;
  #undef up1
  #undef ur1
  #undef ui4_1
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.make_loopback_server_by_port */
  void F1022_8182 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "make_loopback_server_by_port";
  	RTEX;
  #define arg1 arg1x.it_i4
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_REFERENCE tr1 = NULL;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(3);
  	RTLR(0,Current);
  	RTLR(1,tr1);
  	RTLR(2,ur1);
  	RTLIU(3);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 1, 14429);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14429);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("valid_port", EX_PRE);
  		RTTE((EIF_BOOLEAN) (arg1 >= ((EIF_INTEGER_32) 0L)), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5431, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  	ur1 = RTCCL(tr1);
  	ui4_1 = arg1;
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5763, dtype))(Current, ur1x, ui4_1x);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(3);
  	RTEE;
  #undef up1
  #undef ur1
  #undef ui4_1
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.make_client_by_address_and_port */
  void F1022_8183 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x)
  {
  	GTCX
  	char *l_feature_name = "make_client_by_address_and_port";
  	RTEX;
  #define arg1 arg1x.it_r
  #define arg2 arg2x.it_i4
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_REFERENCE tr1 = NULL;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_i4 = * (EIF_INTEGER_32 *) arg2x.it_r;
  	
  	RTLI(4);
  	RTLR(0,arg1);
  	RTLR(1,Current);
  	RTLR(2,tr1);
  	RTLR(3,ur1);
  	RTLIU(4);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_REF,&arg1);
  	RTLU(SK_INT32,&arg2);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 2, 14430);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14430);
  	RTCC(arg1, 1021, l_feature_name, 1, eif_new_type(996, 0x01), 0x01);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("valid_peer_address", EX_PRE);
  		RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1);
  		RTCK;
  		RTHOOK(2);
  		RTCT("valid_port", EX_PRE);
  		RTTE((EIF_BOOLEAN) (arg2 >= ((EIF_INTEGER_32) 0L)), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(3);
  	(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWF(5761, dtype))(Current);
  	RTHOOK(4);
  	RTDBGAA(Current, dtype, 5651, 0xF80003EB, 0); /* address */
  	tr1 = RTLNSMART(RTWCT(5651, dtype, Dftype(Current)).id);
  	ui4_1 = ((EIF_INTEGER_32) 1L);
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWC(5454, Dtype(tr1)))(tr1, ui4_1x);
  	RTNHOOK(4,1);
  	tr1 = RTCCL(tr1);
  	RTAR(Current, tr1);
  	*(EIF_REFERENCE *)(Current + RTWA(5651, dtype)) = (EIF_REFERENCE) tr1;
  	RTHOOK(5);
  	RTDBGAA(Current, dtype, 5652, 0xF80003EB, 0); /* peer_address */
  	tr1 = RTLNSMART(RTWCT(5652, dtype, Dftype(Current)).id);
  	ur1 = RTCCL(arg1);
  	ui4_1 = arg2;
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWC(5451, Dtype(tr1)))(tr1, ur1x, ui4_1x);
  	RTNHOOK(5,1);
  	tr1 = RTCCL(tr1);
  	RTAR(Current, tr1);
  	*(EIF_REFERENCE *)(Current + RTWA(5652, dtype)) = (EIF_REFERENCE) tr1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(6);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(4);
  	RTEE;
  #undef ur1
  #undef ui4_1
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.make_from_descriptor_and_address */
  void F1022_8184 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x)
  {
  	GTCX
  	char *l_feature_name = "make_from_descriptor_and_address";
  	RTEX;
  	EIF_REFERENCE loc1 = (EIF_REFERENCE) 0;
  	EIF_REFERENCE loc2 = (EIF_REFERENCE) 0;
  	EIF_REFERENCE loc3 = (EIF_REFERENCE) 0;
  #define arg1 arg1x.it_i4
  #define arg2 arg2x.it_r
  	EIF_BOOLEAN uarg2;
  	EIF_BOOLEAN uarg;
  	RTS_SD;
  	RTS_SDC;
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_REFERENCE tr1 = NULL;
  	EIF_NATURAL_64 tu8_1;
  	EIF_NATURAL_64 tu8_2;
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_BOOLEAN tb1;
  	EIF_BOOLEAN tb2;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(7);
  	RTLR(0,Current);
  	RTLR(1,arg2);
  	RTLR(2,loc2);
  	RTLR(3,loc1);
  	RTLR(4,tr1);
  	RTLR(5,ur1);
  	RTLR(6,loc3);
  	RTLIU(7);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU(SK_REF,&arg2);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_REF, &loc1);
  	RTLU(SK_REF, &loc2);
  	RTLU(SK_REF, &loc3);
  	
  	RTEAA(l_feature_name, 1021, Current, 3, 2, 14431);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14431);
  	RTCC(arg2, 1021, l_feature_name, 2, RTWCT(5651, dtype, Dftype(Current)), 0x05);
  	uarg2 = (EIF_BOOLEAN) RTS_OU (arg2);
  	uarg = uarg2;
  	if (uarg) {
  		RTS_RC;
  		RTS_RS (arg2);
  		RTS_RW;
  	}
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("a_fd_positive", EX_PRE);
  		RTTE((EIF_BOOLEAN) (arg1 > ((EIF_INTEGER_32) 0L)), label_1);
  		RTCK;
  		RTHOOK(2);
  		RTCT("a_address_positive", EX_PRE);
  		RTTE((EIF_BOOLEAN)(arg2 != NULL), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(3);
  	loc2 = RTCCL(arg2);
  	loc2 = RTRV(RTWCT(5651, dtype, Dftype(Current)),loc2);
  	if ((loc2) && RTS_OS (Current, loc2)) loc2 = (EIF_REFERENCE) 0;
  	if (EIF_TEST(loc2)) {
  		RTHOOK(4);
  		RTDBGAL(1, 0xF80003EB, 0, 0); /* loc1 */
  		loc1 = (EIF_REFERENCE) RTCCL(loc2);
  	} else {
  		RTHOOK(5);
  		RTDBGAL(1, 0xF80003EB, 0, 0); /* loc1 */
  		tr1 = RTLNSMART(RTWCT(5651, dtype, Dftype(Current)).id);
  		ur1 = RTCCL(arg2);
  		(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWC(5117, Dtype(tr1)))(tr1, ur1x);
  		RTNHOOK(5,1);
  		loc1 = (EIF_REFERENCE) RTCCL(tr1);
  	}
  	RTHOOK(6);
  	RTDBGAA(Current, dtype, 5745, 0x10000000, 1); /* fd */
  	*(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype)) = (EIF_INTEGER_32) arg1;
  	RTHOOK(7);
  	RTDBGAA(Current, dtype, 5651, 0xF80003EB, 0); /* address */
  	tr1 = RTCCL(loc1);
  	RTAR(Current, tr1);
  	*(EIF_REFERENCE *)(Current + RTWA(5651, dtype)) = (EIF_REFERENCE) tr1;
  	RTHOOK(8);
  	RTDBGAA(Current, dtype, 5648, 0x10000000, 1); /* family */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5120, "family", loc1))(loc1)).it_i4);
  	*(EIF_INTEGER_32 *)(Current + RTWA(5648, dtype)) = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(9);
  	RTDBGAA(Current, dtype, 5716, 0x04000000, 1); /* descriptor_available */
  	*(EIF_BOOLEAN *)(Current + RTWA(5716, dtype)) = (EIF_BOOLEAN) (EIF_BOOLEAN) 1;
  	RTHOOK(10);
  	RTDBGAA(Current, dtype, 5759, 0x04000000, 1); /* is_closed */
  	*(EIF_BOOLEAN *)(Current + RTWA(5759, dtype)) = (EIF_BOOLEAN) (EIF_BOOLEAN) 0;
  	RTHOOK(11);
  	RTDBGAA(Current, dtype, 5720, 0x04000000, 1); /* is_created */
  	*(EIF_BOOLEAN *)(Current + RTWA(5720, dtype)) = (EIF_BOOLEAN) (EIF_BOOLEAN) 1;
  	RTHOOK(12);
  	RTDBGAA(Current, dtype, 5714, 0x04000000, 1); /* is_open_read */
  	*(EIF_BOOLEAN *)(Current + RTWA(5714, dtype)) = (EIF_BOOLEAN) (EIF_BOOLEAN) 1;
  	RTHOOK(13);
  	RTDBGAA(Current, dtype, 5715, 0x04000000, 1); /* is_open_write */
  	*(EIF_BOOLEAN *)(Current + RTWA(5715, dtype)) = (EIF_BOOLEAN) (EIF_BOOLEAN) 1;
  	RTHOOK(14);
  	RTDBGAA(Current, dtype, 5730, 0x3C000000, 1); /* timeout_ns */
  	tu8_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5127, dtype))(Current)).it_n8);
  	ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5752, dtype));
  	tu8_2 = (EIF_NATURAL_64) ti4_1;
  	*(EIF_NATURAL_64 *)(Current + RTWA(5730, dtype)) = (EIF_NATURAL_64) (EIF_NATURAL_64) (tu8_1 * tu8_2);
  	RTHOOK(15);
  	RTDBGAA(Current, dtype, 3535, 0xF80000E8, 0); /* last_string */
  	tr1 = RTLNSMART(RTWCT(3535, dtype, Dftype(Current)).id);
  	(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWC(4643, Dtype(tr1)))(tr1);
  	RTNHOOK(15,1);
  	tr1 = RTCCL(tr1);
  	RTAR(Current, tr1);
  	*(EIF_REFERENCE *)(Current + RTWA(3535, dtype)) = (EIF_REFERENCE) tr1;
  	if (RTAL & CK_ENSURE) {
  		RTHOOK(16);
  		RTCT("address_set", EX_POST);
  		tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5651, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  		if (RTEQ(tr1, arg2)) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  		RTHOOK(17);
  		RTCT("address_equal", EX_POST);
  		tb1 = '\01';
  		loc3 = RTCCL(arg2);
  		loc3 = RTRV(RTWCT(5651, dtype, Dftype(Current)),loc3);
  		if ((loc3) && RTS_OS (Current, loc3)) loc3 = (EIF_REFERENCE) 0;
  		if (EIF_TEST(loc3)) {
  			tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5651, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  			tb1 = RTCEQ(tr1, arg2);
  		}
  		if (tb1) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  		RTHOOK(18);
  		RTCT("family_valid", EX_POST);
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5648, dtype));
  		if (RTS_CI (EIF_TRUE, arg2)) {
  			RTS_BI (arg2);
  			ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5120, "family", arg2))(arg2)).it_i4);
  			RTS_EI;
  		} else {
  			RTS_AC (0, arg2);
  			RTS_CALL (5120, SK_INT32);
  			ti4_2 = l_scoop_result.it_i4;
  		}
  		if ((EIF_BOOLEAN)(ti4_1 == ti4_2)) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  		RTHOOK(19);
  		RTCT("opened_all", EX_POST);
  		tb1 = *(EIF_BOOLEAN *)(Current + RTWA(5715, dtype));
  		tb2 = *(EIF_BOOLEAN *)(Current + RTWA(5714, dtype));
  		if ((EIF_BOOLEAN) (tb1 && tb2)) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  	}
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(20);
  	RTDBGLE;
  	RTMD(0);
  	if (uarg) {
  		RTS_RD;
  	}
  	RTLE;
  	RTLO(7);
  	RTEE;
  #undef up1
  #undef ur1
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.create_from_descriptor */
  void F1022_8185 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "create_from_descriptor";
  	RTEX;
  	EIF_REFERENCE loc1 = (EIF_REFERENCE) 0;
  #define arg1 arg1x.it_i4
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE up2x = {{0}, SK_POINTER};
  #define up2 up2x.it_p
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_POINTER tp1;
  	EIF_REFERENCE tr1 = NULL;
  	EIF_INTEGER_32 ti4_1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(4);
  	RTLR(0,loc1);
  	RTLR(1,Current);
  	RTLR(2,tr1);
  	RTLR(3,ur1);
  	RTLIU(4);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_REF, &loc1);
  	
  	RTEAA(l_feature_name, 1021, Current, 1, 1, 14432);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14432);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("a_fd_positive", EX_PRE);
  		RTTE((EIF_BOOLEAN) (arg1 > ((EIF_INTEGER_32) 0L)), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(1, 0xF80003EB, 0, 0); /* loc1 */
  	tr1 = RTLNSMART(RTWCT(5651, dtype, Dftype(Current)).id);
  	ui4_1 = ((EIF_INTEGER_32) 0L);
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWC(5454, Dtype(tr1)))(tr1, ui4_1x);
  	RTNHOOK(2,1);
  	loc1 = (EIF_REFERENCE) RTCCL(tr1);
  	RTHOOK(3);
  	ui4_1 = arg1;
  	tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5118, "socket_address", loc1))(loc1)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  	RTNHOOK(3,1);
  	tp1 = *(EIF_POINTER *)(tr1 + RTVA(3282, "item", tr1));
  	up1 = tp1;
  	tr1 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5118, "socket_address", loc1))(loc1)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r);
  	RTNHOOK(3,2);
  	ti4_1 = *(EIF_INTEGER_32 *)(tr1 + RTVA(3283, "count", tr1));
  	ui4_2 = ti4_1;
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5793, dtype))(Current, ui4_1x, up1x, ui4_2x);
  	RTHOOK(4);
  	ui4_1 = arg1;
  	ur1 = RTCCL(loc1);
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5767, dtype))(Current, ui4_1x, ur1x);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(5);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(4);
  	RTEE;
  #undef up1
  #undef up2
  #undef ur1
  #undef ui4_1
  #undef ui4_2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.connect_timeout */
  EIF_TYPED_VALUE F1022_8186 (EIF_REFERENCE Current)
  {
  	EIF_TYPED_VALUE r;
  	r.type = SK_INT32;
  	r.it_i4 = *(EIF_INTEGER_32 *)(Current + RTWA(5769,Dtype(Current)));
  	return r;
  }
  
  
  /* {NETWORK_STREAM_SOCKET}.set_connect_timeout */
  void F1022_8187 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "set_connect_timeout";
  	RTEX;
  #define arg1 arg1x.it_i4
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 1, 14434);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14434);
  	RTIV(Current, RTAL);
  	RTHOOK(1);
  	RTDBGAA(Current, dtype, 5769, 0x10000000, 1); /* connect_timeout */
  	*(EIF_INTEGER_32 *)(Current + RTWA(5769, dtype)) = (EIF_INTEGER_32) arg1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(2);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(3);
  	RTEE;
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.accept_timeout */
  EIF_TYPED_VALUE F1022_8188 (EIF_REFERENCE Current)
  {
  	EIF_TYPED_VALUE r;
  	r.type = SK_INT32;
  	r.it_i4 = *(EIF_INTEGER_32 *)(Current + RTWA(5771,Dtype(Current)));
  	return r;
  }
  
  
  /* {NETWORK_STREAM_SOCKET}.set_accept_timeout */
  void F1022_8189 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "set_accept_timeout";
  	RTEX;
  #define arg1 arg1x.it_i4
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 1, 14436);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14436);
  	RTIV(Current, RTAL);
  	RTHOOK(1);
  	RTDBGAA(Current, dtype, 5771, 0x10000000, 1); /* accept_timeout */
  	*(EIF_INTEGER_32 *)(Current + RTWA(5771, dtype)) = (EIF_INTEGER_32) arg1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(2);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(3);
  	RTEE;
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.listen */
  void F1022_8190 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "listen";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  	EIF_INTEGER_32 loc2 = (EIF_INTEGER_32) 0;
  	EIF_REFERENCE loc3 = (EIF_REFERENCE) 0;
  #define arg1 arg1x.it_i4
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE up2x = {{0}, SK_POINTER};
  #define up2 up2x.it_p
  	EIF_TYPED_VALUE up3x = {{0}, SK_POINTER};
  #define up3 up3x.it_p
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_POINTER tp1;
  	EIF_REFERENCE tr1 = NULL;
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(3);
  	RTLR(0,Current);
  	RTLR(1,tr1);
  	RTLR(2,loc3);
  	RTLIU(3);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	RTLU(SK_INT32, &loc2);
  	RTLU(SK_REF, &loc3);
  	
  	RTEAA(l_feature_name, 1021, Current, 3, 1, 14437);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14437);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTHOOK(2);
  		RTCT("address_attached", EX_PRE);
  		tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5651, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  		RTTE((EIF_BOOLEAN)(tr1 != NULL), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(3);
  	RTCT0("address_attached", EX_CHECK);
  	tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5651, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  	loc3 = RTCCL(tr1);
  	if (EIF_TEST(loc3)) {
  		RTCK0;
  	} else {
  		RTCF0;
  	}
  	RTHOOK(4);
  	RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  	ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype));
  	loc1 = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(5);
  	RTDBGAL(2, 0x10000000, 1, 0); /* loc2 */
  	ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype));
  	loc2 = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(6);
  	up1 = (EIF_INTEGER_32 *) &(loc1);
  	up2 = (EIF_INTEGER_32 *) &(loc2);
  	tr1 = ((up3x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5118, "socket_address", loc3))(loc3)), (((up3x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up3x.it_r = RTBU(up3x))), (up3x.type = SK_POINTER), up3x.it_r);
  	RTNHOOK(6,1);
  	tp1 = *(EIF_POINTER *)(tr1 + RTVA(3282, "item", tr1));
  	up3 = tp1;
  	ui4_1 = arg1;
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5791, dtype))(Current, up1x, up2x, up3x, ui4_1x);
  	RTHOOK(7);
  	RTDBGAA(Current, dtype, 5745, 0x10000000, 1); /* fd */
  	*(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype)) = (EIF_INTEGER_32) loc1;
  	RTHOOK(8);
  	RTDBGAA(Current, dtype, 5746, 0x10000000, 1); /* fd1 */
  	*(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype)) = (EIF_INTEGER_32) loc2;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(9);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(6);
  	RTEE;
  #undef up1
  #undef up2
  #undef up3
  #undef ui4_1
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.accept_to */
  void F1022_8191 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "accept_to";
  	RTEX;
  	EIF_REFERENCE loc1 = (EIF_REFERENCE) 0;
  #define arg1 arg1x.it_r
  	EIF_BOOLEAN uarg1;
  	EIF_BOOLEAN uarg;
  	RTS_SD;
  	RTS_SDC;
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ur2x = {{0}, SK_REF};
  #define ur2 ur2x.it_r
  	EIF_REFERENCE tr1 = NULL;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	
  	RTLI(6);
  	RTLR(0,Current);
  	RTLR(1,arg1);
  	RTLR(2,loc1);
  	RTLR(3,tr1);
  	RTLR(4,ur1);
  	RTLR(5,ur2);
  	RTLIU(6);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_REF,&arg1);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_REF, &loc1);
  	
  	RTEAA(l_feature_name, 1021, Current, 1, 1, 14438);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14438);
  	RTCC(arg1, 1021, l_feature_name, 1, eif_new_type(1021, 0x05),0);
  	uarg1 = (EIF_BOOLEAN) RTS_OU (arg1);
  	uarg = uarg1;
  	if (uarg) {
  		RTS_RC;
  		RTS_RS (arg1);
  		RTS_RW;
  	}
  	RTIV(Current, RTAL);
  	if (uarg || (RTAL & CK_REQUIRE) || RTAC) {
  		for (;;) {
  			int has_wait_condition = 0;
  			RTHOOK(1);
  			RTCT("not_created", EX_PRE);
  			if (RTS_CI (EIF_TRUE, arg1)) {
  				RTS_BI (arg1);
  				tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5720, "is_created", arg1))(arg1)).it_b);
  				RTS_EI;
  			} else {
  				RTS_AC (0, arg1);
  				RTS_CALL (5720, SK_BOOL);
  				tb1 = l_scoop_result.it_b;
  			}
  			has_wait_condition = uarg1;
  			RTTE((EIF_BOOLEAN) !tb1, label_1);
  			RTCK;
  			has_wait_condition = 0;
  			RTJB;
  label_1:
  			if (!has_wait_condition) break;
  			RTCK;
  			RTS_RF;
  		}
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5651, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  	loc1 = RTCCL(tr1);
  	if (EIF_TEST(loc1)) {
  		RTHOOK(3);
  		ur1 = RTCCL(arg1);
  		ur2 = RTCCL(loc1);
  		(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5787, dtype))(Current, ur1x, ur2x);
  	} else {
  		if (RTAL & CK_CHECK) {
  			RTHOOK(4);
  			RTCT("address_attached", EX_CHECK);
  				RTCF;
  		}
  	}
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(5);
  	RTDBGLE;
  	RTMD(0);
  	if (uarg) {
  		RTS_RD;
  	}
  	RTLE;
  	RTLO(4);
  	RTEE;
  #undef up1
  #undef ur1
  #undef ur2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.accept */
  void F1022_8192 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "accept";
  	RTEX;
  	EIF_REFERENCE loc1 = (EIF_REFERENCE) 0;
  	EIF_REFERENCE loc2 = (EIF_REFERENCE) 0;
  	EIF_REFERENCE loc3 = (EIF_REFERENCE) 0;
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ur2x = {{0}, SK_REF};
  #define ur2 ur2x.it_r
  	EIF_REFERENCE tr1 = NULL;
  	EIF_BOOLEAN tb1;
  	EIF_BOOLEAN tb2;
  	EIF_BOOLEAN tb3;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(7);
  	RTLR(0,Current);
  	RTLR(1,tr1);
  	RTLR(2,loc2);
  	RTLR(3,loc1);
  	RTLR(4,ur1);
  	RTLR(5,ur2);
  	RTLR(6,loc3);
  	RTLIU(7);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_REF, &loc1);
  	RTLU(SK_REF, &loc2);
  	RTLU(SK_REF, &loc3);
  	
  	RTEAA(l_feature_name, 1021, Current, 3, 0, 14439);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14439);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTHOOK(2);
  		RTCT("address_attached", EX_PRE);
  		tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5651, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  		RTTE((EIF_BOOLEAN)(tr1 != NULL), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(3);
  	tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5651, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  	loc2 = RTCCL(tr1);
  	if (EIF_TEST(loc2)) {
  		RTHOOK(4);
  		RTDBGAA(Current, dtype, 5718, 0xF80003FD, 0); /* accepted */
  		*(EIF_REFERENCE *)(Current + RTWA(5718, dtype)) = (EIF_REFERENCE) NULL;
  		RTHOOK(5);
  		RTDBGAL(1, 0xF80003FD, 0, 0); /* loc1 */
  		tr1 = RTLNSMART(RTWCT(5718, dtype, Dftype(Current)).id);
  		(FUNCTION_CAST(void, (EIF_REFERENCE)) RTWC(5760, Dtype(tr1)))(tr1);
  		RTNHOOK(5,1);
  		loc1 = (EIF_REFERENCE) RTCCL(tr1);
  		RTHOOK(6);
  		ur1 = RTCCL(loc1);
  		tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(17, "twin", loc2))(loc2)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  		ur2 = RTCCL(tr1);
  		(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5787, dtype))(Current, ur1x, ur2x);
  		RTHOOK(7);
  		tb1 = *(EIF_BOOLEAN *)(loc1 + RTVA(5720, "is_created", loc1));
  		if (tb1) {
  			RTHOOK(8);
  			RTDBGAA(Current, dtype, 5718, 0xF80003FD, 0); /* accepted */
  			tr1 = RTCCL(loc1);
  			RTAR(Current, tr1);
  			*(EIF_REFERENCE *)(Current + RTWA(5718, dtype)) = (EIF_REFERENCE) tr1;
  		}
  	} else {
  		if (RTAL & CK_CHECK) {
  			RTHOOK(9);
  			RTCT("address_attached", EX_CHECK);
  				RTCF;
  		}
  	}
  	if (RTAL & CK_ENSURE) {
  		RTHOOK(10);
  		RTCT("same_blocking_status", EX_POST);
  		tb1 = '\01';
  		tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5718, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  		loc3 = RTCCL(tr1);
  		if (EIF_TEST(loc3)) {
  			tb2 = *(EIF_BOOLEAN *)(loc3 + RTVA(5679, "is_blocking", loc3));
  			tb3 = *(EIF_BOOLEAN *)(Current + RTWA(5679, dtype));
  			tb1 = (EIF_BOOLEAN)(tb2 == tb3);
  		}
  		if (tb1) {
  			RTCK;
  		} else {
  			RTCF;
  		}
  	}
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(11);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(5);
  	RTEE;
  #undef up1
  #undef ur1
  #undef ur2
  }
  
  /* {NETWORK_STREAM_SOCKET}.maximum_seg_size */
  EIF_TYPED_VALUE F1022_8193 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "maximum_seg_size";
  	RTEX;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_INTEGER_32 ti4_3;
  	EIF_BOOLEAN tb1;
  	EIF_INTEGER_32 Result = ((EIF_INTEGER_32) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_INT32, &Result);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14440);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14440);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(0, 0x10000000, 1,0); /* Result */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5366, dtype))(Current)).it_i4);
  	ui4_2 = ti4_2;
  	ti4_3 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5369, dtype))(Current)).it_i4);
  	ui4_3 = ti4_3;
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5704, dtype))(Current, ui4_1x, ui4_2x, ui4_3x)).it_i4);
  	Result = (EIF_INTEGER_32) ti4_1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_INT32; r.it_i4 = Result; return r; }
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  }
  
  /* {NETWORK_STREAM_SOCKET}.maxium_seg_size */
  EIF_TYPED_VALUE F1022_8194 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "maxium_seg_size";
  	RTEX;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_INTEGER_32 ti4_3;
  	EIF_BOOLEAN tb1;
  	EIF_INTEGER_32 Result = ((EIF_INTEGER_32) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_INT32, &Result);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14441);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14441);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(0, 0x10000000, 1,0); /* Result */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5366, dtype))(Current)).it_i4);
  	ui4_2 = ti4_2;
  	ti4_3 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5369, dtype))(Current)).it_i4);
  	ui4_3 = ti4_3;
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5704, dtype))(Current, ui4_1x, ui4_2x, ui4_3x)).it_i4);
  	Result = (EIF_INTEGER_32) ti4_1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_INT32; r.it_i4 = Result; return r; }
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  }
  
  /* {NETWORK_STREAM_SOCKET}.has_delay */
  EIF_TYPED_VALUE F1022_8195 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "has_delay";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_INTEGER_32 ti4_3;
  	EIF_BOOLEAN tb1;
  	EIF_BOOLEAN Result = ((EIF_BOOLEAN) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_BOOL, &Result);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	
  	RTEAA(l_feature_name, 1021, Current, 1, 0, 14442);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14442);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5366, dtype))(Current)).it_i4);
  	ui4_2 = ti4_2;
  	ti4_3 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5370, dtype))(Current)).it_i4);
  	ui4_3 = ti4_3;
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5704, dtype))(Current, ui4_1x, ui4_2x, ui4_3x)).it_i4);
  	loc1 = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(3);
  	RTDBGAL(0, 0x04000000, 1,0); /* Result */
  	Result = (EIF_BOOLEAN) (EIF_BOOLEAN)(loc1 == ((EIF_INTEGER_32) 0L));
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(4);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(3);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_BOOL; r.it_b = Result; return r; }
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  }
  
  /* {NETWORK_STREAM_SOCKET}.is_linger_on */
  EIF_TYPED_VALUE F1022_8196 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "is_linger_on";
  	RTEX;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	EIF_BOOLEAN Result = ((EIF_BOOLEAN) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_BOOL, &Result);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14443);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14443);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(0, 0x04000000, 1,0); /* Result */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWF(5795, dtype))(Current, ui4_1x)).it_b);
  	Result = (EIF_BOOLEAN) tb1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_BOOL; r.it_b = Result; return r; }
  #undef ui4_1
  }
  
  /* {NETWORK_STREAM_SOCKET}.is_out_of_band_inline */
  EIF_TYPED_VALUE F1022_8197 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "is_out_of_band_inline";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_INTEGER_32 ti4_3;
  	EIF_BOOLEAN tb1;
  	EIF_BOOLEAN Result = ((EIF_BOOLEAN) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_BOOL, &Result);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	
  	RTEAA(l_feature_name, 1021, Current, 1, 0, 14444);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14444);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5362, dtype))(Current)).it_i4);
  	ui4_2 = ti4_2;
  	ti4_3 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5385, dtype))(Current)).it_i4);
  	ui4_3 = ti4_3;
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5704, dtype))(Current, ui4_1x, ui4_2x, ui4_3x)).it_i4);
  	loc1 = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(3);
  	RTDBGAL(0, 0x04000000, 1,0); /* Result */
  	Result = (EIF_BOOLEAN) (EIF_BOOLEAN)(loc1 != ((EIF_INTEGER_32) 0L));
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(4);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(3);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_BOOL; r.it_b = Result; return r; }
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  }
  
  /* {NETWORK_STREAM_SOCKET}.linger_time */
  EIF_TYPED_VALUE F1022_8198 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "linger_time";
  	RTEX;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	EIF_INTEGER_32 Result = ((EIF_INTEGER_32) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_INT32, &Result);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14445);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14445);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(0, 0x10000000, 1,0); /* Result */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWF(5796, dtype))(Current, ui4_1x)).it_i4);
  	Result = (EIF_INTEGER_32) ti4_1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_INT32; r.it_i4 = Result; return r; }
  #undef ui4_1
  }
  
  /* {NETWORK_STREAM_SOCKET}.set_delay */
  void F1022_8199 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "set_delay";
  	RTEX;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_TYPED_VALUE ui4_4x = {{0}, SK_INT32};
  #define ui4_4 ui4_4x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_INTEGER_32 ti4_3;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14446);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14446);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5366, dtype))(Current)).it_i4);
  	ui4_2 = ti4_2;
  	ti4_3 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5370, dtype))(Current)).it_i4);
  	ui4_3 = ti4_3;
  	ui4_4 = ((EIF_INTEGER_32) 0L);
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5703, dtype))(Current, ui4_1x, ui4_2x, ui4_3x, ui4_4x);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  #undef ui4_4
  }
  
  /* {NETWORK_STREAM_SOCKET}.set_nodelay */
  void F1022_8200 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "set_nodelay";
  	RTEX;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_TYPED_VALUE ui4_4x = {{0}, SK_INT32};
  #define ui4_4 ui4_4x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_INTEGER_32 ti4_3;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14447);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14447);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5366, dtype))(Current)).it_i4);
  	ui4_2 = ti4_2;
  	ti4_3 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5370, dtype))(Current)).it_i4);
  	ui4_3 = ti4_3;
  	ui4_4 = ((EIF_INTEGER_32) 1L);
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5703, dtype))(Current, ui4_1x, ui4_2x, ui4_3x, ui4_4x);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  #undef ui4_4
  }
  
  /* {NETWORK_STREAM_SOCKET}.set_linger */
  void F1022_8201 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x)
  {
  	GTCX
  	char *l_feature_name = "set_linger";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  #define arg1 arg1x.it_b
  #define arg2 arg2x.it_i4
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ub1x = {{0}, SK_BOOL};
  #define ub1 ub1x.it_b
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_i4 = * (EIF_INTEGER_32 *) arg2x.it_r;
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_b = * (EIF_BOOLEAN *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_BOOL,&arg1);
  	RTLU(SK_INT32,&arg2);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	
  	RTEAA(l_feature_name, 1021, Current, 1, 2, 14448);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14448);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ub1 = arg1;
  	ui4_2 = arg2;
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5794, dtype))(Current, ui4_1x, ub1x, ui4_2x)).it_i4);
  	loc1 = (EIF_INTEGER_32) ti4_1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(5);
  	RTEE;
  #undef ui4_1
  #undef ui4_2
  #undef ub1
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.set_linger_on */
  void F1022_8202 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "set_linger_on";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  #define arg1 arg1x.it_i4
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ub1x = {{0}, SK_BOOL};
  #define ub1 ub1x.it_b
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	
  	RTEAA(l_feature_name, 1021, Current, 1, 1, 14449);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14449);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ub1 = (EIF_BOOLEAN) 1;
  	ui4_2 = arg1;
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5794, dtype))(Current, ui4_1x, ub1x, ui4_2x)).it_i4);
  	loc1 = (EIF_INTEGER_32) ti4_1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(4);
  	RTEE;
  #undef ui4_1
  #undef ui4_2
  #undef ub1
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.set_linger_off */
  void F1022_8203 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "set_linger_off";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ub1x = {{0}, SK_BOOL};
  #define ub1 ub1x.it_b
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	
  	RTEAA(l_feature_name, 1021, Current, 1, 0, 14450);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14450);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ub1 = (EIF_BOOLEAN) 1;
  	ui4_2 = ((EIF_INTEGER_32) 0L);
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5794, dtype))(Current, ui4_1x, ub1x, ui4_2x)).it_i4);
  	loc1 = (EIF_INTEGER_32) ti4_1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(3);
  	RTEE;
  #undef ui4_1
  #undef ui4_2
  #undef ub1
  }
  
  /* {NETWORK_STREAM_SOCKET}.set_out_of_band_inline */
  void F1022_8204 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "set_out_of_band_inline";
  	RTEX;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_TYPED_VALUE ui4_4x = {{0}, SK_INT32};
  #define ui4_4 ui4_4x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_INTEGER_32 ti4_3;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14451);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14451);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5362, dtype))(Current)).it_i4);
  	ui4_2 = ti4_2;
  	ti4_3 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5385, dtype))(Current)).it_i4);
  	ui4_3 = ti4_3;
  	ui4_4 = ((EIF_INTEGER_32) 1L);
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5703, dtype))(Current, ui4_1x, ui4_2x, ui4_3x, ui4_4x);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  #undef ui4_4
  }
  
  /* {NETWORK_STREAM_SOCKET}.set_out_of_band_not_inline */
  void F1022_8205 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "set_out_of_band_not_inline";
  	RTEX;
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_TYPED_VALUE ui4_4x = {{0}, SK_INT32};
  #define ui4_4 ui4_4x.it_i4
  	EIF_INTEGER_32 ti4_1;
  	EIF_INTEGER_32 ti4_2;
  	EIF_INTEGER_32 ti4_3;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 0, 14452);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14452);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("socket_exists", EX_PRE);
  		tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3549, dtype))(Current)).it_b);
  		RTTE(tb1, label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3531, dtype))(Current)).it_i4);
  	ui4_1 = ti4_1;
  	ti4_2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5362, dtype))(Current)).it_i4);
  	ui4_2 = ti4_2;
  	ti4_3 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(5385, dtype))(Current)).it_i4);
  	ui4_3 = ti4_3;
  	ui4_4 = ((EIF_INTEGER_32) 0L);
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5703, dtype))(Current, ui4_1x, ui4_2x, ui4_3x, ui4_4x);
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(3);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(2);
  	RTEE;
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  #undef ui4_4
  }
  
  /* {NETWORK_STREAM_SOCKET}.do_connect */
  void F1022_8206 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "do_connect";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  	EIF_INTEGER_32 loc2 = (EIF_INTEGER_32) 0;
  	EIF_INTEGER_32 loc3 = (EIF_INTEGER_32) 0;
  #define arg1 arg1x.it_r
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE up2x = {{0}, SK_POINTER};
  #define up2 up2x.it_p
  	EIF_TYPED_VALUE up3x = {{0}, SK_POINTER};
  #define up3 up3x.it_p
  	EIF_TYPED_VALUE up4x = {{0}, SK_POINTER};
  #define up4 up4x.it_p
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ub1x = {{0}, SK_BOOL};
  #define ub1 ub1x.it_b
  	EIF_POINTER tp1;
  	EIF_REFERENCE tr1 = NULL;
  	EIF_INTEGER_32 ti4_1;
  	EIF_BOOLEAN tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	
  	RTLI(3);
  	RTLR(0,arg1);
  	RTLR(1,Current);
  	RTLR(2,tr1);
  	RTLIU(3);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_REF,&arg1);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	RTLU(SK_INT32, &loc2);
  	RTLU(SK_INT32, &loc3);
  	
  	RTEAA(l_feature_name, 1021, Current, 3, 1, 14453);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14453);
  	RTCC(arg1, 1021, l_feature_name, 1, RTWCT(5651, dtype, Dftype(Current)), 0x00);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("a_peer_address_attached", EX_PRE);
  		RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	if ((EIF_BOOLEAN)(arg1 != NULL)) {
  		RTHOOK(3);
  		RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype));
  		loc1 = (EIF_INTEGER_32) ti4_1;
  		RTHOOK(4);
  		RTDBGAL(2, 0x10000000, 1, 0); /* loc2 */
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype));
  		loc2 = (EIF_INTEGER_32) ti4_1;
  		RTHOOK(5);
  		RTDBGAL(3, 0x10000000, 1, 0); /* loc3 */
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5748, dtype));
  		loc3 = (EIF_INTEGER_32) ti4_1;
  		RTHOOK(6);
  		up1 = (EIF_INTEGER_32 *) &(loc1);
  		up2 = (EIF_INTEGER_32 *) &(loc2);
  		up3 = (EIF_INTEGER_32 *) &(loc3);
  		tr1 = ((up4x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5118, "socket_address", arg1))(arg1)), (((up4x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up4x.it_r = RTBU(up4x))), (up4x.type = SK_POINTER), up4x.it_r);
  		RTNHOOK(6,1);
  		tp1 = *(EIF_POINTER *)(tr1 + RTVA(3282, "item", tr1));
  		up4 = tp1;
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5769, dtype));
  		ui4_1 = ti4_1;
  		tb1 = *(EIF_BOOLEAN *)(Current + RTWA(5679, dtype));
  		ub1 = tb1;
  		(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5789, dtype))(Current, up1x, up2x, up3x, up4x, ui4_1x, ub1x);
  		RTHOOK(7);
  		RTDBGAA(Current, dtype, 5745, 0x10000000, 1); /* fd */
  		*(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype)) = (EIF_INTEGER_32) loc1;
  		RTHOOK(8);
  		RTDBGAA(Current, dtype, 5746, 0x10000000, 1); /* fd1 */
  		*(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype)) = (EIF_INTEGER_32) loc2;
  		RTHOOK(9);
  		RTDBGAA(Current, dtype, 5748, 0x10000000, 1); /* internal_port */
  		*(EIF_INTEGER_32 *)(Current + RTWA(5748, dtype)) = (EIF_INTEGER_32) loc3;
  	} else {
  		if (RTAL & CK_CHECK) {
  			RTHOOK(10);
  			RTCT("has_peer_address", EX_CHECK);
  				RTCF;
  		}
  	}
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(11);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(6);
  	RTEE;
  #undef up1
  #undef up2
  #undef up3
  #undef up4
  #undef ui4_1
  #undef ub1
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.do_bind */
  void F1022_8207 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "do_bind";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  	EIF_INTEGER_32 loc2 = (EIF_INTEGER_32) 0;
  	EIF_INTEGER_32 loc3 = (EIF_INTEGER_32) 0;
  #define arg1 arg1x.it_r
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE up2x = {{0}, SK_POINTER};
  #define up2 up2x.it_p
  	EIF_TYPED_VALUE up3x = {{0}, SK_POINTER};
  #define up3 up3x.it_p
  	EIF_TYPED_VALUE up4x = {{0}, SK_POINTER};
  #define up4 up4x.it_p
  	EIF_POINTER tp1;
  	EIF_REFERENCE tr1 = NULL;
  	EIF_INTEGER_32 ti4_1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	
  	RTLI(3);
  	RTLR(0,arg1);
  	RTLR(1,Current);
  	RTLR(2,tr1);
  	RTLIU(3);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_REF,&arg1);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	RTLU(SK_INT32, &loc2);
  	RTLU(SK_INT32, &loc3);
  	
  	RTEAA(l_feature_name, 1021, Current, 3, 1, 14454);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14454);
  	RTCC(arg1, 1021, l_feature_name, 1, RTWCT(5651, dtype, Dftype(Current)), 0x00);
  	RTIV(Current, RTAL);
  	if ((RTAL & CK_REQUIRE) || RTAC) {
  		RTHOOK(1);
  		RTCT("a_address_attached", EX_PRE);
  		RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1);
  		RTCK;
  		RTJB;
  label_1:
  		RTCF;
  	}
  body:;
  	RTHOOK(2);
  	if ((EIF_BOOLEAN)(arg1 != NULL)) {
  		RTHOOK(3);
  		RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype));
  		loc1 = (EIF_INTEGER_32) ti4_1;
  		RTHOOK(4);
  		RTDBGAL(2, 0x10000000, 1, 0); /* loc2 */
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype));
  		loc2 = (EIF_INTEGER_32) ti4_1;
  		RTHOOK(5);
  		RTDBGAL(3, 0x10000000, 1, 0); /* loc3 */
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5748, dtype));
  		loc3 = (EIF_INTEGER_32) ti4_1;
  		RTHOOK(6);
  		up1 = (EIF_INTEGER_32 *) &(loc1);
  		up2 = (EIF_INTEGER_32 *) &(loc2);
  		up3 = (EIF_INTEGER_32 *) &(loc3);
  		tr1 = ((up4x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5118, "socket_address", arg1))(arg1)), (((up4x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up4x.it_r = RTBU(up4x))), (up4x.type = SK_POINTER), up4x.it_r);
  		RTNHOOK(6,1);
  		tp1 = *(EIF_POINTER *)(tr1 + RTVA(3282, "item", tr1));
  		up4 = tp1;
  		(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5790, dtype))(Current, up1x, up2x, up3x, up4x);
  		RTHOOK(7);
  		RTDBGAA(Current, dtype, 5745, 0x10000000, 1); /* fd */
  		*(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype)) = (EIF_INTEGER_32) loc1;
  		RTHOOK(8);
  		RTDBGAA(Current, dtype, 5746, 0x10000000, 1); /* fd1 */
  		*(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype)) = (EIF_INTEGER_32) loc2;
  		RTHOOK(9);
  		RTDBGAA(Current, dtype, 5748, 0x10000000, 1); /* internal_port */
  		*(EIF_INTEGER_32 *)(Current + RTWA(5748, dtype)) = (EIF_INTEGER_32) loc3;
  	} else {
  		if (RTAL & CK_CHECK) {
  			RTHOOK(10);
  			RTCT("has_address", EX_CHECK);
  				RTCF;
  		}
  	}
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(11);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(6);
  	RTEE;
  #undef up1
  #undef up2
  #undef up3
  #undef up4
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.do_create */
  void F1022_8208 (EIF_REFERENCE Current)
  {
  	GTCX
  	char *l_feature_name = "do_create";
  	RTEX;
  	EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  	EIF_INTEGER_32 loc2 = (EIF_INTEGER_32) 0;
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE up2x = {{0}, SK_POINTER};
  #define up2 up2x.it_p
  	EIF_INTEGER_32 ti4_1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_INT32, &loc1);
  	RTLU(SK_INT32, &loc2);
  	
  	RTEAA(l_feature_name, 1021, Current, 2, 0, 14455);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14455);
  	RTIV(Current, RTAL);
  	RTHOOK(1);
  	RTDBGAL(1, 0x10000000, 1, 0); /* loc1 */
  	ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype));
  	loc1 = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(2);
  	RTDBGAL(2, 0x10000000, 1, 0); /* loc2 */
  	ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype));
  	loc2 = (EIF_INTEGER_32) ti4_1;
  	RTHOOK(3);
  	up1 = (EIF_INTEGER_32 *) &(loc1);
  	up2 = (EIF_INTEGER_32 *) &(loc2);
  	(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5788, dtype))(Current, up1x, up2x);
  	RTHOOK(4);
  	RTDBGAA(Current, dtype, 5745, 0x10000000, 1); /* fd */
  	*(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype)) = (EIF_INTEGER_32) loc1;
  	RTHOOK(5);
  	RTDBGAA(Current, dtype, 5746, 0x10000000, 1); /* fd1 */
  	*(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype)) = (EIF_INTEGER_32) loc2;
  	RTHOOK(6);
  	RTDBGAA(Current, dtype, 5720, 0x04000000, 1); /* is_created */
  	*(EIF_BOOLEAN *)(Current + RTWA(5720, dtype)) = (EIF_BOOLEAN) (EIF_BOOLEAN) 1;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(7);
  	RTDBGLE;
  	RTMD(0);
  	RTLE;
  	RTLO(4);
  	RTEE;
  #undef up1
  #undef up2
  }
  
  /* {NETWORK_STREAM_SOCKET}.do_accept */
  #undef EIF_VOLATILE
  #define EIF_VOLATILE volatile
  void F1022_8209 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x)
  {
  	GTCX
  	char *l_feature_name = "do_accept";
  	RTEX;
  	RTED;
  	EIF_BOOLEAN EIF_VOLATILE loc1 = (EIF_BOOLEAN) 0;
  	EIF_REFERENCE EIF_VOLATILE loc2 = (EIF_REFERENCE) 0;
  	EIF_INTEGER_32 EIF_VOLATILE loc3 = (EIF_INTEGER_32) 0;
  	EIF_INTEGER_32 EIF_VOLATILE loc4 = (EIF_INTEGER_32) 0;
  	EIF_REFERENCE EIF_VOLATILE saved_except = (EIF_REFERENCE) 0;
  #define arg1 arg1x.it_r
  	EIF_BOOLEAN uarg1;
  #define arg2 arg2x.it_r
  	EIF_BOOLEAN uarg;
  	RTS_SDX;
  	RTS_SDC;
  	EIF_TYPED_VALUE up1x = {{0}, SK_POINTER};
  #define up1 up1x.it_p
  	EIF_TYPED_VALUE up2x = {{0}, SK_POINTER};
  #define up2 up2x.it_p
  	EIF_TYPED_VALUE ur1x = {{0}, SK_REF};
  #define ur1 ur1x.it_r
  	EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32};
  #define ui4_1 ui4_1x.it_i4
  	EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32};
  #define ui4_2 ui4_2x.it_i4
  	EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32};
  #define ui4_3 ui4_3x.it_i4
  	EIF_POINTER  EIF_VOLATILE tp1;
  	EIF_REFERENCE  EIF_VOLATILE tr1 = NULL;
  	EIF_INTEGER_32  EIF_VOLATILE ti4_1;
  	EIF_INTEGER_32  EIF_VOLATILE ti4_2;
  	EIF_INTEGER_32  EIF_VOLATILE ti4_3;
  	EIF_BOOLEAN  EIF_VOLATILE tb1;
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTDT;
  	RTLD;
  	RTXD;
  	RTLXD;
  	
  	
  	RTLI(7);
  	RTLR(0,Current);
  	RTLR(1,arg1);
  	RTLR(2,arg2);
  	RTLR(3,loc2);
  	RTLR(4,tr1);
  	RTLR(5,ur1);
  	RTLR(6,saved_except);
  	RTLIU(7);
  	RTXSLS;
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_REF,&arg1);
  	RTLU(SK_REF,&arg2);
  	RTLU (SK_REF, &Current);
  	RTLU(SK_BOOL, &loc1);
  	RTLU(SK_REF, &loc2);
  	RTLU(SK_INT32, &loc3);
  	RTLU(SK_INT32, &loc4);
  	RTLXL;
  	
  	RTEAA(l_feature_name, 1021, Current, 4, 2, 14456);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 0);
  	RTGC;
  	RTDBGEAA(1021, Current, 14456);
  	RTCC(arg1, 1021, l_feature_name, 1, eif_new_type(Dftype(Current), 5), 0x05);
  	RTCC(arg2, 1021, l_feature_name, 2, RTWCT(5651, dtype, Dftype(Current)), 0x01);
  	uarg1 = (EIF_BOOLEAN) RTS_OU (arg1);
  	uarg = uarg1;
  	if (uarg) {
  		RTS_RCX;
  		RTS_RS (arg1);
  		RTS_RW;
  	}
  	RTIV(Current, RTAL);
  	if (uarg || (RTAL & CK_REQUIRE) || RTAC) {
  		for (;;) {
  			int has_wait_condition = 0;
  			RTHOOK(1);
  			RTCT("not_created", EX_PRE);
  			if (RTS_CI (EIF_TRUE, arg1)) {
  				RTS_BI (arg1);
  				tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5720, "is_created", arg1))(arg1)).it_b);
  				RTS_EI;
  			} else {
  				RTS_AC (0, arg1);
  				RTS_CALL (5720, SK_BOOL);
  				tb1 = l_scoop_result.it_b;
  			}
  			has_wait_condition = uarg1;
  			RTTE((EIF_BOOLEAN) !tb1, label_1);
  			RTCK;
  			has_wait_condition = 0;
  			RTJB;
  label_1:
  			if (!has_wait_condition) break;
  			RTCK;
  			RTS_RF;
  		}
  		RTCF;
  	}
  body:;
  	RTE_T
  	RTHOOK(2);
  	if ((EIF_BOOLEAN) !loc1) {
  		RTHOOK(3);
  		RTDBGAL(2, 0xF80003EB, 0, 0); /* loc2 */
  		tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(17, "twin", arg2))(arg2)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r);
  		loc2 = (EIF_REFERENCE) RTCCL(tr1);
  		RTHOOK(4);
  		RTDBGAL(4, 0x10000000, 1, 0); /* loc4 */
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5747, dtype));
  		loc4 = (EIF_INTEGER_32) ti4_1;
  		RTHOOK(5);
  		RTDBGAL(3, 0x10000000, 1, 0); /* loc3 */
  		ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(5745, dtype));
  		ui4_1 = ti4_1;
  		ti4_2 = *(EIF_INTEGER_32 *)(Current + RTWA(5746, dtype));
  		ui4_2 = ti4_2;
  		up1 = (EIF_INTEGER_32 *) &(loc4);
  		tr1 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(5118, "socket_address", loc2))(loc2)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r);
  		RTNHOOK(5,1);
  		tp1 = *(EIF_POINTER *)(tr1 + RTVA(3282, "item", tr1));
  		up2 = tp1;
  		ti4_3 = *(EIF_INTEGER_32 *)(Current + RTWA(5771, dtype));
  		ui4_3 = ti4_3;
  		ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(5792, dtype))(Current, ui4_1x, ui4_2x, up1x, up2x, ui4_3x)).it_i4);
  		loc3 = (EIF_INTEGER_32) ti4_1;
  		RTHOOK(6);
  		RTDBGAA(Current, dtype, 5747, 0x10000000, 1); /* last_fd */
  		*(EIF_INTEGER_32 *)(Current + RTWA(5747, dtype)) = (EIF_INTEGER_32) loc4;
  		RTHOOK(7);
  		if ((EIF_BOOLEAN) (loc3 > ((EIF_INTEGER_32) 0L))) {
  			RTHOOK(8);
  			ui4_1 = loc3;
  			ur1 = RTCCL(arg2);
  			if (RTS_CI (EIF_FALSE, arg1)) {
  				RTS_BI (arg1);
  				(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTVF(5767, "make_from_descriptor_and_address", arg1))(arg1, ui4_1x, ur1x);
  				RTS_EI;
  			} else {
  				RTS_AC (2, arg1);
  				RTS_AA (ur1x, it_r, SK_REF, 2);
  				RTS_AA (ui4_1x, it_i4, SK_INT32, 1);
  				RTS_CALL (5767, SK_VOID);
  			}
  			RTHOOK(9);
  			ur1 = RTCCL(loc2);
  			if (RTS_CI (EIF_FALSE, arg1)) {
  				RTS_BI (arg1);
  				(FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(5654, "set_peer_address", arg1))(arg1, ur1x);
  				RTS_EI;
  			} else {
  				RTS_AC (1, arg1);
  				RTS_AA (ur1x, it_r, SK_REF, 1);
  				RTS_CALL (5654, SK_VOID);
  			}
  			RTHOOK(10);
  			tb1 = *(EIF_BOOLEAN *)(Current + RTWA(5679, dtype));
  			if (tb1) {
  				RTHOOK(11);
  				if (RTS_CI (EIF_FALSE, arg1)) {
  					RTS_BI (arg1);
  					(FUNCTION_CAST(void, (EIF_REFERENCE)) RTVF(5678, "set_blocking", arg1))(arg1);
  					RTS_EI;
  				} else {
  					RTS_AC (0, arg1);
  					RTS_CALL (5678, SK_VOID);
  				}
  			} else {
  				RTHOOK(12);
  				if (RTS_CI (EIF_FALSE, arg1)) {
  					RTS_BI (arg1);
  					(FUNCTION_CAST(void, (EIF_REFERENCE)) RTVF(5677, "set_non_blocking", arg1))(arg1);
  					RTS_EI;
  				} else {
  					RTS_AC (0, arg1);
  					RTS_CALL (5677, SK_VOID);
  				}
  			}
  		}
  	}
  	RTVI(Current, RTAL);
  	RTRS;
  	RTE_E
  	RTLXE;
  	RTXSC;
  	RTS_SRR
  	RTHOOK(13);
  	tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(1273, dtype))(Current)).it_b);
  	if ((EIF_BOOLEAN) !tb1) {
  		RTHOOK(14);
  		RTDBGAL(1, 0x04000000, 1, 0); /* loc1 */
  		loc1 = (EIF_BOOLEAN) (EIF_BOOLEAN) 1;
  		RTHOOK(15);
  		RTTS;
  		RTPS;
  		RTER;
  	}
  	RTMD(0);
  	/* NOTREACHED */
  	RTE_EE
  	RTHOOK(16);
  	RTDBGLE;
  	RTMD(0);
  	if (uarg) {
  		RTS_RD;
  	}
  	RTEOK;
  	RTLE;
  	RTLO(8);
  #undef up1
  #undef up2
  #undef ur1
  #undef ui4_1
  #undef ui4_2
  #undef ui4_3
  #undef arg2
  #undef arg1
  }
  #undef EIF_VOLATILE
  #define EIF_VOLATILE
  
  /* {NETWORK_STREAM_SOCKET}.c_create */
  void F1022_8210 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x)
  {
  	GTCX
  	char *l_feature_name = "c_create";
  	RTEX;
  #define arg1 arg1x.it_p
  #define arg2 arg2x.it_p
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_p = * (EIF_INTEGER_32* *) arg2x.it_r;
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_p = * (EIF_INTEGER_32* *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_POINTER,&arg1);
  	RTLU(SK_POINTER,&arg2);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 2, 14457);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14457);
  	RTIV(Current, RTAL);
  	EIF_ENTER_C;en_socket_stream_create(arg1, arg2);
  	
  	EIF_EXIT_C;
  	RTGC;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(4);
  	RTEE;
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.c_connect */
  void F1022_8211 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x, EIF_TYPED_VALUE arg4x, EIF_TYPED_VALUE arg5x, EIF_TYPED_VALUE arg6x)
  {
  	GTCX
  	char *l_feature_name = "c_connect";
  	RTEX;
  #define arg1 arg1x.it_p
  #define arg2 arg2x.it_p
  #define arg3 arg3x.it_p
  #define arg4 arg4x.it_p
  #define arg5 arg5x.it_i4
  #define arg6 arg6x.it_b
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg6x.type & SK_HEAD) == SK_REF) arg6x.it_b = * (EIF_BOOLEAN *) arg6x.it_r;
  	if ((arg5x.type & SK_HEAD) == SK_REF) arg5x.it_i4 = * (EIF_INTEGER_32 *) arg5x.it_r;
  	if ((arg4x.type & SK_HEAD) == SK_REF) arg4x.it_p = * (EIF_POINTER *) arg4x.it_r;
  	if ((arg3x.type & SK_HEAD) == SK_REF) arg3x.it_p = * (EIF_INTEGER_32* *) arg3x.it_r;
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_p = * (EIF_INTEGER_32* *) arg2x.it_r;
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_p = * (EIF_INTEGER_32* *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_POINTER,&arg1);
  	RTLU(SK_POINTER,&arg2);
  	RTLU(SK_POINTER,&arg3);
  	RTLU(SK_POINTER,&arg4);
  	RTLU(SK_INT32,&arg5);
  	RTLU(SK_BOOL,&arg6);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 6, 14458);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14458);
  	RTIV(Current, RTAL);
  	EIF_ENTER_C;en_socket_stream_connect(arg1, arg2, arg3, arg4, arg5, arg6);
  	
  	EIF_EXIT_C;
  	RTGC;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(8);
  	RTEE;
  #undef arg6
  #undef arg5
  #undef arg4
  #undef arg3
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.c_bind */
  void F1022_8212 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x, EIF_TYPED_VALUE arg4x)
  {
  	GTCX
  	char *l_feature_name = "c_bind";
  	RTEX;
  #define arg1 arg1x.it_p
  #define arg2 arg2x.it_p
  #define arg3 arg3x.it_p
  #define arg4 arg4x.it_p
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg4x.type & SK_HEAD) == SK_REF) arg4x.it_p = * (EIF_POINTER *) arg4x.it_r;
  	if ((arg3x.type & SK_HEAD) == SK_REF) arg3x.it_p = * (EIF_INTEGER_32* *) arg3x.it_r;
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_p = * (EIF_INTEGER_32* *) arg2x.it_r;
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_p = * (EIF_INTEGER_32* *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_POINTER,&arg1);
  	RTLU(SK_POINTER,&arg2);
  	RTLU(SK_POINTER,&arg3);
  	RTLU(SK_POINTER,&arg4);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 4, 14459);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14459);
  	RTIV(Current, RTAL);
  	EIF_ENTER_C;en_socket_stream_bind(arg1, arg2, arg3, arg4);
  	
  	EIF_EXIT_C;
  	RTGC;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(6);
  	RTEE;
  #undef arg4
  #undef arg3
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.c_listen */
  void F1022_8213 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x, EIF_TYPED_VALUE arg4x)
  {
  	GTCX
  	char *l_feature_name = "c_listen";
  	RTEX;
  #define arg1 arg1x.it_p
  #define arg2 arg2x.it_p
  #define arg3 arg3x.it_p
  #define arg4 arg4x.it_i4
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg4x.type & SK_HEAD) == SK_REF) arg4x.it_i4 = * (EIF_INTEGER_32 *) arg4x.it_r;
  	if ((arg3x.type & SK_HEAD) == SK_REF) arg3x.it_p = * (EIF_POINTER *) arg3x.it_r;
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_p = * (EIF_INTEGER_32* *) arg2x.it_r;
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_p = * (EIF_INTEGER_32* *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_POINTER,&arg1);
  	RTLU(SK_POINTER,&arg2);
  	RTLU(SK_POINTER,&arg3);
  	RTLU(SK_INT32,&arg4);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 4, 14460);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14460);
  	RTIV(Current, RTAL);
  	EIF_ENTER_C;en_socket_stream_listen(arg1, arg2, arg3, arg4);
  	
  	EIF_EXIT_C;
  	RTGC;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(6);
  	RTEE;
  #undef arg4
  #undef arg3
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.c_accept */
  EIF_TYPED_VALUE F1022_8214 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x, EIF_TYPED_VALUE arg4x, EIF_TYPED_VALUE arg5x)
  {
  	GTCX
  	char *l_feature_name = "c_accept";
  	RTEX;
  #define arg1 arg1x.it_i4
  #define arg2 arg2x.it_i4
  #define arg3 arg3x.it_p
  #define arg4 arg4x.it_p
  #define arg5 arg5x.it_i4
  	EIF_INTEGER_32 Result = ((EIF_INTEGER_32) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg5x.type & SK_HEAD) == SK_REF) arg5x.it_i4 = * (EIF_INTEGER_32 *) arg5x.it_r;
  	if ((arg4x.type & SK_HEAD) == SK_REF) arg4x.it_p = * (EIF_POINTER *) arg4x.it_r;
  	if ((arg3x.type & SK_HEAD) == SK_REF) arg3x.it_p = * (EIF_INTEGER_32* *) arg3x.it_r;
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_i4 = * (EIF_INTEGER_32 *) arg2x.it_r;
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_INT32, &Result);
  	RTLU(SK_INT32,&arg1);
  	RTLU(SK_INT32,&arg2);
  	RTLU(SK_POINTER,&arg3);
  	RTLU(SK_POINTER,&arg4);
  	RTLU(SK_INT32,&arg5);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 5, 14461);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14461);
  	RTIV(Current, RTAL);
  	EIF_ENTER_C;Result = (EIF_INTEGER_32) en_socket_stream_accept(arg1, arg2, arg3, arg4, arg5);
  	
  	EIF_EXIT_C;
  	RTGC;
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(7);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_INT32; r.it_i4 = Result; return r; }
  #undef arg5
  #undef arg4
  #undef arg3
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.c_sock_name */
  void F1022_8215 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x)
  {
  	GTCX
  	char *l_feature_name = "c_sock_name";
  	RTEX;
  #define arg1 arg1x.it_i4
  #define arg2 arg2x.it_p
  #define arg3 arg3x.it_i4
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg3x.type & SK_HEAD) == SK_REF) arg3x.it_i4 = * (EIF_INTEGER_32 *) arg3x.it_r;
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_p = * (EIF_POINTER *) arg2x.it_r;
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_VOID, NULL);
  	RTLU(SK_INT32,&arg1);
  	RTLU(SK_POINTER,&arg2);
  	RTLU(SK_INT32,&arg3);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 3, 14462);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14462);
  	RTIV(Current, RTAL);c_sock_name(arg1, arg2, arg3);
  	
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(5);
  	RTEE;
  #undef arg3
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.c_set_sock_opt_linger */
  EIF_TYPED_VALUE F1022_8216 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x)
  {
  	GTCX
  	char *l_feature_name = "c_set_sock_opt_linger";
  	RTEX;
  #define arg1 arg1x.it_i4
  #define arg2 arg2x.it_b
  #define arg3 arg3x.it_i4
  	EIF_INTEGER_32 Result = ((EIF_INTEGER_32) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg3x.type & SK_HEAD) == SK_REF) arg3x.it_i4 = * (EIF_INTEGER_32 *) arg3x.it_r;
  	if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_b = * (EIF_BOOLEAN *) arg2x.it_r;
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_INT32, &Result);
  	RTLU(SK_INT32,&arg1);
  	RTLU(SK_BOOL,&arg2);
  	RTLU(SK_INT32,&arg3);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 3, 14463);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14463);
  	RTIV(Current, RTAL);Result = (EIF_INTEGER_32) c_set_sock_opt_linger(arg1, arg2, arg3);
  	
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(5);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_INT32; r.it_i4 = Result; return r; }
  #undef arg3
  #undef arg2
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.c_is_linger_on */
  EIF_TYPED_VALUE F1022_8217 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "c_is_linger_on";
  	RTEX;
  #define arg1 arg1x.it_i4
  	EIF_BOOLEAN Result = ((EIF_BOOLEAN) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_BOOL, &Result);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 1, 14464);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14464);
  	RTIV(Current, RTAL);Result = (EIF_BOOLEAN) EIF_TEST(c_is_linger_on(arg1));
  	
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(3);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_BOOL; r.it_b = Result; return r; }
  #undef arg1
  }
  
  /* {NETWORK_STREAM_SOCKET}.c_linger_time */
  EIF_TYPED_VALUE F1022_8218 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x)
  {
  	GTCX
  	char *l_feature_name = "c_linger_time";
  	RTEX;
  #define arg1 arg1x.it_i4
  	EIF_INTEGER_32 Result = ((EIF_INTEGER_32) 0);
  	
  	RTCDT;
  	RTSN;
  	RTDA;
  	RTLD;
  	
  	if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r;
  	
  	RTLI(1);
  	RTLR(0,Current);
  	RTLIU(1);
  	RTLU (SK_INT32, &Result);
  	RTLU(SK_INT32,&arg1);
  	RTLU (SK_REF, &Current);
  	
  	RTEAA(l_feature_name, 1021, Current, 0, 1, 14465);
  	RTSA(dtype);
  	RTSC;
  	RTME(dtype, 1);
  	RTDBGEAA(1021, Current, 14465);
  	RTIV(Current, RTAL);Result = (EIF_INTEGER_32) c_linger_time(arg1);
  	
  	RTVI(Current, RTAL);
  	RTRS;
  	RTHOOK(1);
  	RTDBGLE;
  	RTMD(1);
  	RTLE;
  	RTLO(3);
  	RTEE;
  	{ EIF_TYPED_VALUE r; r.type = SK_INT32; r.it_i4 = Result; return r; }
  #undef arg1
  }
  
  void EIF_Minit1022 (void)
  {
  	GTCX
  }
  
  
  #ifdef __cplusplus
  }
  #endif
  