Damien George | 04b9147 | 2014-05-03 23:27:38 +0100 | [diff] [blame] | 1 | /* |
| 2 | * This file is part of the Micro Python 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 | */ |
Damien George | 9ddbe29 | 2014-12-29 01:02:19 +0000 | [diff] [blame] | 26 | #ifndef __MICROPY_INCLUDED_PY_OBJ_H__ |
| 27 | #define __MICROPY_INCLUDED_PY_OBJ_H__ |
| 28 | |
| 29 | #include "py/mpconfig.h" |
| 30 | #include "py/misc.h" |
| 31 | #include "py/qstr.h" |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 32 | #include "py/mpprint.h" |
Damien George | 04b9147 | 2014-05-03 23:27:38 +0100 | [diff] [blame] | 33 | |
Damien George | 41fceae | 2016-08-15 10:56:55 +1000 | [diff] [blame] | 34 | // This is the definition of the opaque MicroPython object type. |
| 35 | // All concrete objects have an encoding within this type and the |
| 36 | // particular encoding is specified by MICROPY_OBJ_REPR. |
Damien George | b8cfb0d | 2015-11-27 17:09:11 +0000 | [diff] [blame] | 37 | #if MICROPY_OBJ_REPR == MICROPY_OBJ_REPR_D |
| 38 | typedef uint64_t mp_obj_t; |
| 39 | typedef uint64_t mp_const_obj_t; |
| 40 | #else |
Damien George | 41fceae | 2016-08-15 10:56:55 +1000 | [diff] [blame] | 41 | typedef void *mp_obj_t; |
| 42 | typedef const void *mp_const_obj_t; |
Damien George | b8cfb0d | 2015-11-27 17:09:11 +0000 | [diff] [blame] | 43 | #endif |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 44 | |
Damien George | 5b3f0b7 | 2016-01-03 15:55:55 +0000 | [diff] [blame] | 45 | // This mp_obj_type_t struct is a concrete MicroPython object which holds info |
| 46 | // about a type. See below for actual definition of the struct. |
| 47 | typedef struct _mp_obj_type_t mp_obj_type_t; |
Damien | 660365e | 2013-12-17 18:27:24 +0000 | [diff] [blame] | 48 | |
Damien George | 5b3f0b7 | 2016-01-03 15:55:55 +0000 | [diff] [blame] | 49 | // Anything that wants to be a concrete MicroPython object must have mp_obj_base_t |
| 50 | // as its first member (small ints, qstr objs and inline floats are not concrete). |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 51 | struct _mp_obj_base_t { |
Damien George | 5b3f0b7 | 2016-01-03 15:55:55 +0000 | [diff] [blame] | 52 | const mp_obj_type_t *type MICROPY_OBJ_BASE_ALIGNMENT; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 53 | }; |
ian-v | 7a16fad | 2014-01-06 09:52:29 -0800 | [diff] [blame] | 54 | typedef struct _mp_obj_base_t mp_obj_base_t; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 55 | |
Damien George | ea8d06c | 2014-04-17 23:19:36 +0100 | [diff] [blame] | 56 | // These fake objects are used to indicate certain things in arguments or return |
| 57 | // values, and should only be used when explicitly allowed. |
| 58 | // |
Damien George | 6ac5dce | 2014-05-21 19:42:43 +0100 | [diff] [blame] | 59 | // - MP_OBJ_NULL : used to indicate the absence of an object, or unsupported operation. |
Damien George | ea8d06c | 2014-04-17 23:19:36 +0100 | [diff] [blame] | 60 | // - MP_OBJ_STOP_ITERATION : used instead of throwing a StopIteration, for efficiency. |
| 61 | // - MP_OBJ_SENTINEL : used for various internal purposes where one needs |
| 62 | // an object which is unique from all other objects, including MP_OBJ_NULL. |
| 63 | // |
| 64 | // For debugging purposes they are all different. For non-debug mode, we alias |
| 65 | // as many as we can to MP_OBJ_NULL because it's cheaper to load/compare 0. |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 66 | |
Damien George | 8788b13 | 2015-01-25 18:35:54 +0000 | [diff] [blame] | 67 | #ifdef NDEBUG |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 68 | #define MP_OBJ_NULL (MP_OBJ_FROM_PTR((void*)0)) |
| 69 | #define MP_OBJ_STOP_ITERATION (MP_OBJ_FROM_PTR((void*)0)) |
| 70 | #define MP_OBJ_SENTINEL (MP_OBJ_FROM_PTR((void*)4)) |
Damien George | ea8d06c | 2014-04-17 23:19:36 +0100 | [diff] [blame] | 71 | #else |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 72 | #define MP_OBJ_NULL (MP_OBJ_FROM_PTR((void*)0)) |
| 73 | #define MP_OBJ_STOP_ITERATION (MP_OBJ_FROM_PTR((void*)4)) |
| 74 | #define MP_OBJ_SENTINEL (MP_OBJ_FROM_PTR((void*)8)) |
Damien George | ea8d06c | 2014-04-17 23:19:36 +0100 | [diff] [blame] | 75 | #endif |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 76 | |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 77 | // These macros/inline functions operate on objects and depend on the |
| 78 | // particular object representation. They are used to query, pack and |
| 79 | // unpack small ints, qstrs and full object pointers. |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 80 | |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 81 | #if MICROPY_OBJ_REPR == MICROPY_OBJ_REPR_A |
Damien George | 38a2da6 | 2014-01-08 17:33:12 +0000 | [diff] [blame] | 82 | |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 83 | static inline bool MP_OBJ_IS_SMALL_INT(mp_const_obj_t o) |
| 84 | { return ((((mp_int_t)(o)) & 1) != 0); } |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 85 | #define MP_OBJ_SMALL_INT_VALUE(o) (((mp_int_t)(o)) >> 1) |
Damien George | 2bddfd4 | 2016-04-26 09:51:37 +0100 | [diff] [blame] | 86 | #define MP_OBJ_NEW_SMALL_INT(small_int) ((mp_obj_t)((((mp_uint_t)(small_int)) << 1) | 1)) |
Damien George | 38a2da6 | 2014-01-08 17:33:12 +0000 | [diff] [blame] | 87 | |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 88 | static inline bool MP_OBJ_IS_QSTR(mp_const_obj_t o) |
| 89 | { return ((((mp_int_t)(o)) & 3) == 2); } |
Damien George | 963a5a3 | 2015-01-16 17:47:07 +0000 | [diff] [blame] | 90 | #define MP_OBJ_QSTR_VALUE(o) (((mp_uint_t)(o)) >> 2) |
Damien George | 9ddbe29 | 2014-12-29 01:02:19 +0000 | [diff] [blame] | 91 | #define MP_OBJ_NEW_QSTR(qst) ((mp_obj_t)((((mp_uint_t)(qst)) << 2) | 2)) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 92 | |
Damien George | aedb859 | 2015-10-17 22:57:34 +0100 | [diff] [blame] | 93 | #if MICROPY_PY_BUILTINS_FLOAT |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 94 | #define mp_const_float_e MP_ROM_PTR(&mp_const_float_e_obj) |
| 95 | #define mp_const_float_pi MP_ROM_PTR(&mp_const_float_pi_obj) |
Damien George | aedb859 | 2015-10-17 22:57:34 +0100 | [diff] [blame] | 96 | extern const struct _mp_obj_float_t mp_const_float_e_obj; |
| 97 | extern const struct _mp_obj_float_t mp_const_float_pi_obj; |
| 98 | |
| 99 | #define mp_obj_is_float(o) MP_OBJ_IS_TYPE((o), &mp_type_float) |
| 100 | mp_float_t mp_obj_float_get(mp_obj_t self_in); |
| 101 | mp_obj_t mp_obj_new_float(mp_float_t value); |
| 102 | #endif |
| 103 | |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 104 | static inline bool MP_OBJ_IS_OBJ(mp_const_obj_t o) |
| 105 | { return ((((mp_int_t)(o)) & 3) == 0); } |
| 106 | |
| 107 | #elif MICROPY_OBJ_REPR == MICROPY_OBJ_REPR_B |
| 108 | |
| 109 | static inline bool MP_OBJ_IS_SMALL_INT(mp_const_obj_t o) |
| 110 | { return ((((mp_int_t)(o)) & 3) == 1); } |
| 111 | #define MP_OBJ_SMALL_INT_VALUE(o) (((mp_int_t)(o)) >> 2) |
Damien George | 2bddfd4 | 2016-04-26 09:51:37 +0100 | [diff] [blame] | 112 | #define MP_OBJ_NEW_SMALL_INT(small_int) ((mp_obj_t)((((mp_uint_t)(small_int)) << 2) | 1)) |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 113 | |
| 114 | static inline bool MP_OBJ_IS_QSTR(mp_const_obj_t o) |
| 115 | { return ((((mp_int_t)(o)) & 3) == 3); } |
| 116 | #define MP_OBJ_QSTR_VALUE(o) (((mp_uint_t)(o)) >> 2) |
| 117 | #define MP_OBJ_NEW_QSTR(qst) ((mp_obj_t)((((mp_uint_t)(qst)) << 2) | 3)) |
| 118 | |
Damien George | aedb859 | 2015-10-17 22:57:34 +0100 | [diff] [blame] | 119 | #if MICROPY_PY_BUILTINS_FLOAT |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 120 | #define mp_const_float_e MP_ROM_PTR(&mp_const_float_e_obj) |
| 121 | #define mp_const_float_pi MP_ROM_PTR(&mp_const_float_pi_obj) |
Damien George | aedb859 | 2015-10-17 22:57:34 +0100 | [diff] [blame] | 122 | extern const struct _mp_obj_float_t mp_const_float_e_obj; |
| 123 | extern const struct _mp_obj_float_t mp_const_float_pi_obj; |
| 124 | |
| 125 | #define mp_obj_is_float(o) MP_OBJ_IS_TYPE((o), &mp_type_float) |
| 126 | mp_float_t mp_obj_float_get(mp_obj_t self_in); |
| 127 | mp_obj_t mp_obj_new_float(mp_float_t value); |
| 128 | #endif |
| 129 | |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 130 | static inline bool MP_OBJ_IS_OBJ(mp_const_obj_t o) |
| 131 | { return ((((mp_int_t)(o)) & 1) == 0); } |
| 132 | |
Damien George | 183edef | 2015-10-17 23:20:57 +0100 | [diff] [blame] | 133 | #elif MICROPY_OBJ_REPR == MICROPY_OBJ_REPR_C |
| 134 | |
| 135 | static inline bool MP_OBJ_IS_SMALL_INT(mp_const_obj_t o) |
| 136 | { return ((((mp_int_t)(o)) & 1) != 0); } |
| 137 | #define MP_OBJ_SMALL_INT_VALUE(o) (((mp_int_t)(o)) >> 1) |
Damien George | 2bddfd4 | 2016-04-26 09:51:37 +0100 | [diff] [blame] | 138 | #define MP_OBJ_NEW_SMALL_INT(small_int) ((mp_obj_t)((((mp_uint_t)(small_int)) << 1) | 1)) |
Damien George | 183edef | 2015-10-17 23:20:57 +0100 | [diff] [blame] | 139 | |
Damien George | fe03e7b | 2015-12-18 21:44:01 +0000 | [diff] [blame] | 140 | #define mp_const_float_e MP_ROM_PTR((mp_obj_t)(((0x402df854 & ~3) | 2) + 0x80800000)) |
| 141 | #define mp_const_float_pi MP_ROM_PTR((mp_obj_t)(((0x40490fdb & ~3) | 2) + 0x80800000)) |
Damien George | 183edef | 2015-10-17 23:20:57 +0100 | [diff] [blame] | 142 | |
| 143 | static inline bool mp_obj_is_float(mp_const_obj_t o) |
Damien George | 8b8d189 | 2015-11-06 23:25:10 +0000 | [diff] [blame] | 144 | { return (((mp_uint_t)(o)) & 3) == 2 && (((mp_uint_t)(o)) & 0xff800007) != 0x00000006; } |
Damien George | 183edef | 2015-10-17 23:20:57 +0100 | [diff] [blame] | 145 | static inline mp_float_t mp_obj_float_get(mp_const_obj_t o) { |
| 146 | union { |
| 147 | mp_float_t f; |
| 148 | mp_uint_t u; |
Damien George | 8b8d189 | 2015-11-06 23:25:10 +0000 | [diff] [blame] | 149 | } num = {.u = ((mp_uint_t)o - 0x80800000) & ~3}; |
Damien George | 183edef | 2015-10-17 23:20:57 +0100 | [diff] [blame] | 150 | return num.f; |
| 151 | } |
| 152 | static inline mp_obj_t mp_obj_new_float(mp_float_t f) { |
| 153 | union { |
| 154 | mp_float_t f; |
| 155 | mp_uint_t u; |
| 156 | } num = {.f = f}; |
Damien George | 8b8d189 | 2015-11-06 23:25:10 +0000 | [diff] [blame] | 157 | return (mp_obj_t)(((num.u & ~0x3) | 2) + 0x80800000); |
Damien George | 183edef | 2015-10-17 23:20:57 +0100 | [diff] [blame] | 158 | } |
| 159 | |
| 160 | static inline bool MP_OBJ_IS_QSTR(mp_const_obj_t o) |
Damien George | 8b8d189 | 2015-11-06 23:25:10 +0000 | [diff] [blame] | 161 | { return (((mp_uint_t)(o)) & 0xff800007) == 0x00000006; } |
| 162 | #define MP_OBJ_QSTR_VALUE(o) (((mp_uint_t)(o)) >> 3) |
| 163 | #define MP_OBJ_NEW_QSTR(qst) ((mp_obj_t)((((mp_uint_t)(qst)) << 3) | 0x00000006)) |
Damien George | 183edef | 2015-10-17 23:20:57 +0100 | [diff] [blame] | 164 | |
| 165 | static inline bool MP_OBJ_IS_OBJ(mp_const_obj_t o) |
| 166 | { return ((((mp_int_t)(o)) & 3) == 0); } |
| 167 | |
Damien George | b8cfb0d | 2015-11-27 17:09:11 +0000 | [diff] [blame] | 168 | #elif MICROPY_OBJ_REPR == MICROPY_OBJ_REPR_D |
| 169 | |
| 170 | static inline bool MP_OBJ_IS_SMALL_INT(mp_const_obj_t o) |
| 171 | { return ((((mp_int_t)(o)) & 0xffff000000000000) == 0x0001000000000000); } |
| 172 | #define MP_OBJ_SMALL_INT_VALUE(o) (((intptr_t)(o)) >> 1) |
| 173 | #define MP_OBJ_NEW_SMALL_INT(small_int) ((mp_obj_t)(((uintptr_t)(small_int)) << 1) | 0x0001000000000001) |
| 174 | |
| 175 | static inline bool MP_OBJ_IS_QSTR(mp_const_obj_t o) |
| 176 | { return ((((mp_int_t)(o)) & 0xffff000000000000) == 0x0002000000000000); } |
Damien George | 1fa6be5 | 2016-01-08 13:43:13 +0000 | [diff] [blame] | 177 | #define MP_OBJ_QSTR_VALUE(o) ((((uint32_t)(o)) >> 1) & 0xffffffff) |
Damien George | b8cfb0d | 2015-11-27 17:09:11 +0000 | [diff] [blame] | 178 | #define MP_OBJ_NEW_QSTR(qst) ((mp_obj_t)((((mp_uint_t)(qst)) << 1) | 0x0002000000000001)) |
| 179 | |
| 180 | #if MICROPY_PY_BUILTINS_FLOAT |
| 181 | #define mp_const_float_e {((mp_obj_t)((uint64_t)0x4005bf0a8b125769 + 0x8004000000000000))} |
| 182 | #define mp_const_float_pi {((mp_obj_t)((uint64_t)0x400921fb54442d18 + 0x8004000000000000))} |
| 183 | |
| 184 | static inline bool mp_obj_is_float(mp_const_obj_t o) { |
| 185 | return ((uint64_t)(o) & 0xfffc000000000000) != 0; |
| 186 | } |
| 187 | static inline mp_float_t mp_obj_float_get(mp_const_obj_t o) { |
| 188 | union { |
| 189 | mp_float_t f; |
| 190 | uint64_t r; |
| 191 | } num = {.r = o - 0x8004000000000000}; |
| 192 | return num.f; |
| 193 | } |
| 194 | static inline mp_obj_t mp_obj_new_float(mp_float_t f) { |
| 195 | union { |
| 196 | mp_float_t f; |
| 197 | uint64_t r; |
| 198 | } num = {.f = f}; |
| 199 | return num.r + 0x8004000000000000; |
| 200 | } |
| 201 | #endif |
| 202 | |
| 203 | static inline bool MP_OBJ_IS_OBJ(mp_const_obj_t o) |
| 204 | { return ((((uint64_t)(o)) & 0xffff000000000000) == 0x0000000000000000); } |
| 205 | #define MP_OBJ_TO_PTR(o) ((void*)(uintptr_t)(o)) |
| 206 | #define MP_OBJ_FROM_PTR(p) ((mp_obj_t)((uintptr_t)(p))) |
| 207 | |
| 208 | // rom object storage needs special handling to widen 32-bit pointer to 64-bits |
| 209 | typedef union _mp_rom_obj_t { uint64_t u64; struct { const void *lo, *hi; } u32; } mp_rom_obj_t; |
| 210 | #define MP_ROM_INT(i) {MP_OBJ_NEW_SMALL_INT(i)} |
| 211 | #define MP_ROM_QSTR(q) {MP_OBJ_NEW_QSTR(q)} |
| 212 | #if MP_ENDIANNESS_LITTLE |
| 213 | #define MP_ROM_PTR(p) {.u32 = {.lo = (p), .hi = NULL}} |
| 214 | #else |
| 215 | #define MP_ROM_PTR(p) {.u32 = {.lo = NULL, .hi = (p)}} |
| 216 | #endif |
| 217 | |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 218 | #endif |
| 219 | |
Paul Sokolovsky | 3d59825 | 2015-03-25 09:25:41 +0200 | [diff] [blame] | 220 | // Macros to convert between mp_obj_t and concrete object types. |
| 221 | // These are identity operations in MicroPython, but ability to override |
| 222 | // these operations are provided to experiment with other methods of |
| 223 | // object representation and memory management. |
| 224 | |
| 225 | // Cast mp_obj_t to object pointer |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 226 | #ifndef MP_OBJ_TO_PTR |
| 227 | #define MP_OBJ_TO_PTR(o) ((void*)o) |
Paul Sokolovsky | 3d59825 | 2015-03-25 09:25:41 +0200 | [diff] [blame] | 228 | #endif |
| 229 | |
| 230 | // Cast object pointer to mp_obj_t |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 231 | #ifndef MP_OBJ_FROM_PTR |
| 232 | #define MP_OBJ_FROM_PTR(p) ((mp_obj_t)p) |
Paul Sokolovsky | 3d59825 | 2015-03-25 09:25:41 +0200 | [diff] [blame] | 233 | #endif |
| 234 | |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 235 | // Macros to create objects that are stored in ROM. |
| 236 | |
| 237 | #ifndef MP_ROM_INT |
| 238 | typedef mp_const_obj_t mp_rom_obj_t; |
| 239 | #define MP_ROM_INT(i) MP_OBJ_NEW_SMALL_INT(i) |
| 240 | #define MP_ROM_QSTR(q) MP_OBJ_NEW_QSTR(q) |
| 241 | #define MP_ROM_PTR(p) (p) |
| 242 | /* for testing |
| 243 | typedef struct _mp_rom_obj_t { mp_const_obj_t o; } mp_rom_obj_t; |
| 244 | #define MP_ROM_INT(i) {MP_OBJ_NEW_SMALL_INT(i)} |
| 245 | #define MP_ROM_QSTR(q) {MP_OBJ_NEW_QSTR(q)} |
| 246 | #define MP_ROM_PTR(p) {.o = p} |
| 247 | */ |
| 248 | #endif |
| 249 | |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 250 | // The macros below are derived from the ones above and are used to |
| 251 | // check for more specific object types. |
| 252 | |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 253 | #define MP_OBJ_IS_TYPE(o, t) (MP_OBJ_IS_OBJ(o) && (((mp_obj_base_t*)MP_OBJ_TO_PTR(o))->type == (t))) // this does not work for checking int, str or fun; use below macros for that |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 254 | #define MP_OBJ_IS_INT(o) (MP_OBJ_IS_SMALL_INT(o) || MP_OBJ_IS_TYPE(o, &mp_type_int)) |
| 255 | #define MP_OBJ_IS_STR(o) (MP_OBJ_IS_QSTR(o) || MP_OBJ_IS_TYPE(o, &mp_type_str)) |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 256 | #define MP_OBJ_IS_STR_OR_BYTES(o) (MP_OBJ_IS_QSTR(o) || (MP_OBJ_IS_OBJ(o) && ((mp_obj_base_t*)MP_OBJ_TO_PTR(o))->type->binary_op == mp_obj_str_binary_op)) |
| 257 | #define MP_OBJ_IS_FUN(o) (MP_OBJ_IS_OBJ(o) && (((mp_obj_base_t*)MP_OBJ_TO_PTR(o))->type->name == MP_QSTR_function)) |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 258 | |
| 259 | // Note: inline functions sometimes use much more code space than the |
| 260 | // equivalent macros, depending on the compiler. |
| 261 | //static inline bool MP_OBJ_IS_TYPE(mp_const_obj_t o, const mp_obj_type_t *t) { return (MP_OBJ_IS_OBJ(o) && (((mp_obj_base_t*)(o))->type == (t))); } // this does not work for checking a string, use below macro for that |
| 262 | //static inline bool MP_OBJ_IS_INT(mp_const_obj_t o) { return (MP_OBJ_IS_SMALL_INT(o) || MP_OBJ_IS_TYPE(o, &mp_type_int)); } // returns true if o is a small int or long int |
| 263 | // Need to forward declare these for the inline function to compile. |
Damien George | 5b3f0b7 | 2016-01-03 15:55:55 +0000 | [diff] [blame] | 264 | extern const mp_obj_type_t mp_type_int; |
| 265 | extern const mp_obj_type_t mp_type_bool; |
Damien George | 567184e | 2015-03-29 14:05:46 +0100 | [diff] [blame] | 266 | static inline bool mp_obj_is_integer(mp_const_obj_t o) { return MP_OBJ_IS_INT(o) || MP_OBJ_IS_TYPE(o, &mp_type_bool); } // returns true if o is bool, small int or long int |
| 267 | //static inline bool MP_OBJ_IS_STR(mp_const_obj_t o) { return (MP_OBJ_IS_QSTR(o) || MP_OBJ_IS_TYPE(o, &mp_type_str)); } |
| 268 | |
| 269 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 270 | // These macros are used to declare and define constant function objects |
| 271 | // You can put "static" in front of the definitions to make them local |
| 272 | |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 273 | #define MP_DECLARE_CONST_FUN_OBJ_0(obj_name) extern const mp_obj_fun_builtin_fixed_t obj_name |
| 274 | #define MP_DECLARE_CONST_FUN_OBJ_1(obj_name) extern const mp_obj_fun_builtin_fixed_t obj_name |
| 275 | #define MP_DECLARE_CONST_FUN_OBJ_2(obj_name) extern const mp_obj_fun_builtin_fixed_t obj_name |
| 276 | #define MP_DECLARE_CONST_FUN_OBJ_3(obj_name) extern const mp_obj_fun_builtin_fixed_t obj_name |
| 277 | #define MP_DECLARE_CONST_FUN_OBJ_VAR(obj_name) extern const mp_obj_fun_builtin_var_t obj_name |
| 278 | #define MP_DECLARE_CONST_FUN_OBJ_VAR_BETWEEN(obj_name) extern const mp_obj_fun_builtin_var_t obj_name |
| 279 | #define MP_DECLARE_CONST_FUN_OBJ_KW(obj_name) extern const mp_obj_fun_builtin_var_t obj_name |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 280 | |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 281 | #define MP_DEFINE_CONST_FUN_OBJ_0(obj_name, fun_name) \ |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 282 | const mp_obj_fun_builtin_fixed_t obj_name = \ |
| 283 | {{&mp_type_fun_builtin_0}, .fun._0 = fun_name} |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 284 | #define MP_DEFINE_CONST_FUN_OBJ_1(obj_name, fun_name) \ |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 285 | const mp_obj_fun_builtin_fixed_t obj_name = \ |
| 286 | {{&mp_type_fun_builtin_1}, .fun._1 = fun_name} |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 287 | #define MP_DEFINE_CONST_FUN_OBJ_2(obj_name, fun_name) \ |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 288 | const mp_obj_fun_builtin_fixed_t obj_name = \ |
| 289 | {{&mp_type_fun_builtin_2}, .fun._2 = fun_name} |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 290 | #define MP_DEFINE_CONST_FUN_OBJ_3(obj_name, fun_name) \ |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 291 | const mp_obj_fun_builtin_fixed_t obj_name = \ |
| 292 | {{&mp_type_fun_builtin_3}, .fun._3 = fun_name} |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 293 | #define MP_DEFINE_CONST_FUN_OBJ_VAR(obj_name, n_args_min, fun_name) \ |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 294 | const mp_obj_fun_builtin_var_t obj_name = \ |
| 295 | {{&mp_type_fun_builtin_var}, false, n_args_min, MP_OBJ_FUN_ARGS_MAX, .fun.var = fun_name} |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 296 | #define MP_DEFINE_CONST_FUN_OBJ_VAR_BETWEEN(obj_name, n_args_min, n_args_max, fun_name) \ |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 297 | const mp_obj_fun_builtin_var_t obj_name = \ |
| 298 | {{&mp_type_fun_builtin_var}, false, n_args_min, n_args_max, .fun.var = fun_name} |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 299 | #define MP_DEFINE_CONST_FUN_OBJ_KW(obj_name, n_args_min, fun_name) \ |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 300 | const mp_obj_fun_builtin_var_t obj_name = \ |
| 301 | {{&mp_type_fun_builtin_var}, true, n_args_min, MP_OBJ_FUN_ARGS_MAX, .fun.kw = fun_name} |
John R. Lenton | c06763a | 2014-01-07 17:29:16 +0000 | [diff] [blame] | 302 | |
Damien George | 78d702c | 2014-12-09 16:19:48 +0000 | [diff] [blame] | 303 | // These macros are used to define constant map/dict objects |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 304 | // You can put "static" in front of the definition to make it local |
| 305 | |
Damien George | 78d702c | 2014-12-09 16:19:48 +0000 | [diff] [blame] | 306 | #define MP_DEFINE_CONST_MAP(map_name, table_name) \ |
| 307 | const mp_map_t map_name = { \ |
| 308 | .all_keys_are_qstrs = 1, \ |
Paul Sokolovsky | 0ef01d0 | 2015-03-18 01:25:04 +0200 | [diff] [blame] | 309 | .is_fixed = 1, \ |
| 310 | .is_ordered = 1, \ |
Damien George | 78d702c | 2014-12-09 16:19:48 +0000 | [diff] [blame] | 311 | .used = MP_ARRAY_SIZE(table_name), \ |
| 312 | .alloc = MP_ARRAY_SIZE(table_name), \ |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 313 | .table = (mp_map_elem_t*)(mp_rom_map_elem_t*)table_name, \ |
Damien George | 78d702c | 2014-12-09 16:19:48 +0000 | [diff] [blame] | 314 | } |
| 315 | |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 316 | #define MP_DEFINE_CONST_DICT(dict_name, table_name) \ |
| 317 | const mp_obj_dict_t dict_name = { \ |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 318 | .base = {&mp_type_dict}, \ |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 319 | .map = { \ |
| 320 | .all_keys_are_qstrs = 1, \ |
Paul Sokolovsky | 0ef01d0 | 2015-03-18 01:25:04 +0200 | [diff] [blame] | 321 | .is_fixed = 1, \ |
| 322 | .is_ordered = 1, \ |
Damien George | 3b603f2 | 2014-11-29 14:39:27 +0000 | [diff] [blame] | 323 | .used = MP_ARRAY_SIZE(table_name), \ |
| 324 | .alloc = MP_ARRAY_SIZE(table_name), \ |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 325 | .table = (mp_map_elem_t*)(mp_rom_map_elem_t*)table_name, \ |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 326 | }, \ |
| 327 | } |
| 328 | |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 329 | // These macros are used to declare and define constant staticmethond and classmethod objects |
| 330 | // You can put "static" in front of the definitions to make them local |
| 331 | |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 332 | #define MP_DECLARE_CONST_STATICMETHOD_OBJ(obj_name) extern const mp_rom_obj_static_class_method_t obj_name |
| 333 | #define MP_DECLARE_CONST_CLASSMETHOD_OBJ(obj_name) extern const mp_rom_obj_static_class_method_t obj_name |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 334 | |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 335 | #define MP_DEFINE_CONST_STATICMETHOD_OBJ(obj_name, fun_name) const mp_rom_obj_static_class_method_t obj_name = {{&mp_type_staticmethod}, fun_name} |
| 336 | #define MP_DEFINE_CONST_CLASSMETHOD_OBJ(obj_name, fun_name) const mp_rom_obj_static_class_method_t obj_name = {{&mp_type_classmethod}, fun_name} |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 337 | |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 338 | // Underlying map/hash table implementation (not dict object or map function) |
| 339 | |
| 340 | typedef struct _mp_map_elem_t { |
| 341 | mp_obj_t key; |
| 342 | mp_obj_t value; |
| 343 | } mp_map_elem_t; |
| 344 | |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 345 | typedef struct _mp_rom_map_elem_t { |
| 346 | mp_rom_obj_t key; |
| 347 | mp_rom_obj_t value; |
| 348 | } mp_rom_map_elem_t; |
| 349 | |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 350 | // TODO maybe have a truncated mp_map_t for fixed tables, since alloc=used |
| 351 | // put alloc last in the structure, so the truncated version does not need it |
| 352 | // this would save 1 ROM word for all ROM objects that have a locals_dict |
| 353 | // would also need a trucated dict structure |
| 354 | |
| 355 | typedef struct _mp_map_t { |
Damien George | af622eb | 2017-02-08 11:00:15 +1100 | [diff] [blame] | 356 | size_t all_keys_are_qstrs : 1; |
| 357 | size_t is_fixed : 1; // a fixed array that can't be modified; must also be ordered |
| 358 | size_t is_ordered : 1; // an ordered array |
| 359 | size_t used : (8 * sizeof(size_t) - 3); |
| 360 | size_t alloc; |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 361 | mp_map_elem_t *table; |
| 362 | } mp_map_t; |
| 363 | |
Damien George | d1cee02 | 2015-03-20 17:41:37 +0000 | [diff] [blame] | 364 | // mp_set_lookup requires these constants to have the values they do |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 365 | typedef enum _mp_map_lookup_kind_t { |
Damien George | d1cee02 | 2015-03-20 17:41:37 +0000 | [diff] [blame] | 366 | MP_MAP_LOOKUP = 0, |
| 367 | MP_MAP_LOOKUP_ADD_IF_NOT_FOUND = 1, |
| 368 | MP_MAP_LOOKUP_REMOVE_IF_FOUND = 2, |
| 369 | MP_MAP_LOOKUP_ADD_IF_NOT_FOUND_OR_REMOVE_IF_FOUND = 3, // only valid for mp_set_lookup |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 370 | } mp_map_lookup_kind_t; |
| 371 | |
Paul Sokolovsky | e5dbe1e | 2014-11-26 21:17:16 +0200 | [diff] [blame] | 372 | extern const mp_map_t mp_const_empty_map; |
| 373 | |
Damien George | af622eb | 2017-02-08 11:00:15 +1100 | [diff] [blame] | 374 | static inline bool MP_MAP_SLOT_IS_FILLED(const mp_map_t *map, size_t pos) { return ((map)->table[pos].key != MP_OBJ_NULL && (map)->table[pos].key != MP_OBJ_SENTINEL); } |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 375 | |
Damien George | af622eb | 2017-02-08 11:00:15 +1100 | [diff] [blame] | 376 | void mp_map_init(mp_map_t *map, size_t n); |
| 377 | void mp_map_init_fixed_table(mp_map_t *map, size_t n, const mp_obj_t *table); |
| 378 | mp_map_t *mp_map_new(size_t n); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 379 | void mp_map_deinit(mp_map_t *map); |
| 380 | void mp_map_free(mp_map_t *map); |
Damien George | 2801e6f | 2015-04-04 15:53:11 +0100 | [diff] [blame] | 381 | mp_map_elem_t *mp_map_lookup(mp_map_t *map, mp_obj_t index, mp_map_lookup_kind_t lookup_kind); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 382 | void mp_map_clear(mp_map_t *map); |
Paul Sokolovsky | e3f58c8 | 2014-04-05 04:14:22 +0300 | [diff] [blame] | 383 | void mp_map_dump(mp_map_t *map); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 384 | |
| 385 | // Underlying set implementation (not set object) |
| 386 | |
| 387 | typedef struct _mp_set_t { |
Damien George | af622eb | 2017-02-08 11:00:15 +1100 | [diff] [blame] | 388 | size_t alloc; |
| 389 | size_t used; |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 390 | mp_obj_t *table; |
| 391 | } mp_set_t; |
| 392 | |
Damien George | af622eb | 2017-02-08 11:00:15 +1100 | [diff] [blame] | 393 | static inline bool MP_SET_SLOT_IS_FILLED(const mp_set_t *set, size_t pos) { return ((set)->table[pos] != MP_OBJ_NULL && (set)->table[pos] != MP_OBJ_SENTINEL); } |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 394 | |
Damien George | af622eb | 2017-02-08 11:00:15 +1100 | [diff] [blame] | 395 | void mp_set_init(mp_set_t *set, size_t n); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 396 | mp_obj_t mp_set_lookup(mp_set_t *set, mp_obj_t index, mp_map_lookup_kind_t lookup_kind); |
Damien George | 95004e5 | 2014-04-05 17:17:19 +0100 | [diff] [blame] | 397 | mp_obj_t mp_set_remove_first(mp_set_t *set); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 398 | void mp_set_clear(mp_set_t *set); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 399 | |
| 400 | // Type definitions for methods |
| 401 | |
| 402 | typedef mp_obj_t (*mp_fun_0_t)(void); |
| 403 | typedef mp_obj_t (*mp_fun_1_t)(mp_obj_t); |
| 404 | typedef mp_obj_t (*mp_fun_2_t)(mp_obj_t, mp_obj_t); |
John R. Lenton | 45a8744 | 2014-01-04 01:15:01 +0000 | [diff] [blame] | 405 | typedef mp_obj_t (*mp_fun_3_t)(mp_obj_t, mp_obj_t, mp_obj_t); |
Damien George | 4b72b3a | 2016-01-03 14:21:40 +0000 | [diff] [blame] | 406 | typedef mp_obj_t (*mp_fun_var_t)(size_t n, const mp_obj_t *); |
Paul Sokolovsky | 069654f | 2016-04-04 15:35:44 +0300 | [diff] [blame] | 407 | // mp_fun_kw_t takes mp_map_t* (and not const mp_map_t*) to ease passing |
| 408 | // this arg to mp_map_lookup(). |
Damien George | 4b72b3a | 2016-01-03 14:21:40 +0000 | [diff] [blame] | 409 | typedef mp_obj_t (*mp_fun_kw_t)(size_t n, const mp_obj_t *, mp_map_t *); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 410 | |
Paul Sokolovsky | 76d982e | 2014-01-13 19:19:16 +0200 | [diff] [blame] | 411 | typedef enum { |
Paul Sokolovsky | d8351ca | 2014-05-02 01:51:25 +0300 | [diff] [blame] | 412 | PRINT_STR = 0, |
| 413 | PRINT_REPR = 1, |
| 414 | PRINT_EXC = 2, // Special format for printing exception in unhandled exception message |
Damien George | 612045f | 2014-09-17 22:56:34 +0100 | [diff] [blame] | 415 | PRINT_JSON = 3, |
Paul Sokolovsky | ef63ab5 | 2015-12-20 16:44:36 +0200 | [diff] [blame] | 416 | PRINT_RAW = 4, // Special format for printing bytes as an undercorated string |
Damien George | 612045f | 2014-09-17 22:56:34 +0100 | [diff] [blame] | 417 | PRINT_EXC_SUBCLASS = 0x80, // Internal flag for printing exception subclasses |
Paul Sokolovsky | 76d982e | 2014-01-13 19:19:16 +0200 | [diff] [blame] | 418 | } mp_print_kind_t; |
| 419 | |
Damien George | ae8d867 | 2016-01-09 23:14:54 +0000 | [diff] [blame] | 420 | typedef struct _mp_obj_iter_buf_t { |
| 421 | mp_obj_base_t base; |
| 422 | mp_obj_t buf[3]; |
| 423 | } mp_obj_iter_buf_t; |
| 424 | |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 425 | typedef void (*mp_print_fun_t)(const mp_print_t *print, mp_obj_t o, mp_print_kind_t kind); |
Damien George | 5b3f0b7 | 2016-01-03 15:55:55 +0000 | [diff] [blame] | 426 | typedef mp_obj_t (*mp_make_new_fun_t)(const mp_obj_type_t *type, size_t n_args, size_t n_kw, const mp_obj_t *args); |
Damien George | a0c9781 | 2016-01-03 09:59:18 +0000 | [diff] [blame] | 427 | typedef mp_obj_t (*mp_call_fun_t)(mp_obj_t fun, size_t n_args, size_t n_kw, const mp_obj_t *args); |
Damien George | ecc88e9 | 2014-08-30 00:35:11 +0100 | [diff] [blame] | 428 | typedef mp_obj_t (*mp_unary_op_fun_t)(mp_uint_t op, mp_obj_t); |
| 429 | typedef mp_obj_t (*mp_binary_op_fun_t)(mp_uint_t op, mp_obj_t, mp_obj_t); |
Damien George | b1bbe96 | 2015-04-01 14:10:50 +0000 | [diff] [blame] | 430 | typedef void (*mp_attr_fun_t)(mp_obj_t self_in, qstr attr, mp_obj_t *dest); |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 431 | typedef mp_obj_t (*mp_subscr_fun_t)(mp_obj_t self_in, mp_obj_t index, mp_obj_t value); |
Damien George | ae8d867 | 2016-01-09 23:14:54 +0000 | [diff] [blame] | 432 | typedef mp_obj_t (*mp_getiter_fun_t)(mp_obj_t self_in, mp_obj_iter_buf_t *iter_buf); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 433 | |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 434 | // Buffer protocol |
Damien George | 57a4b4f | 2014-04-18 22:29:21 +0100 | [diff] [blame] | 435 | typedef struct _mp_buffer_info_t { |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 436 | // if we'd bother to support various versions of structure |
| 437 | // (with different number of fields), we can distinguish |
| 438 | // them with ver = sizeof(struct). Cons: overkill for *micro*? |
| 439 | //int ver; // ? |
| 440 | |
Damien George | 42f3de9 | 2014-10-03 17:44:14 +0000 | [diff] [blame] | 441 | void *buf; // can be NULL if len == 0 |
Damien George | 0d1f886 | 2016-03-15 12:20:57 +0000 | [diff] [blame] | 442 | size_t len; // in bytes |
Damien George | 42f3de9 | 2014-10-03 17:44:14 +0000 | [diff] [blame] | 443 | int typecode; // as per binary.h |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 444 | |
| 445 | // Rationale: to load arbitrary-sized sprites directly to LCD |
| 446 | // Cons: a bit adhoc usecase |
| 447 | // int stride; |
Damien George | 57a4b4f | 2014-04-18 22:29:21 +0100 | [diff] [blame] | 448 | } mp_buffer_info_t; |
| 449 | #define MP_BUFFER_READ (1) |
| 450 | #define MP_BUFFER_WRITE (2) |
| 451 | #define MP_BUFFER_RW (MP_BUFFER_READ | MP_BUFFER_WRITE) |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 452 | typedef struct _mp_buffer_p_t { |
Damien George | 4d91723 | 2014-08-30 14:28:06 +0100 | [diff] [blame] | 453 | mp_int_t (*get_buffer)(mp_obj_t obj, mp_buffer_info_t *bufinfo, mp_uint_t flags); |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 454 | } mp_buffer_p_t; |
Damien George | 4d91723 | 2014-08-30 14:28:06 +0100 | [diff] [blame] | 455 | bool mp_get_buffer(mp_obj_t obj, mp_buffer_info_t *bufinfo, mp_uint_t flags); |
| 456 | void mp_get_buffer_raise(mp_obj_t obj, mp_buffer_info_t *bufinfo, mp_uint_t flags); |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 457 | |
| 458 | // Stream protocol |
| 459 | typedef struct _mp_stream_p_t { |
Damien George | adf0f2a | 2014-07-27 22:38:58 +0100 | [diff] [blame] | 460 | // On error, functions should return MP_STREAM_ERROR and fill in *errcode (values |
| 461 | // are implementation-dependent, but will be exposed to user, e.g. via exception). |
| 462 | mp_uint_t (*read)(mp_obj_t obj, void *buf, mp_uint_t size, int *errcode); |
| 463 | mp_uint_t (*write)(mp_obj_t obj, const void *buf, mp_uint_t size, int *errcode); |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 464 | mp_uint_t (*ioctl)(mp_obj_t obj, mp_uint_t request, uintptr_t arg, int *errcode); |
Damien George | 4d91723 | 2014-08-30 14:28:06 +0100 | [diff] [blame] | 465 | mp_uint_t is_text : 1; // default is bytes, set this for text stream |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 466 | } mp_stream_p_t; |
| 467 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 468 | struct _mp_obj_type_t { |
| 469 | mp_obj_base_t base; |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 470 | qstr name; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 471 | mp_print_fun_t print; |
Damien George | 71c5181 | 2014-01-04 20:21:15 +0000 | [diff] [blame] | 472 | mp_make_new_fun_t make_new; // to make an instance of the type |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 473 | |
Damien George | 20006db | 2014-01-18 14:10:48 +0000 | [diff] [blame] | 474 | mp_call_fun_t call; |
Damien George | 6ac5dce | 2014-05-21 19:42:43 +0100 | [diff] [blame] | 475 | mp_unary_op_fun_t unary_op; // can return MP_OBJ_NULL if op not supported |
| 476 | mp_binary_op_fun_t binary_op; // can return MP_OBJ_NULL if op not supported |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 477 | |
Damien George | b1bbe96 | 2015-04-01 14:10:50 +0000 | [diff] [blame] | 478 | // implements load, store and delete attribute |
| 479 | // |
| 480 | // dest[0] = MP_OBJ_NULL means load |
| 481 | // return: for fail, do nothing |
| 482 | // for attr, dest[0] = value |
| 483 | // for method, dest[0] = method, dest[1] = self |
| 484 | // |
| 485 | // dest[0,1] = {MP_OBJ_SENTINEL, MP_OBJ_NULL} means delete |
| 486 | // dest[0,1] = {MP_OBJ_SENTINEL, object} means store |
| 487 | // return: for fail, do nothing |
| 488 | // for success set dest[0] = MP_OBJ_NULL |
| 489 | mp_attr_fun_t attr; |
Damien George | f4c9b33 | 2014-04-08 21:32:29 +0100 | [diff] [blame] | 490 | |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 491 | mp_subscr_fun_t subscr; // implements load, store, delete subscripting |
| 492 | // value=MP_OBJ_NULL means delete, value=MP_OBJ_SENTINEL means load, else store |
Damien George | 6ac5dce | 2014-05-21 19:42:43 +0100 | [diff] [blame] | 493 | // can return MP_OBJ_NULL if op not supported |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 494 | |
Damien George | ae8d867 | 2016-01-09 23:14:54 +0000 | [diff] [blame] | 495 | // corresponds to __iter__ special method |
| 496 | // can use given mp_obj_iter_buf_t to store iterator |
| 497 | // otherwise can return a pointer to an object on the heap |
| 498 | mp_getiter_fun_t getiter; |
| 499 | |
Damien George | d0a5bf3 | 2014-05-10 13:55:11 +0100 | [diff] [blame] | 500 | mp_fun_1_t iternext; // may return MP_OBJ_STOP_ITERATION as an optimisation instead of raising StopIteration() (with no args) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 501 | |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 502 | mp_buffer_p_t buffer_p; |
Paul Sokolovsky | 07209f8 | 2016-06-18 18:19:24 +0300 | [diff] [blame] | 503 | // One of disjoint protocols (interfaces), like mp_stream_p_t, etc. |
| 504 | const void *protocol; |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 505 | |
Damien George | 004cdce | 2014-01-09 21:43:51 +0000 | [diff] [blame] | 506 | // these are for dynamically created types (classes) |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 507 | struct _mp_obj_tuple_t *bases_tuple; |
| 508 | struct _mp_obj_dict_t *locals_dict; |
Damien George | 062478e | 2014-01-09 20:57:50 +0000 | [diff] [blame] | 509 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 510 | /* |
| 511 | What we might need to add here: |
| 512 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 513 | len str tuple list map |
| 514 | abs float complex |
| 515 | hash bool int none str |
| 516 | equal int str |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 517 | |
| 518 | unpack seq list tuple |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 519 | */ |
| 520 | }; |
| 521 | |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 522 | // Constant types, globally accessible |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 523 | extern const mp_obj_type_t mp_type_type; |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 524 | extern const mp_obj_type_t mp_type_object; |
| 525 | extern const mp_obj_type_t mp_type_NoneType; |
| 526 | extern const mp_obj_type_t mp_type_bool; |
| 527 | extern const mp_obj_type_t mp_type_int; |
| 528 | extern const mp_obj_type_t mp_type_str; |
| 529 | extern const mp_obj_type_t mp_type_bytes; |
Paul Sokolovsky | 4dcb605 | 2014-04-08 22:09:14 +0300 | [diff] [blame] | 530 | extern const mp_obj_type_t mp_type_bytearray; |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 531 | extern const mp_obj_type_t mp_type_memoryview; |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 532 | extern const mp_obj_type_t mp_type_float; |
| 533 | extern const mp_obj_type_t mp_type_complex; |
| 534 | extern const mp_obj_type_t mp_type_tuple; |
| 535 | extern const mp_obj_type_t mp_type_list; |
| 536 | extern const mp_obj_type_t mp_type_map; // map (the python builtin, not the dict implementation detail) |
| 537 | extern const mp_obj_type_t mp_type_enumerate; |
| 538 | extern const mp_obj_type_t mp_type_filter; |
| 539 | extern const mp_obj_type_t mp_type_dict; |
Paul Sokolovsky | 0ef01d0 | 2015-03-18 01:25:04 +0200 | [diff] [blame] | 540 | extern const mp_obj_type_t mp_type_ordereddict; |
Damien George | 71d3112 | 2014-04-17 18:18:55 +0100 | [diff] [blame] | 541 | extern const mp_obj_type_t mp_type_range; |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 542 | extern const mp_obj_type_t mp_type_set; |
Paul Sokolovsky | b181b58 | 2014-05-10 16:02:17 +0300 | [diff] [blame] | 543 | extern const mp_obj_type_t mp_type_frozenset; |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 544 | extern const mp_obj_type_t mp_type_slice; |
| 545 | extern const mp_obj_type_t mp_type_zip; |
| 546 | extern const mp_obj_type_t mp_type_array; |
| 547 | extern const mp_obj_type_t mp_type_super; |
| 548 | extern const mp_obj_type_t mp_type_gen_instance; |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 549 | extern const mp_obj_type_t mp_type_fun_builtin_0; |
| 550 | extern const mp_obj_type_t mp_type_fun_builtin_1; |
| 551 | extern const mp_obj_type_t mp_type_fun_builtin_2; |
| 552 | extern const mp_obj_type_t mp_type_fun_builtin_3; |
| 553 | extern const mp_obj_type_t mp_type_fun_builtin_var; |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 554 | extern const mp_obj_type_t mp_type_fun_bc; |
| 555 | extern const mp_obj_type_t mp_type_module; |
| 556 | extern const mp_obj_type_t mp_type_staticmethod; |
| 557 | extern const mp_obj_type_t mp_type_classmethod; |
Damien George | 777b0f3 | 2014-04-13 18:59:45 +0100 | [diff] [blame] | 558 | extern const mp_obj_type_t mp_type_property; |
Paul Sokolovsky | cb9dc08 | 2014-04-26 20:26:14 +0300 | [diff] [blame] | 559 | extern const mp_obj_type_t mp_type_stringio; |
Paul Sokolovsky | a47b64a | 2014-05-15 07:28:19 +0300 | [diff] [blame] | 560 | extern const mp_obj_type_t mp_type_bytesio; |
Damien George | 4c03b3a | 2014-08-12 18:33:40 +0100 | [diff] [blame] | 561 | extern const mp_obj_type_t mp_type_reversed; |
Paul Sokolovsky | 1a1ccea | 2015-12-14 23:48:12 +0200 | [diff] [blame] | 562 | extern const mp_obj_type_t mp_type_polymorph_iter; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 563 | |
| 564 | // Exceptions |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 565 | extern const mp_obj_type_t mp_type_BaseException; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 566 | extern const mp_obj_type_t mp_type_ArithmeticError; |
| 567 | extern const mp_obj_type_t mp_type_AssertionError; |
| 568 | extern const mp_obj_type_t mp_type_AttributeError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 569 | extern const mp_obj_type_t mp_type_EOFError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 570 | extern const mp_obj_type_t mp_type_Exception; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 571 | extern const mp_obj_type_t mp_type_GeneratorExit; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 572 | extern const mp_obj_type_t mp_type_ImportError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 573 | extern const mp_obj_type_t mp_type_IndentationError; |
| 574 | extern const mp_obj_type_t mp_type_IndexError; |
Damien George | 124df6f | 2014-10-25 18:19:55 +0100 | [diff] [blame] | 575 | extern const mp_obj_type_t mp_type_KeyboardInterrupt; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 576 | extern const mp_obj_type_t mp_type_KeyError; |
| 577 | extern const mp_obj_type_t mp_type_LookupError; |
| 578 | extern const mp_obj_type_t mp_type_MemoryError; |
| 579 | extern const mp_obj_type_t mp_type_NameError; |
| 580 | extern const mp_obj_type_t mp_type_NotImplementedError; |
| 581 | extern const mp_obj_type_t mp_type_OSError; |
Daniel Campora | 077812b | 2015-06-29 22:45:39 +0200 | [diff] [blame] | 582 | extern const mp_obj_type_t mp_type_TimeoutError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 583 | extern const mp_obj_type_t mp_type_OverflowError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 584 | extern const mp_obj_type_t mp_type_RuntimeError; |
pohmelie | 81ebba7 | 2016-01-27 23:23:11 +0300 | [diff] [blame] | 585 | extern const mp_obj_type_t mp_type_StopAsyncIteration; |
Damien George | ffb5cfc | 2014-03-25 14:29:40 +0000 | [diff] [blame] | 586 | extern const mp_obj_type_t mp_type_StopIteration; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 587 | extern const mp_obj_type_t mp_type_SyntaxError; |
Damien George | 7a4ddd2 | 2014-05-24 23:32:19 +0100 | [diff] [blame] | 588 | extern const mp_obj_type_t mp_type_SystemExit; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 589 | extern const mp_obj_type_t mp_type_TypeError; |
Paul Sokolovsky | 71ebd4b | 2015-02-23 23:18:36 +0200 | [diff] [blame] | 590 | extern const mp_obj_type_t mp_type_UnicodeError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 591 | extern const mp_obj_type_t mp_type_ValueError; |
Damien George | c8b60f0 | 2015-04-20 13:29:31 +0000 | [diff] [blame] | 592 | extern const mp_obj_type_t mp_type_ViperTypeError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 593 | extern const mp_obj_type_t mp_type_ZeroDivisionError; |
| 594 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 595 | // Constant objects, globally accessible |
Damien George | 07ddab5 | 2014-03-29 13:15:08 +0000 | [diff] [blame] | 596 | // The macros are for convenience only |
Damien George | 999cedb | 2015-11-27 17:01:44 +0000 | [diff] [blame] | 597 | #define mp_const_none (MP_OBJ_FROM_PTR(&mp_const_none_obj)) |
| 598 | #define mp_const_false (MP_OBJ_FROM_PTR(&mp_const_false_obj)) |
| 599 | #define mp_const_true (MP_OBJ_FROM_PTR(&mp_const_true_obj)) |
| 600 | #define mp_const_empty_bytes (MP_OBJ_FROM_PTR(&mp_const_empty_bytes_obj)) |
| 601 | #define mp_const_empty_tuple (MP_OBJ_FROM_PTR(&mp_const_empty_tuple_obj)) |
Damien George | 07ddab5 | 2014-03-29 13:15:08 +0000 | [diff] [blame] | 602 | extern const struct _mp_obj_none_t mp_const_none_obj; |
| 603 | extern const struct _mp_obj_bool_t mp_const_false_obj; |
| 604 | extern const struct _mp_obj_bool_t mp_const_true_obj; |
Damien George | 20f59e1 | 2014-10-11 17:56:43 +0100 | [diff] [blame] | 605 | extern const struct _mp_obj_str_t mp_const_empty_bytes_obj; |
Damien George | 07ddab5 | 2014-03-29 13:15:08 +0000 | [diff] [blame] | 606 | extern const struct _mp_obj_tuple_t mp_const_empty_tuple_obj; |
Paul Sokolovsky | 7667727 | 2015-05-05 22:18:07 +0300 | [diff] [blame] | 607 | extern const struct _mp_obj_singleton_t mp_const_ellipsis_obj; |
| 608 | extern const struct _mp_obj_singleton_t mp_const_notimplemented_obj; |
Damien George | 6902eed | 2014-04-04 10:52:59 +0000 | [diff] [blame] | 609 | extern const struct _mp_obj_exception_t mp_const_MemoryError_obj; |
Damien George | 07ddab5 | 2014-03-29 13:15:08 +0000 | [diff] [blame] | 610 | extern const struct _mp_obj_exception_t mp_const_GeneratorExit_obj; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 611 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 612 | // General API for objects |
| 613 | |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 614 | mp_obj_t mp_obj_new_type(qstr name, mp_obj_t bases_tuple, mp_obj_t locals_dict); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 615 | mp_obj_t mp_obj_new_none(void); |
Paul Sokolovsky | 1b586f3 | 2015-10-11 12:09:43 +0300 | [diff] [blame] | 616 | static inline mp_obj_t mp_obj_new_bool(mp_int_t x) { return x ? mp_const_true : mp_const_false; } |
Damien George | 6baf76e | 2013-12-30 22:32:17 +0000 | [diff] [blame] | 617 | mp_obj_t mp_obj_new_cell(mp_obj_t obj); |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 618 | mp_obj_t mp_obj_new_int(mp_int_t value); |
| 619 | mp_obj_t mp_obj_new_int_from_uint(mp_uint_t value); |
Damien George | da36f52 | 2017-02-16 16:41:43 +1100 | [diff] [blame] | 620 | mp_obj_t mp_obj_new_int_from_str_len(const char **str, size_t len, bool neg, unsigned int base); |
Damien George | 9d68e9c | 2014-03-12 15:38:15 +0000 | [diff] [blame] | 621 | mp_obj_t mp_obj_new_int_from_ll(long long val); // this must return a multi-precision integer object (or raise an overflow exception) |
Damien George | 9530743 | 2014-09-10 22:10:33 +0100 | [diff] [blame] | 622 | mp_obj_t mp_obj_new_int_from_ull(unsigned long long val); // this must return a multi-precision integer object (or raise an overflow exception) |
Damien George | c0d9500 | 2017-02-16 16:26:48 +1100 | [diff] [blame] | 623 | mp_obj_t mp_obj_new_str(const char* data, size_t len, bool make_qstr_if_not_already); |
Damien George | 0b9ee86 | 2015-01-21 19:14:25 +0000 | [diff] [blame] | 624 | mp_obj_t mp_obj_new_str_from_vstr(const mp_obj_type_t *type, vstr_t *vstr); |
Damien George | c0d9500 | 2017-02-16 16:26:48 +1100 | [diff] [blame] | 625 | mp_obj_t mp_obj_new_bytes(const byte* data, size_t len); |
Damien George | ccc5254 | 2017-02-16 16:31:43 +1100 | [diff] [blame] | 626 | mp_obj_t mp_obj_new_bytearray(size_t n, void *items); |
| 627 | mp_obj_t mp_obj_new_bytearray_by_ref(size_t n, void *items); |
Damien George | fb510b3 | 2014-06-01 13:32:54 +0100 | [diff] [blame] | 628 | #if MICROPY_PY_BUILTINS_FLOAT |
Paul Sokolovsky | 5f68094 | 2014-12-30 00:34:54 +0200 | [diff] [blame] | 629 | mp_obj_t mp_obj_new_int_from_float(mp_float_t val); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 630 | mp_obj_t mp_obj_new_complex(mp_float_t real, mp_float_t imag); |
| 631 | #endif |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 632 | mp_obj_t mp_obj_new_exception(const mp_obj_type_t *exc_type); |
Paul Sokolovsky | dec31bb | 2014-04-22 00:01:13 +0300 | [diff] [blame] | 633 | mp_obj_t mp_obj_new_exception_arg1(const mp_obj_type_t *exc_type, mp_obj_t arg); |
Damien George | fa5a591 | 2017-02-16 16:38:14 +1100 | [diff] [blame] | 634 | mp_obj_t mp_obj_new_exception_args(const mp_obj_type_t *exc_type, size_t n_args, const mp_obj_t *args); |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 635 | mp_obj_t mp_obj_new_exception_msg(const mp_obj_type_t *exc_type, const char *msg); |
| 636 | mp_obj_t mp_obj_new_exception_msg_varg(const mp_obj_type_t *exc_type, const char *fmt, ...); // counts args by number of % symbols in fmt, excluding %%; can only handle void* sizes (ie no float/double!) |
Damien George | 713ea18 | 2015-10-23 01:23:11 +0100 | [diff] [blame] | 637 | mp_obj_t mp_obj_new_fun_bc(mp_obj_t def_args, mp_obj_t def_kw_args, const byte *code, const mp_uint_t *const_table); |
| 638 | mp_obj_t mp_obj_new_fun_native(mp_obj_t def_args_in, mp_obj_t def_kw_args, const void *fun_data, const mp_uint_t *const_table); |
Damien George | dbcdb9f | 2017-02-16 16:34:53 +1100 | [diff] [blame] | 639 | mp_obj_t mp_obj_new_fun_viper(size_t n_args, void *fun_data, mp_uint_t type_sig); |
| 640 | mp_obj_t mp_obj_new_fun_asm(size_t n_args, void *fun_data, mp_uint_t type_sig); |
Damien George | d0691cc | 2014-01-29 20:30:52 +0000 | [diff] [blame] | 641 | mp_obj_t mp_obj_new_gen_wrap(mp_obj_t fun); |
Damien George | efa6290 | 2017-02-16 16:36:04 +1100 | [diff] [blame] | 642 | mp_obj_t mp_obj_new_closure(mp_obj_t fun, size_t n_closed, const mp_obj_t *closed); |
Damien George | 2298239 | 2017-02-16 16:09:51 +1100 | [diff] [blame] | 643 | mp_obj_t mp_obj_new_tuple(size_t n, const mp_obj_t *items); |
Damien George | 58d9eeb | 2017-02-16 16:12:41 +1100 | [diff] [blame] | 644 | mp_obj_t mp_obj_new_list(size_t n, mp_obj_t *items); |
Damien George | 1ea2f7a | 2017-02-16 16:15:04 +1100 | [diff] [blame] | 645 | mp_obj_t mp_obj_new_dict(size_t n_args); |
Damien George | 68cd3a9 | 2017-02-16 16:16:33 +1100 | [diff] [blame] | 646 | mp_obj_t mp_obj_new_set(size_t n_args, mp_obj_t *items); |
Paul Sokolovsky | 1c6de11 | 2014-01-03 02:41:17 +0200 | [diff] [blame] | 647 | mp_obj_t mp_obj_new_slice(mp_obj_t start, mp_obj_t stop, mp_obj_t step); |
Damien George | 35e2a4e | 2014-02-05 00:51:47 +0000 | [diff] [blame] | 648 | mp_obj_t mp_obj_new_super(mp_obj_t type, mp_obj_t obj); |
Damien George | 20006db | 2014-01-18 14:10:48 +0000 | [diff] [blame] | 649 | mp_obj_t mp_obj_new_bound_meth(mp_obj_t meth, mp_obj_t self); |
Damien George | ae8d867 | 2016-01-09 23:14:54 +0000 | [diff] [blame] | 650 | mp_obj_t mp_obj_new_getitem_iter(mp_obj_t *args, mp_obj_iter_buf_t *iter_buf); |
Damien George | 2870862 | 2014-01-02 21:30:26 +0000 | [diff] [blame] | 651 | mp_obj_t mp_obj_new_module(qstr module_name); |
Damien George | ccc5254 | 2017-02-16 16:31:43 +1100 | [diff] [blame] | 652 | mp_obj_t mp_obj_new_memoryview(byte typecode, size_t nitems, void *items); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 653 | |
Paul Sokolovsky | 7aca1ca | 2014-05-11 02:26:42 +0300 | [diff] [blame] | 654 | mp_obj_type_t *mp_obj_get_type(mp_const_obj_t o_in); |
| 655 | const char *mp_obj_get_type_str(mp_const_obj_t o_in); |
Damien George | 9e6e935 | 2014-03-26 18:37:06 +0000 | [diff] [blame] | 656 | bool mp_obj_is_subclass_fast(mp_const_obj_t object, mp_const_obj_t classinfo); // arguments should be type objects |
Paul Sokolovsky | ea97080 | 2014-05-11 03:16:04 +0300 | [diff] [blame] | 657 | mp_obj_t mp_instance_cast_to_native_base(mp_const_obj_t self_in, mp_const_obj_t native_type); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 658 | |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 659 | void mp_obj_print_helper(const mp_print_t *print, mp_obj_t o_in, mp_print_kind_t kind); |
Paul Sokolovsky | 76d982e | 2014-01-13 19:19:16 +0200 | [diff] [blame] | 660 | void mp_obj_print(mp_obj_t o, mp_print_kind_t kind); |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 661 | void mp_obj_print_exception(const mp_print_t *print, mp_obj_t exc); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 662 | |
Damien George | 4d91723 | 2014-08-30 14:28:06 +0100 | [diff] [blame] | 663 | bool mp_obj_is_true(mp_obj_t arg); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 664 | bool mp_obj_is_callable(mp_obj_t o_in); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 665 | bool mp_obj_equal(mp_obj_t o1, mp_obj_t o2); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 666 | |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 667 | mp_int_t mp_obj_get_int(mp_const_obj_t arg); |
Damien George | c50772d | 2015-05-12 23:05:53 +0100 | [diff] [blame] | 668 | mp_int_t mp_obj_get_int_truncated(mp_const_obj_t arg); |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 669 | bool mp_obj_get_int_maybe(mp_const_obj_t arg, mp_int_t *value); |
Damien George | fb510b3 | 2014-06-01 13:32:54 +0100 | [diff] [blame] | 670 | #if MICROPY_PY_BUILTINS_FLOAT |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 671 | mp_float_t mp_obj_get_float(mp_obj_t self_in); |
| 672 | void mp_obj_get_complex(mp_obj_t self_in, mp_float_t *real, mp_float_t *imag); |
| 673 | #endif |
Damien George | 5fa93b6 | 2014-01-22 14:35:10 +0000 | [diff] [blame] | 674 | //qstr mp_obj_get_qstr(mp_obj_t arg); |
Damien George | eb54e4d | 2016-05-04 10:19:08 +0100 | [diff] [blame] | 675 | void mp_obj_get_array(mp_obj_t o, mp_uint_t *len, mp_obj_t **items); // *items may point inside a GC block |
| 676 | void mp_obj_get_array_fixed_n(mp_obj_t o, mp_uint_t len, mp_obj_t **items); // *items may point inside a GC block |
Damien George | 9c4cbe2 | 2014-08-30 14:04:14 +0100 | [diff] [blame] | 677 | mp_uint_t mp_get_index(const mp_obj_type_t *type, mp_uint_t len, mp_obj_t index, bool is_slice); |
Damien George | c7687ad | 2014-08-22 21:48:30 +0100 | [diff] [blame] | 678 | mp_obj_t mp_obj_id(mp_obj_t o_in); |
Damien George | 4c03b3a | 2014-08-12 18:33:40 +0100 | [diff] [blame] | 679 | mp_obj_t mp_obj_len(mp_obj_t o_in); |
Damien George | 2801e6f | 2015-04-04 15:53:11 +0100 | [diff] [blame] | 680 | mp_obj_t mp_obj_len_maybe(mp_obj_t o_in); // may return MP_OBJ_NULL |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 681 | mp_obj_t mp_obj_subscr(mp_obj_t base, mp_obj_t index, mp_obj_t val); |
Damien George | c2a4e4e | 2015-05-11 12:25:19 +0000 | [diff] [blame] | 682 | mp_obj_t mp_generic_unary_op(mp_uint_t op, mp_obj_t o_in); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 683 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 684 | // cell |
| 685 | mp_obj_t mp_obj_cell_get(mp_obj_t self_in); |
| 686 | void mp_obj_cell_set(mp_obj_t self_in, mp_obj_t obj); |
| 687 | |
Damien George | 71c5181 | 2014-01-04 20:21:15 +0000 | [diff] [blame] | 688 | // int |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 689 | // For long int, returns value truncated to mp_int_t |
Damien George | be6d8be | 2014-12-05 23:13:52 +0000 | [diff] [blame] | 690 | mp_int_t mp_obj_int_get_truncated(mp_const_obj_t self_in); |
| 691 | // Will raise exception if value doesn't fit into mp_int_t |
| 692 | mp_int_t mp_obj_int_get_checked(mp_const_obj_t self_in); |
Damien George | 71c5181 | 2014-01-04 20:21:15 +0000 | [diff] [blame] | 693 | |
Damien | b86e3f9 | 2013-12-29 17:17:43 +0000 | [diff] [blame] | 694 | // exception |
Paul Sokolovsky | d8351ca | 2014-05-02 01:51:25 +0300 | [diff] [blame] | 695 | #define mp_obj_is_native_exception_instance(o) (mp_obj_get_type(o)->make_new == mp_obj_exception_make_new) |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 696 | bool mp_obj_is_exception_type(mp_obj_t self_in); |
| 697 | bool mp_obj_is_exception_instance(mp_obj_t self_in); |
Damien George | 4bcd04b | 2014-09-24 14:05:40 +0100 | [diff] [blame] | 698 | bool mp_obj_exception_match(mp_obj_t exc, mp_const_obj_t exc_type); |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 699 | void mp_obj_exception_clear_traceback(mp_obj_t self_in); |
Damien George | 3d2daa2 | 2016-01-02 22:04:12 +0000 | [diff] [blame] | 700 | void mp_obj_exception_add_traceback(mp_obj_t self_in, qstr file, size_t line, qstr block); |
| 701 | void mp_obj_exception_get_traceback(mp_obj_t self_in, size_t *n, size_t **values); |
Paul Sokolovsky | af1ae30 | 2014-03-26 19:17:20 +0200 | [diff] [blame] | 702 | mp_obj_t mp_obj_exception_get_value(mp_obj_t self_in); |
Damien George | 5b3f0b7 | 2016-01-03 15:55:55 +0000 | [diff] [blame] | 703 | mp_obj_t mp_obj_exception_make_new(const mp_obj_type_t *type_in, size_t n_args, size_t n_kw, const mp_obj_t *args); |
Dave Hylands | 5b7fd20 | 2014-07-01 23:46:53 -0700 | [diff] [blame] | 704 | mp_obj_t mp_alloc_emergency_exception_buf(mp_obj_t size_in); |
| 705 | void mp_init_emergency_exception_buf(void); |
Damien | b86e3f9 | 2013-12-29 17:17:43 +0000 | [diff] [blame] | 706 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 707 | // str |
Damien George | 5fa93b6 | 2014-01-22 14:35:10 +0000 | [diff] [blame] | 708 | bool mp_obj_str_equal(mp_obj_t s1, mp_obj_t s2); |
Damien George | b829b5c | 2014-01-25 13:51:19 +0000 | [diff] [blame] | 709 | qstr mp_obj_str_get_qstr(mp_obj_t self_in); // use this if you will anyway convert the string to a qstr |
Damien George | 5fa93b6 | 2014-01-22 14:35:10 +0000 | [diff] [blame] | 710 | const char *mp_obj_str_get_str(mp_obj_t self_in); // use this only if you need the string to be null terminated |
Damien George | d182b98 | 2014-08-30 14:19:41 +0100 | [diff] [blame] | 711 | const char *mp_obj_str_get_data(mp_obj_t self_in, mp_uint_t *len); |
Paul Sokolovsky | b4efac1 | 2014-06-08 01:13:35 +0300 | [diff] [blame] | 712 | mp_obj_t mp_obj_str_intern(mp_obj_t str); |
Damien George | c0d9500 | 2017-02-16 16:26:48 +1100 | [diff] [blame] | 713 | void mp_str_print_quoted(const mp_print_t *print, const byte *str_data, size_t str_len, bool is_bytes); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 714 | |
Damien George | fb510b3 | 2014-06-01 13:32:54 +0100 | [diff] [blame] | 715 | #if MICROPY_PY_BUILTINS_FLOAT |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 716 | // float |
Damien George | ecc88e9 | 2014-08-30 00:35:11 +0100 | [diff] [blame] | 717 | mp_obj_t mp_obj_float_binary_op(mp_uint_t op, mp_float_t lhs_val, mp_obj_t rhs); // can return MP_OBJ_NULL if op not supported |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 718 | |
| 719 | // complex |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 720 | void mp_obj_complex_get(mp_obj_t self_in, mp_float_t *real, mp_float_t *imag); |
Damien George | ecc88e9 | 2014-08-30 00:35:11 +0100 | [diff] [blame] | 721 | mp_obj_t mp_obj_complex_binary_op(mp_uint_t op, mp_float_t lhs_real, mp_float_t lhs_imag, mp_obj_t rhs_in); // can return MP_OBJ_NULL if op not supported |
Paul Sokolovsky | dc3eb55 | 2016-02-14 19:12:57 +0200 | [diff] [blame] | 722 | #else |
| 723 | #define mp_obj_is_float(o) (false) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 724 | #endif |
| 725 | |
| 726 | // tuple |
Damien George | 9c4cbe2 | 2014-08-30 14:04:14 +0100 | [diff] [blame] | 727 | void mp_obj_tuple_get(mp_obj_t self_in, mp_uint_t *len, mp_obj_t **items); |
John R. Lenton | 07205ec | 2014-01-13 02:31:00 +0000 | [diff] [blame] | 728 | void mp_obj_tuple_del(mp_obj_t self_in); |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 729 | mp_int_t mp_obj_tuple_hash(mp_obj_t self_in); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 730 | |
| 731 | // list |
Paul Sokolovsky | 18bef25 | 2014-04-13 06:17:29 +0300 | [diff] [blame] | 732 | struct _mp_obj_list_t; |
Damien George | 58d9eeb | 2017-02-16 16:12:41 +1100 | [diff] [blame] | 733 | void mp_obj_list_init(struct _mp_obj_list_t *o, size_t n); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 734 | mp_obj_t mp_obj_list_append(mp_obj_t self_in, mp_obj_t arg); |
Damien George | eff359e | 2015-02-21 14:47:02 +0000 | [diff] [blame] | 735 | mp_obj_t mp_obj_list_remove(mp_obj_t self_in, mp_obj_t value); |
Damien George | 9c4cbe2 | 2014-08-30 14:04:14 +0100 | [diff] [blame] | 736 | void mp_obj_list_get(mp_obj_t self_in, mp_uint_t *len, mp_obj_t **items); |
Damien George | 58d9eeb | 2017-02-16 16:12:41 +1100 | [diff] [blame] | 737 | void mp_obj_list_set_len(mp_obj_t self_in, size_t len); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 738 | void mp_obj_list_store(mp_obj_t self_in, mp_obj_t index, mp_obj_t value); |
Damien George | 4b72b3a | 2016-01-03 14:21:40 +0000 | [diff] [blame] | 739 | mp_obj_t mp_obj_list_sort(size_t n_args, const mp_obj_t *args, mp_map_t *kwargs); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 740 | |
| 741 | // dict |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 742 | typedef struct _mp_obj_dict_t { |
| 743 | mp_obj_base_t base; |
| 744 | mp_map_t map; |
| 745 | } mp_obj_dict_t; |
Damien George | 1ea2f7a | 2017-02-16 16:15:04 +1100 | [diff] [blame] | 746 | void mp_obj_dict_init(mp_obj_dict_t *dict, size_t n_args); |
| 747 | size_t mp_obj_dict_len(mp_obj_t self_in); |
Paul Sokolovsky | 75ce925 | 2014-06-05 20:02:15 +0300 | [diff] [blame] | 748 | mp_obj_t mp_obj_dict_get(mp_obj_t self_in, mp_obj_t index); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 749 | mp_obj_t mp_obj_dict_store(mp_obj_t self_in, mp_obj_t key, mp_obj_t value); |
Damien George | 66edc5d | 2014-04-05 13:25:13 +0100 | [diff] [blame] | 750 | mp_obj_t mp_obj_dict_delete(mp_obj_t self_in, mp_obj_t key); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 751 | mp_map_t *mp_obj_dict_get_map(mp_obj_t self_in); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 752 | |
| 753 | // set |
| 754 | void mp_obj_set_store(mp_obj_t self_in, mp_obj_t item); |
| 755 | |
Paul Sokolovsky | 1c6de11 | 2014-01-03 02:41:17 +0200 | [diff] [blame] | 756 | // slice |
Paul Sokolovsky | afaaf53 | 2014-05-25 01:39:27 +0300 | [diff] [blame] | 757 | void mp_obj_slice_get(mp_obj_t self_in, mp_obj_t *start, mp_obj_t *stop, mp_obj_t *step); |
Paul Sokolovsky | 1c6de11 | 2014-01-03 02:41:17 +0200 | [diff] [blame] | 758 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 759 | // functions |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 760 | |
| 761 | typedef struct _mp_obj_fun_builtin_fixed_t { |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 762 | mp_obj_base_t base; |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 763 | union { |
| 764 | mp_fun_0_t _0; |
| 765 | mp_fun_1_t _1; |
| 766 | mp_fun_2_t _2; |
| 767 | mp_fun_3_t _3; |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 768 | } fun; |
| 769 | } mp_obj_fun_builtin_fixed_t; |
| 770 | |
| 771 | #define MP_OBJ_FUN_ARGS_MAX (0xffff) // to set maximum value in n_args_max below |
| 772 | typedef struct _mp_obj_fun_builtin_var_t { |
| 773 | mp_obj_base_t base; |
| 774 | bool is_kw : 1; |
| 775 | mp_uint_t n_args_min : 15; // inclusive |
| 776 | mp_uint_t n_args_max : 16; // inclusive |
| 777 | union { |
Damien George | 1b0aab6 | 2016-01-03 11:53:44 +0000 | [diff] [blame] | 778 | mp_fun_var_t var; |
| 779 | mp_fun_kw_t kw; |
| 780 | } fun; |
Damien George | 571e6f2 | 2016-10-18 11:49:27 +1100 | [diff] [blame] | 781 | } mp_obj_fun_builtin_var_t; |
Damien George | 97209d3 | 2014-01-07 15:58:30 +0000 | [diff] [blame] | 782 | |
stijn | 3cc17c6 | 2015-02-14 18:44:31 +0100 | [diff] [blame] | 783 | qstr mp_obj_fun_get_name(mp_const_obj_t fun); |
| 784 | qstr mp_obj_code_get_name(const byte *code_info); |
Damien | 660365e | 2013-12-17 18:27:24 +0000 | [diff] [blame] | 785 | |
Paul Sokolovsky | dff3f89 | 2014-01-20 18:37:30 +0200 | [diff] [blame] | 786 | mp_obj_t mp_identity(mp_obj_t self); |
Damien George | 4ebdb1f | 2016-10-18 11:06:20 +1100 | [diff] [blame] | 787 | MP_DECLARE_CONST_FUN_OBJ_1(mp_identity_obj); |
Damien George | ae8d867 | 2016-01-09 23:14:54 +0000 | [diff] [blame] | 788 | mp_obj_t mp_identity_getiter(mp_obj_t self, mp_obj_iter_buf_t *iter_buf); |
Paul Sokolovsky | dff3f89 | 2014-01-20 18:37:30 +0200 | [diff] [blame] | 789 | |
Damien George | 2870862 | 2014-01-02 21:30:26 +0000 | [diff] [blame] | 790 | // module |
Damien George | 0c36da0 | 2014-03-08 15:24:39 +0000 | [diff] [blame] | 791 | typedef struct _mp_obj_module_t { |
| 792 | mp_obj_base_t base; |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 793 | mp_obj_dict_t *globals; |
Damien George | 0c36da0 | 2014-03-08 15:24:39 +0000 | [diff] [blame] | 794 | } mp_obj_module_t; |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 795 | mp_obj_dict_t *mp_obj_module_get_globals(mp_obj_t self_in); |
Paul Sokolovsky | e5a3759 | 2014-10-25 21:04:13 +0300 | [diff] [blame] | 796 | // check if given module object is a package |
| 797 | bool mp_obj_is_package(mp_obj_t module); |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 798 | |
| 799 | // staticmethod and classmethod types; defined here so we can make const versions |
Damien George | 64131f3 | 2014-02-06 20:31:44 +0000 | [diff] [blame] | 800 | // this structure is used for instances of both staticmethod and classmethod |
| 801 | typedef struct _mp_obj_static_class_method_t { |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 802 | mp_obj_base_t base; |
| 803 | mp_obj_t fun; |
Damien George | 64131f3 | 2014-02-06 20:31:44 +0000 | [diff] [blame] | 804 | } mp_obj_static_class_method_t; |
Damien George | cbf7674 | 2015-11-27 13:38:15 +0000 | [diff] [blame] | 805 | typedef struct _mp_rom_obj_static_class_method_t { |
| 806 | mp_obj_base_t base; |
| 807 | mp_rom_obj_t fun; |
| 808 | } mp_rom_obj_static_class_method_t; |
Paul Sokolovsky | 439542f | 2014-01-21 00:19:19 +0200 | [diff] [blame] | 809 | |
Damien George | 777b0f3 | 2014-04-13 18:59:45 +0100 | [diff] [blame] | 810 | // property |
| 811 | const mp_obj_t *mp_obj_property_get(mp_obj_t self_in); |
| 812 | |
Paul Sokolovsky | 439542f | 2014-01-21 00:19:19 +0200 | [diff] [blame] | 813 | // sequence helpers |
Paul Sokolovsky | de4b932 | 2014-05-25 21:21:57 +0300 | [diff] [blame] | 814 | |
| 815 | // slice indexes resolved to particular sequence |
| 816 | typedef struct { |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 817 | mp_uint_t start; |
| 818 | mp_uint_t stop; |
| 819 | mp_int_t step; |
Paul Sokolovsky | de4b932 | 2014-05-25 21:21:57 +0300 | [diff] [blame] | 820 | } mp_bound_slice_t; |
| 821 | |
Damien George | d182b98 | 2014-08-30 14:19:41 +0100 | [diff] [blame] | 822 | void mp_seq_multiply(const void *items, mp_uint_t item_sz, mp_uint_t len, mp_uint_t times, void *dest); |
Damien George | c49ddb9 | 2014-06-01 13:49:35 +0100 | [diff] [blame] | 823 | #if MICROPY_PY_BUILTINS_SLICE |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 824 | bool mp_seq_get_fast_slice_indexes(mp_uint_t len, mp_obj_t slice, mp_bound_slice_t *indexes); |
Damien George | c49ddb9 | 2014-06-01 13:49:35 +0100 | [diff] [blame] | 825 | #endif |
Paul Sokolovsky | d915a52 | 2014-05-10 21:36:33 +0300 | [diff] [blame] | 826 | #define mp_seq_copy(dest, src, len, item_t) memcpy(dest, src, len * sizeof(item_t)) |
| 827 | #define mp_seq_cat(dest, src1, len1, src2, len2, item_t) { memcpy(dest, src1, (len1) * sizeof(item_t)); memcpy(dest + (len1), src2, (len2) * sizeof(item_t)); } |
Damien George | 4d91723 | 2014-08-30 14:28:06 +0100 | [diff] [blame] | 828 | bool mp_seq_cmp_bytes(mp_uint_t op, const byte *data1, mp_uint_t len1, const byte *data2, mp_uint_t len2); |
| 829 | bool mp_seq_cmp_objs(mp_uint_t op, const mp_obj_t *items1, mp_uint_t len1, const mp_obj_t *items2, mp_uint_t len2); |
Damien George | d182b98 | 2014-08-30 14:19:41 +0100 | [diff] [blame] | 830 | mp_obj_t mp_seq_index_obj(const mp_obj_t *items, mp_uint_t len, mp_uint_t n_args, const mp_obj_t *args); |
| 831 | mp_obj_t mp_seq_count_obj(const mp_obj_t *items, mp_uint_t len, mp_obj_t value); |
| 832 | mp_obj_t mp_seq_extract_slice(mp_uint_t len, const mp_obj_t *seq, mp_bound_slice_t *indexes); |
Paul Sokolovsky | a224067 | 2014-04-28 00:16:57 +0300 | [diff] [blame] | 833 | // Helper to clear stale pointers from allocated, but unused memory, to preclude GC problems |
| 834 | #define mp_seq_clear(start, len, alloc_len, item_sz) memset((byte*)(start) + (len) * (item_sz), 0, ((alloc_len) - (len)) * (item_sz)) |
Paul Sokolovsky | cefcbb2 | 2015-02-27 22:16:05 +0200 | [diff] [blame] | 835 | #define mp_seq_replace_slice_no_grow(dest, dest_len, beg, end, slice, slice_len, item_sz) \ |
| 836 | /*printf("memcpy(%p, %p, %d)\n", dest + beg, slice, slice_len * (item_sz));*/ \ |
| 837 | memcpy(((char*)dest) + (beg) * (item_sz), slice, slice_len * (item_sz)); \ |
| 838 | /*printf("memmove(%p, %p, %d)\n", dest + (beg + slice_len), dest + end, (dest_len - end) * (item_sz));*/ \ |
| 839 | memmove(((char*)dest) + (beg + slice_len) * (item_sz), ((char*)dest) + (end) * (item_sz), (dest_len - end) * (item_sz)); |
Paul Sokolovsky | 2705f4c | 2014-05-25 02:36:12 +0300 | [diff] [blame] | 840 | |
Paul Sokolovsky | cefcbb2 | 2015-02-27 22:16:05 +0200 | [diff] [blame] | 841 | #define mp_seq_replace_slice_grow_inplace(dest, dest_len, beg, end, slice, slice_len, len_adj, item_sz) \ |
| 842 | /*printf("memmove(%p, %p, %d)\n", dest + beg + len_adj, dest + beg, (dest_len - beg) * (item_sz));*/ \ |
| 843 | memmove(((char*)dest) + (beg + len_adj) * (item_sz), ((char*)dest) + (beg) * (item_sz), (dest_len - beg) * (item_sz)); \ |
| 844 | memcpy(((char*)dest) + (beg) * (item_sz), slice, slice_len * (item_sz)); |
Damien George | 9ddbe29 | 2014-12-29 01:02:19 +0000 | [diff] [blame] | 845 | |
| 846 | #endif // __MICROPY_INCLUDED_PY_OBJ_H__ |