X-Git-Url: http://deadsoftware.ru/gitweb?p=dsw-obn.git;a=blobdiff_plain;f=oberon.h;h=4b785453befda47bbdcfe1ccf9c7b9a67ccfd1cc;hp=ef9ad7f1c891223eb2241ef8d4020e3855a50645;hb=c4d4a265b71124ad0e8588601cfc1d66aca84b96;hpb=d1b4e7fdab92589146e19cf4b8b402edf4d6b33d

diff --git a/oberon.h b/oberon.h
index ef9ad7f..4b78545 100644
--- a/oberon.h
+++ b/oberon.h
@@ -39,6 +39,7 @@ struct gen_context_s
 	gcc_jit_result * gcc_result;
 	gen_block_t * block;
 	unsigned record_count;
+	gcc_jit_lvalue * gcc_alloc;
 };
 
 typedef struct oberon_type_s oberon_type_t;
@@ -257,7 +258,8 @@ enum
 	MODE_INDEX,
 	MODE_FIELD,
 	MODE_DEREF,
-	MODE_NIL
+	MODE_NIL,
+	MODE_NEWARR
 };
 
 enum
@@ -302,6 +304,7 @@ struct oberon_item_s
 
 	int num_args;
 	oberon_expr_t * args;
+	oberon_type_t * type;
 };
 
 struct oberon_oper_s