1 /* This C header file is generated by NIT to compile modules and programs that requires ../lib/standard/kernel. */
2 #ifndef standard___kernel_sep
3 #define standard___kernel_sep
4 #include <nit_common.h>
5 #include "kernel._nitni.h"
7 extern const classtable_elt_t VFT_standard___kernel___Object
[];
9 extern const classtable_elt_t VFT_standard___kernel___Sys
[];
11 extern const classtable_elt_t VFT_standard___kernel___Comparable
[];
13 extern const classtable_elt_t VFT_standard___kernel___Discrete
[];
15 extern const classtable_elt_t VFT_standard___kernel___Bool
[];
17 extern const classtable_elt_t VFT_standard___kernel___Float
[];
18 struct TBOX_Float
{ const classtable_elt_t
* vft
; bigint object_id
; float val
;};
19 val_t
BOX_Float(float val
);
20 #define UNBOX_Float(x) (((struct TBOX_Float *)(VAL2OBJ(x)))->val)
22 extern const classtable_elt_t VFT_standard___kernel___Int
[];
24 extern const classtable_elt_t VFT_standard___kernel___Char
[];
26 extern const classtable_elt_t VFT_standard___kernel___Pointer
[];
27 struct TBOX_Pointer
{ const classtable_elt_t
* vft
; bigint object_id
; void * val
;};
28 val_t
BOX_Pointer(void * val
);
29 #define UNBOX_Pointer(x) (((struct TBOX_Pointer *)(VAL2OBJ(x)))->val)
30 extern const char LOCATE_standard___kernel
[];
31 extern const int SFT_standard___kernel
[];
32 #define ID_standard___kernel___Object (SFT_standard___kernel[0])
33 #define COLOR_standard___kernel___Object (SFT_standard___kernel[1])
34 #define INIT_TABLE_POS_standard___kernel___Object (SFT_standard___kernel[2] + 0)
35 #define CALL_standard___kernel___Object___object_id(recv) ((standard___kernel___Object___object_id_t)CALL((recv), (SFT_standard___kernel[2] + 1)))
36 #define CALL_standard___kernel___Object___is_same_type(recv) ((standard___kernel___Object___is_same_type_t)CALL((recv), (SFT_standard___kernel[2] + 2)))
37 #define CALL_standard___kernel___Object_____eqeq(recv) ((standard___kernel___Object_____eqeq_t)CALL((recv), (SFT_standard___kernel[2] + 3)))
38 #define CALL_standard___kernel___Object_____neq(recv) ((standard___kernel___Object_____neq_t)CALL((recv), (SFT_standard___kernel[2] + 4)))
39 #define CALL_standard___kernel___Object___output(recv) ((standard___kernel___Object___output_t)CALL((recv), (SFT_standard___kernel[2] + 5)))
40 #define CALL_standard___kernel___Object___output_class_name(recv) ((standard___kernel___Object___output_class_name_t)CALL((recv), (SFT_standard___kernel[2] + 6)))
41 #define CALL_standard___kernel___Object___exit(recv) ((standard___kernel___Object___exit_t)CALL((recv), (SFT_standard___kernel[2] + 7)))
42 #define CALL_standard___kernel___Object___sys(recv) ((standard___kernel___Object___sys_t)CALL((recv), (SFT_standard___kernel[2] + 8)))
43 #define ID_standard___kernel___Sys (SFT_standard___kernel[3])
44 #define COLOR_standard___kernel___Sys (SFT_standard___kernel[4])
45 #define INIT_TABLE_POS_standard___kernel___Sys (SFT_standard___kernel[5] + 0)
46 #define CALL_standard___kernel___Sys___main(recv) ((standard___kernel___Sys___main_t)CALL((recv), (SFT_standard___kernel[5] + 1)))
47 #define CALL_standard___kernel___Sys___init(recv) ((standard___kernel___Sys___init_t)CALL((recv), (SFT_standard___kernel[5] + 2)))
48 #define ID_standard___kernel___Comparable (SFT_standard___kernel[6])
49 #define COLOR_standard___kernel___Comparable (SFT_standard___kernel[7])
50 #define INIT_TABLE_POS_standard___kernel___Comparable (SFT_standard___kernel[8] + 0)
51 #define VTID_standard___kernel___Comparable___OTHER(recv) (VAL2VFT(recv)[SFT_standard___kernel[8] + 1].i)
52 #define VTCOLOR_standard___kernel___Comparable___OTHER(recv) (VAL2VFT(recv)[SFT_standard___kernel[8] + 2].i)
53 #define CALL_standard___kernel___Comparable_____l(recv) ((standard___kernel___Comparable_____l_t)CALL((recv), (SFT_standard___kernel[8] + 3)))
54 #define CALL_standard___kernel___Comparable_____leq(recv) ((standard___kernel___Comparable_____leq_t)CALL((recv), (SFT_standard___kernel[8] + 4)))
55 #define CALL_standard___kernel___Comparable_____geq(recv) ((standard___kernel___Comparable_____geq_t)CALL((recv), (SFT_standard___kernel[8] + 5)))
56 #define CALL_standard___kernel___Comparable_____g(recv) ((standard___kernel___Comparable_____g_t)CALL((recv), (SFT_standard___kernel[8] + 6)))
57 #define CALL_standard___kernel___Comparable_____leqg(recv) ((standard___kernel___Comparable_____leqg_t)CALL((recv), (SFT_standard___kernel[8] + 7)))
58 #define CALL_standard___kernel___Comparable___is_between(recv) ((standard___kernel___Comparable___is_between_t)CALL((recv), (SFT_standard___kernel[8] + 8)))
59 #define CALL_standard___kernel___Comparable___max(recv) ((standard___kernel___Comparable___max_t)CALL((recv), (SFT_standard___kernel[8] + 9)))
60 #define CALL_standard___kernel___Comparable___min(recv) ((standard___kernel___Comparable___min_t)CALL((recv), (SFT_standard___kernel[8] + 10)))
61 #define ID_standard___kernel___Discrete (SFT_standard___kernel[9])
62 #define COLOR_standard___kernel___Discrete (SFT_standard___kernel[10])
63 #define INIT_TABLE_POS_standard___kernel___Discrete (SFT_standard___kernel[11] + 0)
64 #define CALL_standard___kernel___Discrete___succ(recv) ((standard___kernel___Discrete___succ_t)CALL((recv), (SFT_standard___kernel[11] + 1)))
65 #define CALL_standard___kernel___Discrete___prec(recv) ((standard___kernel___Discrete___prec_t)CALL((recv), (SFT_standard___kernel[11] + 2)))
66 #define CALL_standard___kernel___Discrete_____plus(recv) ((standard___kernel___Discrete_____plus_t)CALL((recv), (SFT_standard___kernel[11] + 3)))
67 #define CALL_standard___kernel___Discrete_____minus(recv) ((standard___kernel___Discrete_____minus_t)CALL((recv), (SFT_standard___kernel[11] + 4)))
68 #define CALL_standard___kernel___Discrete___distance(recv) ((standard___kernel___Discrete___distance_t)CALL((recv), (SFT_standard___kernel[11] + 5)))
69 #define ID_standard___kernel___Bool (SFT_standard___kernel[12])
70 #define COLOR_standard___kernel___Bool (SFT_standard___kernel[13])
71 #define INIT_TABLE_POS_standard___kernel___Bool (SFT_standard___kernel[14] + 0)
72 #define ID_standard___kernel___Float (SFT_standard___kernel[15])
73 #define COLOR_standard___kernel___Float (SFT_standard___kernel[16])
74 #define INIT_TABLE_POS_standard___kernel___Float (SFT_standard___kernel[17] + 0)
75 #define CALL_standard___kernel___Float_____leq(recv) ((standard___kernel___Float_____leq_t)CALL((recv), (SFT_standard___kernel[17] + 1)))
76 #define CALL_standard___kernel___Float_____l(recv) ((standard___kernel___Float_____l_t)CALL((recv), (SFT_standard___kernel[17] + 2)))
77 #define CALL_standard___kernel___Float_____geq(recv) ((standard___kernel___Float_____geq_t)CALL((recv), (SFT_standard___kernel[17] + 3)))
78 #define CALL_standard___kernel___Float_____g(recv) ((standard___kernel___Float_____g_t)CALL((recv), (SFT_standard___kernel[17] + 4)))
79 #define CALL_standard___kernel___Float_____plus(recv) ((standard___kernel___Float_____plus_t)CALL((recv), (SFT_standard___kernel[17] + 5)))
80 #define CALL_standard___kernel___Float___unary__minus(recv) ((standard___kernel___Float___unary__minus_t)CALL((recv), (SFT_standard___kernel[17] + 6)))
81 #define CALL_standard___kernel___Float_____minus(recv) ((standard___kernel___Float_____minus_t)CALL((recv), (SFT_standard___kernel[17] + 7)))
82 #define CALL_standard___kernel___Float_____star(recv) ((standard___kernel___Float_____star_t)CALL((recv), (SFT_standard___kernel[17] + 8)))
83 #define CALL_standard___kernel___Float_____slash(recv) ((standard___kernel___Float_____slash_t)CALL((recv), (SFT_standard___kernel[17] + 9)))
84 #define CALL_standard___kernel___Float___to_i(recv) ((standard___kernel___Float___to_i_t)CALL((recv), (SFT_standard___kernel[17] + 10)))
85 #define ID_standard___kernel___Int (SFT_standard___kernel[18])
86 #define COLOR_standard___kernel___Int (SFT_standard___kernel[19])
87 #define INIT_TABLE_POS_standard___kernel___Int (SFT_standard___kernel[20] + 0)
88 #define CALL_standard___kernel___Int___unary__minus(recv) ((standard___kernel___Int___unary__minus_t)CALL((recv), (SFT_standard___kernel[20] + 1)))
89 #define CALL_standard___kernel___Int_____star(recv) ((standard___kernel___Int_____star_t)CALL((recv), (SFT_standard___kernel[20] + 2)))
90 #define CALL_standard___kernel___Int_____slash(recv) ((standard___kernel___Int_____slash_t)CALL((recv), (SFT_standard___kernel[20] + 3)))
91 #define CALL_standard___kernel___Int_____percent(recv) ((standard___kernel___Int_____percent_t)CALL((recv), (SFT_standard___kernel[20] + 4)))
92 #define CALL_standard___kernel___Int___lshift(recv) ((standard___kernel___Int___lshift_t)CALL((recv), (SFT_standard___kernel[20] + 5)))
93 #define CALL_standard___kernel___Int___rshift(recv) ((standard___kernel___Int___rshift_t)CALL((recv), (SFT_standard___kernel[20] + 6)))
94 #define CALL_standard___kernel___Int___to_f(recv) ((standard___kernel___Int___to_f_t)CALL((recv), (SFT_standard___kernel[20] + 7)))
95 #define CALL_standard___kernel___Int___ascii(recv) ((standard___kernel___Int___ascii_t)CALL((recv), (SFT_standard___kernel[20] + 8)))
96 #define CALL_standard___kernel___Int___digit_count(recv) ((standard___kernel___Int___digit_count_t)CALL((recv), (SFT_standard___kernel[20] + 9)))
97 #define CALL_standard___kernel___Int___to_c(recv) ((standard___kernel___Int___to_c_t)CALL((recv), (SFT_standard___kernel[20] + 10)))
98 #define CALL_standard___kernel___Int___enumerate_to(recv) ((standard___kernel___Int___enumerate_to_t)CALL((recv), (SFT_standard___kernel[20] + 11)))
99 #define CALL_standard___kernel___Int___enumerate_before(recv) ((standard___kernel___Int___enumerate_before_t)CALL((recv), (SFT_standard___kernel[20] + 12)))
100 #define CALL_standard___kernel___Int___abs(recv) ((standard___kernel___Int___abs_t)CALL((recv), (SFT_standard___kernel[20] + 13)))
101 #define ID_standard___kernel___Char (SFT_standard___kernel[21])
102 #define COLOR_standard___kernel___Char (SFT_standard___kernel[22])
103 #define INIT_TABLE_POS_standard___kernel___Char (SFT_standard___kernel[23] + 0)
104 #define CALL_standard___kernel___Char___to_i(recv) ((standard___kernel___Char___to_i_t)CALL((recv), (SFT_standard___kernel[23] + 1)))
105 #define CALL_standard___kernel___Char___ascii(recv) ((standard___kernel___Char___ascii_t)CALL((recv), (SFT_standard___kernel[23] + 2)))
106 #define CALL_standard___kernel___Char___to_lower(recv) ((standard___kernel___Char___to_lower_t)CALL((recv), (SFT_standard___kernel[23] + 3)))
107 #define CALL_standard___kernel___Char___to_upper(recv) ((standard___kernel___Char___to_upper_t)CALL((recv), (SFT_standard___kernel[23] + 4)))
108 #define CALL_standard___kernel___Char___is_digit(recv) ((standard___kernel___Char___is_digit_t)CALL((recv), (SFT_standard___kernel[23] + 5)))
109 #define CALL_standard___kernel___Char___is_lower(recv) ((standard___kernel___Char___is_lower_t)CALL((recv), (SFT_standard___kernel[23] + 6)))
110 #define CALL_standard___kernel___Char___is_upper(recv) ((standard___kernel___Char___is_upper_t)CALL((recv), (SFT_standard___kernel[23] + 7)))
111 #define CALL_standard___kernel___Char___is_letter(recv) ((standard___kernel___Char___is_letter_t)CALL((recv), (SFT_standard___kernel[23] + 8)))
112 #define ID_standard___kernel___Pointer (SFT_standard___kernel[24])
113 #define COLOR_standard___kernel___Pointer (SFT_standard___kernel[25])
114 #define INIT_TABLE_POS_standard___kernel___Pointer (SFT_standard___kernel[26] + 0)
115 val_t
standard___kernel___Object___object_id(val_t p0
);
116 typedef val_t (*standard___kernel___Object___object_id_t
)(val_t p0
);
117 val_t
standard___kernel___Object___is_same_type(val_t p0
, val_t p1
);
118 typedef val_t (*standard___kernel___Object___is_same_type_t
)(val_t p0
, val_t p1
);
119 val_t
standard___kernel___Object_____eqeq(val_t p0
, val_t p1
);
120 typedef val_t (*standard___kernel___Object_____eqeq_t
)(val_t p0
, val_t p1
);
121 val_t
standard___kernel___Object_____neq(val_t p0
, val_t p1
);
122 typedef val_t (*standard___kernel___Object_____neq_t
)(val_t p0
, val_t p1
);
123 void standard___kernel___Object___output(val_t p0
);
124 typedef void (*standard___kernel___Object___output_t
)(val_t p0
);
125 void standard___kernel___Object___output_class_name(val_t p0
);
126 typedef void (*standard___kernel___Object___output_class_name_t
)(val_t p0
);
127 void standard___kernel___Object___exit(val_t p0
, val_t p1
);
128 typedef void (*standard___kernel___Object___exit_t
)(val_t p0
, val_t p1
);
129 val_t
standard___kernel___Object___sys(val_t p0
);
130 typedef val_t (*standard___kernel___Object___sys_t
)(val_t p0
);
131 void standard___kernel___Sys___main(val_t p0
);
132 typedef void (*standard___kernel___Sys___main_t
)(val_t p0
);
133 void standard___kernel___Sys___init(val_t p0
, int* init_table
);
134 typedef void (*standard___kernel___Sys___init_t
)(val_t p0
, int* init_table
);
135 val_t
NEW_Sys_standard___kernel___Sys___init();
136 val_t
standard___kernel___Comparable_____l(val_t p0
, val_t p1
);
137 typedef val_t (*standard___kernel___Comparable_____l_t
)(val_t p0
, val_t p1
);
138 val_t
standard___kernel___Comparable_____leq(val_t p0
, val_t p1
);
139 typedef val_t (*standard___kernel___Comparable_____leq_t
)(val_t p0
, val_t p1
);
140 val_t
standard___kernel___Comparable_____geq(val_t p0
, val_t p1
);
141 typedef val_t (*standard___kernel___Comparable_____geq_t
)(val_t p0
, val_t p1
);
142 val_t
standard___kernel___Comparable_____g(val_t p0
, val_t p1
);
143 typedef val_t (*standard___kernel___Comparable_____g_t
)(val_t p0
, val_t p1
);
144 val_t
standard___kernel___Comparable_____leqg(val_t p0
, val_t p1
);
145 typedef val_t (*standard___kernel___Comparable_____leqg_t
)(val_t p0
, val_t p1
);
146 val_t
standard___kernel___Comparable___is_between(val_t p0
, val_t p1
, val_t p2
);
147 typedef val_t (*standard___kernel___Comparable___is_between_t
)(val_t p0
, val_t p1
, val_t p2
);
148 val_t
standard___kernel___Comparable___max(val_t p0
, val_t p1
);
149 typedef val_t (*standard___kernel___Comparable___max_t
)(val_t p0
, val_t p1
);
150 val_t
standard___kernel___Comparable___min(val_t p0
, val_t p1
);
151 typedef val_t (*standard___kernel___Comparable___min_t
)(val_t p0
, val_t p1
);
152 val_t
standard___kernel___Discrete___succ(val_t p0
);
153 typedef val_t (*standard___kernel___Discrete___succ_t
)(val_t p0
);
154 val_t
standard___kernel___Discrete___prec(val_t p0
);
155 typedef val_t (*standard___kernel___Discrete___prec_t
)(val_t p0
);
156 val_t
standard___kernel___Discrete_____plus(val_t p0
, val_t p1
);
157 typedef val_t (*standard___kernel___Discrete_____plus_t
)(val_t p0
, val_t p1
);
158 val_t
standard___kernel___Discrete_____minus(val_t p0
, val_t p1
);
159 typedef val_t (*standard___kernel___Discrete_____minus_t
)(val_t p0
, val_t p1
);
160 val_t
standard___kernel___Discrete___distance(val_t p0
, val_t p1
);
161 typedef val_t (*standard___kernel___Discrete___distance_t
)(val_t p0
, val_t p1
);
162 val_t
standard___kernel___Bool___object_id(val_t p0
);
163 typedef val_t (*standard___kernel___Bool___object_id_t
)(val_t p0
);
164 val_t
standard___kernel___Bool_____eqeq(val_t p0
, val_t p1
);
165 typedef val_t (*standard___kernel___Bool_____eqeq_t
)(val_t p0
, val_t p1
);
166 val_t
standard___kernel___Bool_____neq(val_t p0
, val_t p1
);
167 typedef val_t (*standard___kernel___Bool_____neq_t
)(val_t p0
, val_t p1
);
168 void standard___kernel___Bool___output(val_t p0
);
169 typedef void (*standard___kernel___Bool___output_t
)(val_t p0
);
170 val_t
standard___kernel___Float___object_id(val_t p0
);
171 typedef val_t (*standard___kernel___Float___object_id_t
)(val_t p0
);
172 void standard___kernel___Float___output(val_t p0
);
173 typedef void (*standard___kernel___Float___output_t
)(val_t p0
);
174 val_t
standard___kernel___Float_____leq(val_t p0
, val_t p1
);
175 typedef val_t (*standard___kernel___Float_____leq_t
)(val_t p0
, val_t p1
);
176 val_t
standard___kernel___Float_____l(val_t p0
, val_t p1
);
177 typedef val_t (*standard___kernel___Float_____l_t
)(val_t p0
, val_t p1
);
178 val_t
standard___kernel___Float_____geq(val_t p0
, val_t p1
);
179 typedef val_t (*standard___kernel___Float_____geq_t
)(val_t p0
, val_t p1
);
180 val_t
standard___kernel___Float_____g(val_t p0
, val_t p1
);
181 typedef val_t (*standard___kernel___Float_____g_t
)(val_t p0
, val_t p1
);
182 val_t
standard___kernel___Float_____plus(val_t p0
, val_t p1
);
183 typedef val_t (*standard___kernel___Float_____plus_t
)(val_t p0
, val_t p1
);
184 val_t
standard___kernel___Float___unary__minus(val_t p0
);
185 typedef val_t (*standard___kernel___Float___unary__minus_t
)(val_t p0
);
186 val_t
standard___kernel___Float_____minus(val_t p0
, val_t p1
);
187 typedef val_t (*standard___kernel___Float_____minus_t
)(val_t p0
, val_t p1
);
188 val_t
standard___kernel___Float_____star(val_t p0
, val_t p1
);
189 typedef val_t (*standard___kernel___Float_____star_t
)(val_t p0
, val_t p1
);
190 val_t
standard___kernel___Float_____slash(val_t p0
, val_t p1
);
191 typedef val_t (*standard___kernel___Float_____slash_t
)(val_t p0
, val_t p1
);
192 val_t
standard___kernel___Float___to_i(val_t p0
);
193 typedef val_t (*standard___kernel___Float___to_i_t
)(val_t p0
);
194 val_t
standard___kernel___Int___object_id(val_t p0
);
195 typedef val_t (*standard___kernel___Int___object_id_t
)(val_t p0
);
196 val_t
standard___kernel___Int_____eqeq(val_t p0
, val_t p1
);
197 typedef val_t (*standard___kernel___Int_____eqeq_t
)(val_t p0
, val_t p1
);
198 val_t
standard___kernel___Int_____neq(val_t p0
, val_t p1
);
199 typedef val_t (*standard___kernel___Int_____neq_t
)(val_t p0
, val_t p1
);
200 void standard___kernel___Int___output(val_t p0
);
201 typedef void (*standard___kernel___Int___output_t
)(val_t p0
);
202 val_t
standard___kernel___Int_____leq(val_t p0
, val_t p1
);
203 typedef val_t (*standard___kernel___Int_____leq_t
)(val_t p0
, val_t p1
);
204 val_t
standard___kernel___Int_____l(val_t p0
, val_t p1
);
205 typedef val_t (*standard___kernel___Int_____l_t
)(val_t p0
, val_t p1
);
206 val_t
standard___kernel___Int_____geq(val_t p0
, val_t p1
);
207 typedef val_t (*standard___kernel___Int_____geq_t
)(val_t p0
, val_t p1
);
208 val_t
standard___kernel___Int_____g(val_t p0
, val_t p1
);
209 typedef val_t (*standard___kernel___Int_____g_t
)(val_t p0
, val_t p1
);
210 val_t
standard___kernel___Int_____plus(val_t p0
, val_t p1
);
211 typedef val_t (*standard___kernel___Int_____plus_t
)(val_t p0
, val_t p1
);
212 val_t
standard___kernel___Int___unary__minus(val_t p0
);
213 typedef val_t (*standard___kernel___Int___unary__minus_t
)(val_t p0
);
214 val_t
standard___kernel___Int_____minus(val_t p0
, val_t p1
);
215 typedef val_t (*standard___kernel___Int_____minus_t
)(val_t p0
, val_t p1
);
216 val_t
standard___kernel___Int_____star(val_t p0
, val_t p1
);
217 typedef val_t (*standard___kernel___Int_____star_t
)(val_t p0
, val_t p1
);
218 val_t
standard___kernel___Int_____slash(val_t p0
, val_t p1
);
219 typedef val_t (*standard___kernel___Int_____slash_t
)(val_t p0
, val_t p1
);
220 val_t
standard___kernel___Int_____percent(val_t p0
, val_t p1
);
221 typedef val_t (*standard___kernel___Int_____percent_t
)(val_t p0
, val_t p1
);
222 val_t
standard___kernel___Int___lshift(val_t p0
, val_t p1
);
223 typedef val_t (*standard___kernel___Int___lshift_t
)(val_t p0
, val_t p1
);
224 val_t
standard___kernel___Int___rshift(val_t p0
, val_t p1
);
225 typedef val_t (*standard___kernel___Int___rshift_t
)(val_t p0
, val_t p1
);
226 val_t
standard___kernel___Int___to_f(val_t p0
);
227 typedef val_t (*standard___kernel___Int___to_f_t
)(val_t p0
);
228 val_t
standard___kernel___Int___succ(val_t p0
);
229 typedef val_t (*standard___kernel___Int___succ_t
)(val_t p0
);
230 val_t
standard___kernel___Int___prec(val_t p0
);
231 typedef val_t (*standard___kernel___Int___prec_t
)(val_t p0
);
232 val_t
standard___kernel___Int___distance(val_t p0
, val_t p1
);
233 typedef val_t (*standard___kernel___Int___distance_t
)(val_t p0
, val_t p1
);
234 val_t
standard___kernel___Int_____leqg(val_t p0
, val_t p1
);
235 typedef val_t (*standard___kernel___Int_____leqg_t
)(val_t p0
, val_t p1
);
236 val_t
standard___kernel___Int___is_between(val_t p0
, val_t p1
, val_t p2
);
237 typedef val_t (*standard___kernel___Int___is_between_t
)(val_t p0
, val_t p1
, val_t p2
);
238 val_t
standard___kernel___Int___max(val_t p0
, val_t p1
);
239 typedef val_t (*standard___kernel___Int___max_t
)(val_t p0
, val_t p1
);
240 val_t
standard___kernel___Int___min(val_t p0
, val_t p1
);
241 typedef val_t (*standard___kernel___Int___min_t
)(val_t p0
, val_t p1
);
242 val_t
standard___kernel___Int___ascii(val_t p0
);
243 typedef val_t (*standard___kernel___Int___ascii_t
)(val_t p0
);
244 val_t
standard___kernel___Int___digit_count(val_t p0
, val_t p1
);
245 typedef val_t (*standard___kernel___Int___digit_count_t
)(val_t p0
, val_t p1
);
246 val_t
standard___kernel___Int___to_c(val_t p0
);
247 typedef val_t (*standard___kernel___Int___to_c_t
)(val_t p0
);
248 typedef void (*CLOS_standard___kernel___Int___enumerate_to_0
)(struct stack_frame_t
*, val_t
);
249 void standard___kernel___Int___enumerate_to(val_t p0
, val_t p1
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
);
250 typedef void (*standard___kernel___Int___enumerate_to_t
)(val_t p0
, val_t p1
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
);
251 typedef void (*CLOS_standard___kernel___Int___enumerate_before_0
)(struct stack_frame_t
*, val_t
);
252 void standard___kernel___Int___enumerate_before(val_t p0
, val_t p1
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
);
253 typedef void (*standard___kernel___Int___enumerate_before_t
)(val_t p0
, val_t p1
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
);
254 val_t
standard___kernel___Int___abs(val_t p0
);
255 typedef val_t (*standard___kernel___Int___abs_t
)(val_t p0
);
256 val_t
standard___kernel___Char___object_id(val_t p0
);
257 typedef val_t (*standard___kernel___Char___object_id_t
)(val_t p0
);
258 val_t
standard___kernel___Char_____eqeq(val_t p0
, val_t p1
);
259 typedef val_t (*standard___kernel___Char_____eqeq_t
)(val_t p0
, val_t p1
);
260 val_t
standard___kernel___Char_____neq(val_t p0
, val_t p1
);
261 typedef val_t (*standard___kernel___Char_____neq_t
)(val_t p0
, val_t p1
);
262 void standard___kernel___Char___output(val_t p0
);
263 typedef void (*standard___kernel___Char___output_t
)(val_t p0
);
264 val_t
standard___kernel___Char_____leq(val_t p0
, val_t p1
);
265 typedef val_t (*standard___kernel___Char_____leq_t
)(val_t p0
, val_t p1
);
266 val_t
standard___kernel___Char_____l(val_t p0
, val_t p1
);
267 typedef val_t (*standard___kernel___Char_____l_t
)(val_t p0
, val_t p1
);
268 val_t
standard___kernel___Char_____geq(val_t p0
, val_t p1
);
269 typedef val_t (*standard___kernel___Char_____geq_t
)(val_t p0
, val_t p1
);
270 val_t
standard___kernel___Char_____g(val_t p0
, val_t p1
);
271 typedef val_t (*standard___kernel___Char_____g_t
)(val_t p0
, val_t p1
);
272 val_t
standard___kernel___Char___succ(val_t p0
);
273 typedef val_t (*standard___kernel___Char___succ_t
)(val_t p0
);
274 val_t
standard___kernel___Char___prec(val_t p0
);
275 typedef val_t (*standard___kernel___Char___prec_t
)(val_t p0
);
276 val_t
standard___kernel___Char___distance(val_t p0
, val_t p1
);
277 typedef val_t (*standard___kernel___Char___distance_t
)(val_t p0
, val_t p1
);
278 val_t
standard___kernel___Char___to_i(val_t p0
);
279 typedef val_t (*standard___kernel___Char___to_i_t
)(val_t p0
);
280 val_t
standard___kernel___Char___ascii(val_t p0
);
281 typedef val_t (*standard___kernel___Char___ascii_t
)(val_t p0
);
282 val_t
standard___kernel___Char_____plus(val_t p0
, val_t p1
);
283 typedef val_t (*standard___kernel___Char_____plus_t
)(val_t p0
, val_t p1
);
284 val_t
standard___kernel___Char_____minus(val_t p0
, val_t p1
);
285 typedef val_t (*standard___kernel___Char_____minus_t
)(val_t p0
, val_t p1
);
286 val_t
standard___kernel___Char___to_lower(val_t p0
);
287 typedef val_t (*standard___kernel___Char___to_lower_t
)(val_t p0
);
288 val_t
standard___kernel___Char___to_upper(val_t p0
);
289 typedef val_t (*standard___kernel___Char___to_upper_t
)(val_t p0
);
290 val_t
standard___kernel___Char___is_digit(val_t p0
);
291 typedef val_t (*standard___kernel___Char___is_digit_t
)(val_t p0
);
292 val_t
standard___kernel___Char___is_lower(val_t p0
);
293 typedef val_t (*standard___kernel___Char___is_lower_t
)(val_t p0
);
294 val_t
standard___kernel___Char___is_upper(val_t p0
);
295 typedef val_t (*standard___kernel___Char___is_upper_t
)(val_t p0
);
296 val_t
standard___kernel___Char___is_letter(val_t p0
);
297 typedef val_t (*standard___kernel___Char___is_letter_t
)(val_t p0
);