mirror of
https://github.com/licsber/micropython.git
synced 2024-09-20 09:00:23 +08:00
a71c83a1d1
Ultimately all static strings should be qstr. This entry in the type structure is only used for printing error messages (to tell the type of the bad argument), and printing objects that don't supply a .print method.
60 lines
1.6 KiB
C
60 lines
1.6 KiB
C
#include <stdlib.h>
|
|
#include <assert.h>
|
|
|
|
#include "nlr.h"
|
|
#include "misc.h"
|
|
#include "mpconfig.h"
|
|
#include "qstr.h"
|
|
#include "obj.h"
|
|
#include "runtime.h"
|
|
|
|
typedef struct _mp_obj_map_t {
|
|
mp_obj_base_t base;
|
|
machine_uint_t n_iters;
|
|
mp_obj_t fun;
|
|
mp_obj_t iters[];
|
|
} mp_obj_map_t;
|
|
|
|
STATIC mp_obj_t map_make_new(mp_obj_t type_in, uint n_args, uint n_kw, const mp_obj_t *args) {
|
|
if (n_args < 2 || n_kw != 0) {
|
|
nlr_jump(mp_obj_new_exception_msg(MP_QSTR_TypeError, "map must have at least 2 arguments and no keyword arguments"));
|
|
}
|
|
assert(n_args >= 2);
|
|
mp_obj_map_t *o = m_new_obj_var(mp_obj_map_t, mp_obj_t, n_args - 1);
|
|
o->base.type = &map_type;
|
|
o->n_iters = n_args - 1;
|
|
o->fun = args[0];
|
|
for (int i = 0; i < n_args - 1; i++) {
|
|
o->iters[i] = rt_getiter(args[i + 1]);
|
|
}
|
|
return o;
|
|
}
|
|
|
|
STATIC mp_obj_t map_getiter(mp_obj_t self_in) {
|
|
return self_in;
|
|
}
|
|
|
|
STATIC mp_obj_t map_iternext(mp_obj_t self_in) {
|
|
assert(MP_OBJ_IS_TYPE(self_in, &map_type));
|
|
mp_obj_map_t *self = self_in;
|
|
mp_obj_t *nextses = m_new(mp_obj_t, self->n_iters);
|
|
|
|
for (int i = 0; i < self->n_iters; i++) {
|
|
mp_obj_t next = rt_iternext(self->iters[i]);
|
|
if (next == mp_const_stop_iteration) {
|
|
m_del(mp_obj_t, nextses, self->n_iters);
|
|
return mp_const_stop_iteration;
|
|
}
|
|
nextses[i] = next;
|
|
}
|
|
return rt_call_function_n_kw(self->fun, self->n_iters, 0, nextses);
|
|
}
|
|
|
|
const mp_obj_type_t map_type = {
|
|
{ &mp_const_type },
|
|
.name = MP_QSTR_map,
|
|
.make_new = map_make_new,
|
|
.getiter = map_getiter,
|
|
.iternext = map_iternext,
|
|
};
|