Реализованы неявные объявления типов наперёд

[dsw-obn.git] / oberon.h

diff --git a/oberon.h b/oberon.h
index 16044d4cf34843f6311173f930b995dda8df3157..41cec621e9dc6983297d651bcfe9f955e078d497 100644 (file)
--- a/oberon.h
+++ b/oberon.h
@@ -104,6 +104,8 @@ struct oberon_type_s
        oberon_type_t * base;
        oberon_object_t * decl;
 
+       int recursive;
+       int initialized;
        gen_type_t * gen_type;
 };
 
@@ -142,6 +144,7 @@ struct oberon_object_s
        char * name;
        int class;
 
+       int linked;
        oberon_type_t * type;
        oberon_item_t * value;
        oberon_object_t * next;