1 #include "standard__environ.sep.0.h"
2 /* method environ#String#environ for (self: String): String */
3 val
* standard__environ___String___environ(val
* self
) {
4 val
* var
/* : String */;
5 char* var1
/* : NativeString */;
6 char* var2
/* : NativeString */;
7 void* var4
/* : NativeString for extern */;
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 long var9
/* : Int */;
16 val
* var10
/* : FlatString */;
17 char* var11
/* : NativeString */;
18 char* var12
/* : NativeString */;
19 void* var14
/* : NativeString for extern */;
20 char* var_nulstr
/* var nulstr: NativeString */;
21 short int var15
/* : Bool */;
22 val
* var_other
/* var other: nullable Object */;
23 val
* var17
/* : nullable Object */;
24 short int var18
/* : Bool */;
25 val
* var_other20
/* var other: nullable Object */;
26 short int var21
/* : Bool */;
27 val
* var23
/* : Object */;
28 short int var24
/* : Bool */;
29 short int var25
/* : Bool */;
30 val
* var26
/* : String */;
31 static val
* varonce27
;
32 val
* var28
/* : String */;
33 char* var29
/* : NativeString */;
34 long var30
/* : Int */;
35 val
* var31
/* : FlatString */;
37 var1
= ((char* (*)(val
* self
))(self
->class->vft
[COLOR_standard__string__Text__to_cstring
]))(self
) /* to_cstring on <self:String>*/;
40 { /* Inline environ#NativeString#get_environ (var1) on <var1:NativeString> */
41 var4
= string_NativeString_NativeString_get_environ_0(var1
);
56 var10
= standard___standard__NativeString___to_s_with_length(var8
, var9
);
61 var11
= ((char* (*)(val
* self
))(var7
->class->vft
[COLOR_standard__string__Text__to_cstring
]))(var7
) /* to_cstring on <var7:String>*/;
64 { /* Inline environ#NativeString#get_environ (var11) on <var11:NativeString> */
65 var14
= string_NativeString_NativeString_get_environ_0(var11
);
77 { /* Inline kernel#Object#!= (var_res,var_nulstr) on <var_res:NativeString> */
78 var17
= BOX_standard__NativeString(var_nulstr
); /* autobox from NativeString to nullable Object */
80 { /* Inline kernel#Object#== (var_res,var_other) on <var_res:NativeString> */
81 var_other20
= var_other
;
83 { /* Inline kernel#Object#is_same_instance (var_res,var_other20) on <var_res:NativeString> */
84 var23
= BOX_standard__NativeString(var_res
); /* autobox from NativeString to Object */
85 var24
= var23
== var_other20
|| (var_other20
!= NULL
&& var23
->class == var_other20
->class && ((var23
->class->box_kind
== 1 && ((struct instance_standard__Int
*)var23
)->value
== ((struct instance_standard__Int
*)var_other20
)->value
) || (var23
->class->box_kind
== 2 && ((struct instance_standard__Bool
*)var23
)->value
== ((struct instance_standard__Bool
*)var_other20
)->value
) || (var23
->class->box_kind
== 3 && ((struct instance_standard__Char
*)var23
)->value
== ((struct instance_standard__Char
*)var_other20
)->value
) || (var23
->class->box_kind
== 4 && ((struct instance_standard__Float
*)var23
)->value
== ((struct instance_standard__Float
*)var_other20
)->value
) || (var23
->class->box_kind
== 5 && ((struct instance_standard__NativeString
*)var23
)->value
== ((struct instance_standard__NativeString
*)var_other20
)->value
) || (var23
->class->box_kind
== 6 && ((struct instance_standard__Pointer
*)var23
)->value
== ((struct instance_standard__Pointer
*)var_other20
)->value
)));
103 var26
= standard___standard__NativeString___Object__to_s(var_res
);
113 var31
= standard___standard__NativeString___to_s_with_length(var29
, var30
);
123 /* method environ#NativeString#get_environ for (self: NativeString): NativeString */
124 char* standard__environ___NativeString___get_environ(char* self
) {
125 char* var
/* : NativeString */;
126 void* var1
/* : NativeString for extern */;
127 var1
= string_NativeString_NativeString_get_environ_0(self
);