Numworks Epsilon  1.4.1
Graphing Calculator Operating System
objfilter.c
Go to the documentation of this file.
1 /*
2  * This file is part of the MicroPython project, http://micropython.org/
3  *
4  * The MIT License (MIT)
5  *
6  * Copyright (c) 2013, 2014 Damien P. George
7  *
8  * Permission is hereby granted, free of charge, to any person obtaining a copy
9  * of this software and associated documentation files (the "Software"), to deal
10  * in the Software without restriction, including without limitation the rights
11  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12  * copies of the Software, and to permit persons to whom the Software is
13  * furnished to do so, subject to the following conditions:
14  *
15  * The above copyright notice and this permission notice shall be included in
16  * all copies or substantial portions of the Software.
17  *
18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
21  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
24  * THE SOFTWARE.
25  */
26 
27 #include "py/runtime.h"
28 
29 #if MICROPY_PY_BUILTINS_FILTER
30 
31 typedef struct _mp_obj_filter_t {
32  mp_obj_base_t base;
33  mp_obj_t fun;
34  mp_obj_t iter;
35 } mp_obj_filter_t;
36 
37 STATIC mp_obj_t filter_make_new(const mp_obj_type_t *type, size_t n_args, size_t n_kw, const mp_obj_t *args) {
38  mp_arg_check_num(n_args, n_kw, 2, 2, false);
39  mp_obj_filter_t *o = m_new_obj(mp_obj_filter_t);
40  o->base.type = type;
41  o->fun = args[0];
42  o->iter = mp_getiter(args[1], NULL);
43  return MP_OBJ_FROM_PTR(o);
44 }
45 
46 STATIC mp_obj_t filter_iternext(mp_obj_t self_in) {
48  mp_obj_filter_t *self = MP_OBJ_TO_PTR(self_in);
49  mp_obj_t next;
50  while ((next = mp_iternext(self->iter)) != MP_OBJ_STOP_ITERATION) {
51  mp_obj_t val;
52  if (self->fun != mp_const_none) {
53  val = mp_call_function_n_kw(self->fun, 1, 0, &next);
54  } else {
55  val = next;
56  }
57  if (mp_obj_is_true(val)) {
58  return next;
59  }
60  }
61  return MP_OBJ_STOP_ITERATION;
62 }
63 
65  { &mp_type_type },
66  .name = MP_QSTR_filter,
67  .make_new = filter_make_new,
68  .getiter = mp_identity_getiter,
69  .iternext = filter_iternext,
70 };
71 
72 #endif // MICROPY_PY_BUILTINS_FILTER
#define mp_const_none
Definition: obj.h:614
#define MP_OBJ_IS_TYPE(o, t)
Definition: obj.h:254
const mp_obj_type_t mp_type_filter
#define MP_OBJ_FROM_PTR(p)
Definition: obj.h:233
void mp_arg_check_num(size_t n_args, size_t n_kw, size_t n_args_min, size_t n_args_max, bool takes_kw)
Definition: argcheck.c:32
#define STATIC
Definition: mpconfig.h:1178
#define NULL
Definition: stddef.h:4
#define mp_check_self(pred)
Definition: runtime.h:161
args
Definition: i18n.py:175
const mp_obj_type_t mp_type_type
Definition: objtype.c:969
mp_obj_t mp_identity_getiter(mp_obj_t self, mp_obj_iter_buf_t *iter_buf)
Definition: obj.c:507
#define MP_OBJ_TO_PTR(o)
Definition: obj.h:228
mp_obj_t mp_getiter(mp_obj_t o_in, mp_obj_iter_buf_t *iter_buf)
Definition: runtime.c:1120
qstr name
Definition: obj.h:478
#define MP_OBJ_STOP_ITERATION
Definition: obj.h:74
uint64_t mp_obj_t
Definition: obj.h:39
mp_obj_t mp_iternext(mp_obj_t o_in)
Definition: runtime.c:1186
mp_obj_t mp_call_function_n_kw(mp_obj_t fun_in, size_t n_args, size_t n_kw, const mp_obj_t *args)
Definition: runtime.c:615
#define m_new_obj(type)
Definition: misc.h:60
bool mp_obj_is_true(mp_obj_t arg)
Definition: obj.c:108