1 #include "core__environ.sep.0.h"
2 /* method environ#String#environ for (self: String): String */
3 val
* core__environ___String___environ(val
* self
) {
4 val
* var
/* : String */;
5 char* var1
/* : NativeString */;
6 char* var2
/* : NativeString */;
7 char* var4
/* : NativeString */;
8 char* var_res
/* var res: NativeString */;
10 static int varonce_guard
;
11 char* var5
/* : NativeString */;
13 val
* var7
/* : String */;
14 char* var8
/* : NativeString */;
15 val
* var9
/* : String */;
16 char* var10
/* : NativeString */;
17 char* var11
/* : NativeString */;
18 char* var13
/* : NativeString */;
19 char* var_nulstr
/* var nulstr: NativeString */;
20 short int var14
/* : Bool */;
21 short int var16
/* : Bool */;
22 short int var17
/* : Bool */;
23 val
* var18
/* : String */;
24 static val
* varonce19
;
25 val
* var20
/* : String */;
26 char* var21
/* : NativeString */;
27 val
* var22
/* : String */;
29 var1
= ((char*(*)(val
* self
))(self
->class->vft
[COLOR_core__abstract_text__Text__to_cstring
]))(self
); /* to_cstring on <self:String>*/
32 { /* Inline environ#NativeString#get_environ (var1) on <var1:NativeString> */
33 var4
= environ___NativeString_get_environ___impl(var1
);
40 if (likely(varonce_guard
)) {
43 if (likely(varonce6
!=NULL
)) {
47 var9
= core__flat___NativeString___to_s_full(var8
, 0l, 0l);
52 var10
= ((char*(*)(val
* self
))(var7
->class->vft
[COLOR_core__abstract_text__Text__to_cstring
]))(var7
); /* to_cstring on <var7:String>*/
55 { /* Inline environ#NativeString#get_environ (var10) on <var10:NativeString> */
56 var13
= environ___NativeString_get_environ___impl(var10
);
68 { /* Inline native#NativeString#!= (var_res,var_nulstr) on <var_res:NativeString> */
69 var16
= var_res
== var_nulstr
;
78 var18
= core__flat___NativeString___core__abstract_text__Object__to_s(var_res
);
83 if (likely(varonce19
!=NULL
)) {
87 var22
= core__flat___NativeString___to_s_full(var21
, 0l, 0l);
97 /* method environ#NativeString#get_environ for (self: NativeString): NativeString */
98 char* core__environ___NativeString___get_environ(char* self
) {
99 char* var
/* : NativeString */;
100 char* var1
/* : NativeString */;
101 var1
= environ___NativeString_get_environ___impl(self
);
107 /* method environ#Sys#init for (self: Sys) */
108 void core__environ___Sys___core__kernel__Object__init(val
* self
) {
110 val
* var
/* : String */;
111 char* var1
/* : NativeString */;
112 val
* var2
/* : String */;
113 val
* var3
/* : String */;
114 val
* var_x
/* var x: String */;
115 static val
* varonce4
;
116 val
* var5
/* : String */;
117 char* var6
/* : NativeString */;
118 val
* var7
/* : String */;
119 short int var8
/* : Bool */;
120 val
* var_other
/* var other: nullable Object */;
121 short int var10
/* : Bool */;
122 short int var11
/* : Bool */;
123 long var12
/* : Int */;
125 ((void(*)(val
* self
))(self
->class->vft
[COLOR_core__environ___Sys___core__kernel__Object__init
]))(self
); /* init on <self:Sys>*/
127 if (likely(varonce
!=NULL
)) {
131 var2
= core__flat___NativeString___to_s_full(var1
, 9l, 9l);
136 var3
= core__environ___String___environ(var
);
139 if (likely(varonce4
!=NULL
)) {
143 var7
= core__flat___NativeString___to_s_full(var6
, 0l, 0l);
148 { /* Inline kernel#Object#!= (var_x,var5) on <var_x:String> */
151 var10
= ((short int(*)(val
* self
, val
* p0
))(var_x
->class->vft
[COLOR_core__kernel__Object___61d_61d
]))(var_x
, var_other
); /* == on <var_x:String>*/
161 var12
= core__fixed_ints___Text___to_i(var_x
);
164 { /* Inline math#Sys#srand_from (self,var12) on <self:Sys> */
165 struct nitni_instance
* var_for_c_0
;
166 var_for_c_0
= nit_alloc(sizeof(struct nitni_instance
));
167 var_for_c_0
->value
= self
;
168 math___Sys_srand_from___impl(var_for_c_0
, var12
);