2014-01-20 22:19:19 +00:00
|
|
|
#include <stdlib.h>
|
|
|
|
|
#include <stdint.h>
|
|
|
|
|
#include <string.h>
|
|
|
|
|
#include <assert.h>
|
|
|
|
|
|
|
|
|
|
#include "nlr.h"
|
|
|
|
|
#include "misc.h"
|
|
|
|
|
#include "mpconfig.h"
|
2014-01-21 21:54:15 +00:00
|
|
|
#include "qstr.h"
|
2014-01-20 22:19:19 +00:00
|
|
|
#include "obj.h"
|
|
|
|
|
#include "map.h"
|
|
|
|
|
#include "runtime0.h"
|
|
|
|
|
#include "runtime.h"
|
|
|
|
|
|
|
|
|
|
// Helpers for sequence types
|
|
|
|
|
|
|
|
|
|
// Implements backend of sequence * integer operation. Assumes elements are
|
|
|
|
|
// memory-adjacent in sequence.
|
|
|
|
|
void mp_seq_multiply(const void *items, uint item_sz, uint len, uint times, void *dest) {
|
|
|
|
|
for (int i = 0; i < times; i++) {
|
|
|
|
|
uint copy_sz = item_sz * len;
|
|
|
|
|
memcpy(dest, items, copy_sz);
|
|
|
|
|
dest = (char*)dest + copy_sz;
|
|
|
|
|
}
|
|
|
|
|
}
|
