/* Copyright (C) 2000 by Universitaet Karlsruhe
-** All rights reserved.
-**
-** Author: Goetz Lindenmaier
-**
-** testprogram.
+* All rights reserved.
+*
+* Author: Goetz Lindenmaier
+*
+* testprogram.
*/
#include <stdio.h>
# include "firm.h"
/**
-*** This file constructs type information for constant entities.
-***
-*** It constructs the information for a class type with a dispatch
-*** table. The class has a field a, and two methods f and g. The
-*** class is represented by a class type with two entities for the
-*** field a and the reference to the dispatch table. This reference
-*** is a constant entity. Ther dispatch table is also represented
-*** by a class type that contains the two methods. There is one entity
-*** of the dispatch table which is constant.
-***
-*** Further the example shows the representation of a constant global
-*** array.
-***
-*** class C {
-*** int a;
-*** void f();
-*** void g(int);
-*** }
-*** int[4] arre = (7, 2, 13, 92);
+* This file constructs type information for constant entities.
+*
+* It constructs the information for a class type with a dispatch
+* table. The class has a field a, and two methods f and g. The
+* class is represented by a class type with two entities for the
+* field a and the reference to the dispatch table. This reference
+* is a constant entity. Ther dispatch table is also represented
+* by a class type that contains the two methods. There is one entity
+* of the dispatch table which is constant.
+*
+* Further the example shows the representation of a constant global
+* array.
+*
+* class C {
+* int a;
+* void f();
+* void g(int);
+* }
+* int[4] arre = (7, 2, 13, 92);
**/
int main(int argc, char **argv)
printf("Creating type information...\n");
/** init library */
- init_firm ();
+ init_firm (NULL);
/** make idents for all used identifiers in the program. */
Ci = id_from_str("C", strlen("C"));
current_ir_graph = get_const_code_irg();
/* The pointer to the dispatch table is constant. */
/* The constant is the address of the given entity */
- n = new_Const(mode_P, tarval_p_from_entity(dipte));
+<<<<<<< const_ent_example.c
+ n = new_Const(mode_P, new_tarval_from_entity(dipte, mode_P));
+=======
+ n = new_Const(mode_P, tarval_P_from_entity(dipte));
+>>>>>>> 1.7
set_entity_variability(diptpe, constant);
set_atomic_ent_value(diptpe, n);
arre = new_entity(get_glob_type(), arrei, arrt);
set_entity_variability(arre, constant);
current_ir_graph = get_const_code_irg();
- n = new_Const(mode_Is, tarval_from_long (mode_Is, 7));
+ n = new_Const(mode_Is, new_tarval_from_long (7, mode_Is));
add_compound_ent_value(arre, n, arrelte);
- n = new_Const(mode_Is, tarval_from_long (mode_Is, 2));
+ n = new_Const(mode_Is, new_tarval_from_long (2, mode_Is));
add_compound_ent_value(arre, n, arrelte);
- n = new_Const(mode_Is, tarval_from_long (mode_Is, 13));
+ n = new_Const(mode_Is, new_tarval_from_long (13, mode_Is));
add_compound_ent_value(arre, n, arrelte);
- n = new_Const(mode_Is, tarval_from_long (mode_Is, 92));
+ n = new_Const(mode_Is, new_tarval_from_long (92, mode_Is));
add_compound_ent_value(arre, n, arrelte);
}
printf("Done building the graph. Dumping it.\n");