Добавлена проверка базы записи на рекурсивное расширение

[dsw-obn.git] / src / main.c

diff --git a/src/main.c b/src/main.c
index 8029be718d08bc4823e6723657a66441b68fe651..a97f2d7d71606da039bf0ded4764654dd8b64005 100644 (file)
--- a/src/main.c
+++ b/src/main.c
@@ -44,7 +44,7 @@ main(int argc, char ** argv)
 
        if(argc != 2)
        {
-               printf("use: %s <source>\n", argv[0]);
+               printf("use: %s <module>\n", argv[0]);
                return 1;
        }
 
@@ -53,7 +53,6 @@ main(int argc, char ** argv)
        ctx = oberon_create_context(import_module);
        mod = oberon_compile_module(ctx, code);
 
-       oberon_generate_code(ctx);
        oberon_destroy_context(ctx);
        return 0;
 }