1 #include "math._nitni.h"
3 /* out/indirect function for math::Int::rand */
4 val_t
Int_rand___out( val_t recv
)
9 recv___nitni
= UNTAG_Int(recv
);
10 return___nitni
= kernel_Int_Int_rand_0( recv___nitni
);
11 return___nit
= TAG_Int(return___nitni
);
12 nitni_local_ref_clean( );
15 /* out/indirect function for math::Float::sqrt */
16 val_t
Float_sqrt___out( val_t recv
)
21 recv___nitni
= UNBOX_Float(recv
);
22 return___nitni
= kernel_Float_Float_sqrt_0( recv___nitni
);
23 return___nit
= BOX_Float(return___nitni
);
24 nitni_local_ref_clean( );
27 /* out/indirect function for math::Float::cos */
28 val_t
Float_cos___out( val_t recv
)
33 recv___nitni
= UNBOX_Float(recv
);
34 return___nitni
= kernel_Float_Float_cos_0( recv___nitni
);
35 return___nit
= BOX_Float(return___nitni
);
36 nitni_local_ref_clean( );
39 /* out/indirect function for math::Float::sin */
40 val_t
Float_sin___out( val_t recv
)
45 recv___nitni
= UNBOX_Float(recv
);
46 return___nitni
= kernel_Float_Float_sin_0( recv___nitni
);
47 return___nit
= BOX_Float(return___nitni
);
48 nitni_local_ref_clean( );
51 /* out/indirect function for math::Float::tan */
52 val_t
Float_tan___out( val_t recv
)
57 recv___nitni
= UNBOX_Float(recv
);
58 return___nitni
= kernel_Float_Float_tan_0( recv___nitni
);
59 return___nit
= BOX_Float(return___nitni
);
60 nitni_local_ref_clean( );
63 /* out/indirect function for math::Float::acos */
64 val_t
Float_acos___out( val_t recv
)
69 recv___nitni
= UNBOX_Float(recv
);
70 return___nitni
= kernel_Float_Float_acos_0( recv___nitni
);
71 return___nit
= BOX_Float(return___nitni
);
72 nitni_local_ref_clean( );
75 /* out/indirect function for math::Float::asin */
76 val_t
Float_asin___out( val_t recv
)
81 recv___nitni
= UNBOX_Float(recv
);
82 return___nitni
= kernel_Float_Float_asin_0( recv___nitni
);
83 return___nit
= BOX_Float(return___nitni
);
84 nitni_local_ref_clean( );
87 /* out/indirect function for math::Float::atan */
88 val_t
Float_atan___out( val_t recv
)
93 recv___nitni
= UNBOX_Float(recv
);
94 return___nitni
= kernel_Float_Float_atan_0( recv___nitni
);
95 return___nit
= BOX_Float(return___nitni
);
96 nitni_local_ref_clean( );
99 /* out/indirect function for math::Float::pow */
100 val_t
Float_pow___out( val_t recv
, val_t e
)
104 float return___nitni
;
106 recv___nitni
= UNBOX_Float(recv
);
107 e___nitni
= UNBOX_Float(e
);
108 return___nitni
= kernel_Float_Float_pow_1( recv___nitni
, e___nitni
);
109 return___nit
= BOX_Float(return___nitni
);
110 nitni_local_ref_clean( );
113 /* out/indirect function for math::Float::log */
114 val_t
Float_log___out( val_t recv
)
117 float return___nitni
;
119 recv___nitni
= UNBOX_Float(recv
);
120 return___nitni
= kernel_Float_Float_log_0( recv___nitni
);
121 return___nit
= BOX_Float(return___nitni
);
122 nitni_local_ref_clean( );
125 /* out/indirect function for math::Float::exp */
126 val_t
Float_exp___out( val_t recv
)
129 float return___nitni
;
131 recv___nitni
= UNBOX_Float(recv
);
132 return___nitni
= kernel_Float_Float_exp_0( recv___nitni
);
133 return___nit
= BOX_Float(return___nitni
);
134 nitni_local_ref_clean( );
137 /* out/indirect function for math::Float::rand */
138 val_t
Float_rand___out( val_t recv
)
141 float return___nitni
;
143 recv___nitni
= UNBOX_Float(recv
);
144 return___nitni
= kernel_Float_Float_rand_0( recv___nitni
);
145 return___nit
= BOX_Float(return___nitni
);
146 nitni_local_ref_clean( );
149 /* out/indirect function for math::Float::hypot_with */
150 val_t
Float_hypot_with___out( val_t recv
, val_t b
)
154 float return___nitni
;
156 recv___nitni
= UNBOX_Float(recv
);
157 b___nitni
= UNBOX_Float(b
);
158 return___nitni
= hypotf( recv___nitni
, b___nitni
);
159 return___nit
= BOX_Float(return___nitni
);
160 nitni_local_ref_clean( );
163 /* out/indirect function for math::Object::atan2 */
164 val_t
Object_atan2___out( val_t recv
, val_t x
, val_t y
)
169 float return___nitni
;
171 recv___nitni
= malloc( sizeof( struct s_Object
) );
172 recv___nitni
->ref
.val
= NIT_NULL
;
173 recv___nitni
->ref
.count
= 0;
174 nitni_local_ref_add( (struct nitni_ref
*)recv___nitni
);
175 recv___nitni
->ref
.val
= recv
;
176 x___nitni
= UNBOX_Float(x
);
177 y___nitni
= UNBOX_Float(y
);
178 return___nitni
= kernel_Any_Any_atan2_2( recv___nitni
, x___nitni
, y___nitni
);
179 return___nit
= BOX_Float(return___nitni
);
180 nitni_local_ref_clean( );
183 /* out/indirect function for math::Object::pi */
184 val_t
Object_pi___out( val_t recv
)
187 float return___nitni
;
189 recv___nitni
= malloc( sizeof( struct s_Object
) );
190 recv___nitni
->ref
.val
= NIT_NULL
;
191 recv___nitni
->ref
.count
= 0;
192 nitni_local_ref_add( (struct nitni_ref
*)recv___nitni
);
193 recv___nitni
->ref
.val
= recv
;
194 return___nitni
= kernel_Any_Any_pi_0( recv___nitni
);
195 return___nit
= BOX_Float(return___nitni
);
196 nitni_local_ref_clean( );
199 /* out/indirect function for math::Object::srand_from */
200 void Object_srand_from___out( val_t recv
, val_t x
)
204 recv___nitni
= malloc( sizeof( struct s_Object
) );
205 recv___nitni
->ref
.val
= NIT_NULL
;
206 recv___nitni
->ref
.count
= 0;
207 nitni_local_ref_add( (struct nitni_ref
*)recv___nitni
);
208 recv___nitni
->ref
.val
= recv
;
209 x___nitni
= UNTAG_Int(x
);
210 kernel_Any_Any_srand_from_1( recv___nitni
, x___nitni
);
211 nitni_local_ref_clean( );
213 /* out/indirect function for math::Object::srand */
214 void Object_srand___out( val_t recv
)
217 recv___nitni
= malloc( sizeof( struct s_Object
) );
218 recv___nitni
->ref
.val
= NIT_NULL
;
219 recv___nitni
->ref
.count
= 0;
220 nitni_local_ref_add( (struct nitni_ref
*)recv___nitni
);
221 recv___nitni
->ref
.val
= recv
;
222 kernel_Any_Any_srand_0( recv___nitni
);
223 nitni_local_ref_clean( );