Добавлена конструкция ELSIF-THEN

[dsw-obn.git] / src / generator.h

diff --git a/src/generator.h b/src/generator.h
index 08df5c892abb414e4f376e6829a697554a5b6398..23901dd41c83e027409eace3445ae5d11d276d09 100644 (file)
--- a/src/generator.h
+++ b/src/generator.h
@@ -9,6 +9,9 @@ void oberon_generator_init_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_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);
+
 /*
  * Функции генерации тела модуля
  */
@@ -24,6 +27,11 @@ 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);
+
 /*
  * Функции генерации операторов
  */