Программа прерывается если в конструкциях CASE и WITH не выполняется ни одно условие...

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

diff --git a/src/generator.h b/src/generator.h
index bc502cc1a784b4de25845e97549e971df26ae362..80bab13d0c270e3436effea08c95cd3615ea0f6d 100644 (file)
--- a/src/generator.h
+++ b/src/generator.h
@@ -41,5 +41,6 @@ void oberon_generate_assign(oberon_context_t * ctx, oberon_expr_t * src, oberon_
 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);