1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
|
#include <stc/cstr.h>
forward_clist(clist_i32, int);
forward_clist(clist_pnt, struct Point);
struct MyStruct {
clist_i32 intlst;
clist_pnt pntlst;
} typedef MyStruct;
#define i_val int
#define i_opt c_is_forward
#define i_tag i32
#define i_extern // define _clist_mergesort()
#include <stc/clist.h>
struct Point { int x, y; } typedef Point;
int point_cmp(const Point* a, const Point* b) {
int c = a->x - b->x;
return c ? c : a->y - b->y;
}
#define i_val Point
#define i_cmp point_cmp
#define i_opt c_is_forward
#define i_tag pnt
#include <stc/clist.h>
#define i_val float
#include <stc/clist.h>
#define i_val_str
#include <stc/clist.h>
int main()
{
c_auto (clist_i32, lst)
clist_i32_push_back(&lst, 123);
c_auto (clist_pnt, plst) {
c_forlist (i, Point, {{42, 14}, {32, 94}, {62, 81}})
clist_pnt_push_back(&plst, *i.ref);
clist_pnt_sort(&plst);
c_foreach (i, clist_pnt, plst)
printf(" (%d %d)", i.ref->x, i.ref->y);
puts("");
}
c_auto (clist_float, flst) {
c_forlist (i, float, {123.3f, 321.2f, -32.2f, 78.2f})
clist_float_push_back(&flst, *i.ref);
c_foreach (i, clist_float, flst) printf(" %g", *i.ref);
}
c_auto (clist_str, slst)
clist_str_emplace_back(&slst, "Hello, friend");
}
|
