admin/mlib
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix issue of M_LET with LIST_BIF containers.

Browse Source
This commit is contained in:
Patrick Pelissier committed 2025-07-26 10:44:21 +02:00
1 parent 522f37f66d
commit 2ef7f5b8f0
2 files changed
+16 -12
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

tests/test-mlist.c
+6 -7
View File
@@ -603,16 +603,15 @@ static void test_bif(void)
assert(d == 2.0);
assert(list2f_double_empty_p(x));
list2f_double_clear(x);
// BUG: M_INIT_WITH_VAI23_FUNC uses _back instead of _strong...
// How to fix? Create common functions also for array...
M_LET( (y, (1.0, 2.0, 3.0, 4.0)), LIST_OPLIST(list2f_double, M_BASIC_OPLIST)) {
M_LET( (y, (1.0, 2.0, 3.0, 4.0)), LIST_BIF_OPLIST(list2f_double, M_BASIC_OPLIST)) {
assert(list2f_double_size(y) == 4);
for(list2f_double_it(it, y); !list2f_double_end_p(it); list2f_double_next(it)){
printf("%f ", *list2f_double_cref(it) );
} printf("\n");
printf("Front=%f\n", *list2f_double_front(y) );
assert(*list2f_double_front(y) == 1.0);
assert(*list2f_double_back(y) == 4.0);
d = 1.0;
for(list2f_double_it(it, y); !list2f_double_end_p(it); list2f_double_next(it)){
assert( *list2f_double_cref(it) == d);
d += 1.0;
}
}
}