58e0f4ac50
With this patch parse nodes are allocated sequentially in chunks. This reduces fragmentation of the heap and prevents waste at the end of individually allocated parse nodes. Saves roughly 20% of RAM during parse stage.
103 lines
3.0 KiB
C
103 lines
3.0 KiB
C
#include <stdint.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "py/nlr.h"
|
|
#include "py/compile.h"
|
|
#include "py/runtime.h"
|
|
#include "py/repl.h"
|
|
|
|
void do_str(const char *src, mp_parse_input_kind_t input_kind) {
|
|
mp_lexer_t *lex = mp_lexer_new_from_str_len(MP_QSTR__lt_stdin_gt_, src, strlen(src), 0);
|
|
if (lex == NULL) {
|
|
return;
|
|
}
|
|
|
|
nlr_buf_t nlr;
|
|
if (nlr_push(&nlr) == 0) {
|
|
qstr source_name = lex->source_name;
|
|
mp_parse_tree_t parse_tree = mp_parse(lex, input_kind);
|
|
mp_obj_t module_fun = mp_compile(&parse_tree, source_name, MP_EMIT_OPT_NONE, true);
|
|
mp_call_function_0(module_fun);
|
|
nlr_pop();
|
|
} else {
|
|
// uncaught exception
|
|
mp_obj_print_exception(&mp_plat_print, (mp_obj_t)nlr.ret_val);
|
|
}
|
|
}
|
|
|
|
int main(int argc, char **argv) {
|
|
mp_init();
|
|
do_str("print('hello world!', list(x+1 for x in range(10)), end='eol\\n')", MP_PARSE_SINGLE_INPUT);
|
|
do_str("for i in range(10):\n print(i)", MP_PARSE_FILE_INPUT);
|
|
mp_deinit();
|
|
return 0;
|
|
}
|
|
|
|
void gc_collect(void) {
|
|
}
|
|
|
|
mp_lexer_t *mp_lexer_new_from_file(const char *filename) {
|
|
return NULL;
|
|
}
|
|
|
|
mp_import_stat_t mp_import_stat(const char *path) {
|
|
return MP_IMPORT_STAT_NO_EXIST;
|
|
}
|
|
|
|
mp_obj_t mp_builtin_open(uint n_args, const mp_obj_t *args, mp_map_t *kwargs) {
|
|
return mp_const_none;
|
|
}
|
|
MP_DEFINE_CONST_FUN_OBJ_KW(mp_builtin_open_obj, 1, mp_builtin_open);
|
|
|
|
void nlr_jump_fail(void *val) {
|
|
}
|
|
|
|
void NORETURN __fatal_error(const char *msg) {
|
|
while (1);
|
|
}
|
|
|
|
#ifndef NDEBUG
|
|
void MP_WEAK __assert_func(const char *file, int line, const char *func, const char *expr) {
|
|
printf("Assertion '%s' failed, at file %s:%d\n", expr, file, line);
|
|
__fatal_error("Assertion failed");
|
|
}
|
|
#endif
|
|
|
|
/*
|
|
int _lseek() {return 0;}
|
|
int _read() {return 0;}
|
|
int _write() {return 0;}
|
|
int _close() {return 0;}
|
|
void _exit(int x) {for(;;){}}
|
|
int _sbrk() {return 0;}
|
|
int _kill() {return 0;}
|
|
int _getpid() {return 0;}
|
|
int _fstat() {return 0;}
|
|
int _isatty() {return 0;}
|
|
*/
|
|
|
|
void *malloc(size_t n) {return NULL;}
|
|
void *calloc(size_t nmemb, size_t size) {return NULL;}
|
|
void *realloc(void *ptr, size_t size) {return NULL;}
|
|
void free(void *p) {}
|
|
int printf(const char *m, ...) {return 0;}
|
|
void *memcpy(void *dest, const void *src, size_t n) {return NULL;}
|
|
int memcmp(const void *s1, const void *s2, size_t n) {return 0;}
|
|
void *memmove(void *dest, const void *src, size_t n) {return NULL;}
|
|
void *memset(void *s, int c, size_t n) {return NULL;}
|
|
int strcmp(const char *s1, const char* s2) {return 0;}
|
|
int strncmp(const char *s1, const char* s2, size_t n) {return 0;}
|
|
size_t strlen(const char *s) {return 0;}
|
|
char *strcat(char *dest, const char *src) {return NULL;}
|
|
char *strchr(const char *dest, int c) {return NULL;}
|
|
#include <stdarg.h>
|
|
int vprintf(const char *format, va_list ap) {return 0;}
|
|
int vsnprintf(char *str, size_t size, const char *format, va_list ap) {return 0;}
|
|
|
|
#undef putchar
|
|
int putchar(int c) {return 0;}
|
|
int puts(const char *s) {return 0;}
|
|
|
|
void _start(void) {main(0, NULL);}
|