X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgenerator.h;h=5617e79796ac450128ab6536c7f9c35b7448ad9b;hb=2e868cbd80ac5144b08154aaf2cf7bf7be455b61;hp=885b9faca57509a697088c697353a5808e3b7296;hpb=2a0d7e7fbb7dcccc65f98301a0627ee47c755f2f;p=dsw-obn.git diff --git a/src/generator.h b/src/generator.h index 885b9fa..5617e79 100644 --- a/src/generator.h +++ b/src/generator.h @@ -6,10 +6,13 @@ void oberon_generator_init_context(oberon_context_t * ctx); void oberon_generator_init_type(oberon_context_t * ctx, oberon_type_t * type); void oberon_generator_init_record(oberon_context_t * ctx, oberon_type_t * type); void oberon_generator_init_var(oberon_context_t * ctx, oberon_object_t * var); +void oberon_generator_init_temp_var(oberon_context_t * ctx, oberon_object_t * var); void oberon_generator_init_proc(oberon_context_t * ctx, oberon_object_t * proc); -void oberon_generator_init_module(oberon_context_t * ctx, oberon_module_t * mod); void oberon_generator_destroy_context(oberon_context_t * ctx); +void oberon_generator_init_module(oberon_context_t * ctx, oberon_module_t * mod); +void oberon_generator_fini_module(oberon_module_t * mod); + /* * Функции генерации тела модуля */ @@ -25,18 +28,21 @@ void oberon_generate_begin_proc(oberon_context_t * ctx, oberon_object_t * proc); void oberon_generate_end_proc(oberon_context_t * ctx); void oberon_generate_call_proc(oberon_context_t * ctx, oberon_expr_t * desig); +gen_label_t * oberon_generator_reserve_label(oberon_context_t * ctx); +void oberon_generate_label(oberon_context_t * ctx, gen_label_t * l); +void oberon_generate_branch(oberon_context_t * ctx, oberon_expr_t * cond, bool gotoif, gen_label_t * l); +void oberon_generate_goto(oberon_context_t * ctx, gen_label_t * l); + /* * Функции генерации операторов */ void oberon_generate_assign(oberon_context_t * ctx, oberon_expr_t * src, oberon_expr_t * dst); +void oberon_generate_copy(oberon_context_t * ctx, oberon_expr_t * src, oberon_expr_t * dst); +void oberon_generate_assert_n(oberon_context_t * ctx, oberon_expr_t * cond, int64_t n); +void oberon_generate_assert(oberon_context_t * ctx, oberon_expr_t * cond); +void oberon_generate_trap(oberon_context_t * ctx, int64_t n); +void oberon_generate_halt(oberon_context_t * ctx, int64_t n); void oberon_generate_return(oberon_context_t * ctx, oberon_expr_t * expr); -/* - * Функции генерации кода - */ - -void oberon_generate_code(oberon_context_t * ctx); -void oberon_generator_dump(oberon_context_t * ctx, char * path); -void * oberon_generator_get_procedure(oberon_context_t * ctx, const char * name); -void * oberon_generator_get_var(oberon_context_t * ctx, const char * name); +void oberon_set_out_directory(oberon_context_t * ctx, const char * path);