From: Götz Lindenmaier Date: Wed, 23 May 2001 18:12:47 +0000 (+0000) Subject: Don't now what changed... X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=a78311ba20b0628a2c64f16ce48a995031d1964c;p=libfirm Don't now what changed... :wq [r150] --- diff --git a/ir/ir/ircons.h b/ir/ir/ircons.h index 8472af6de..4cbdc3e2f 100644 --- a/ir/ir/ircons.h +++ b/ir/ir/ircons.h @@ -263,7 +263,7 @@ * To use the functionality of the comfortable interface correctly the Front * End needs to follow certain protocols. This is explained in the following. * To build a correct IR with the other interfaces study the semantics of - * the firm node (See tech-reprot UKA 1999-44). For the construction of + * the firm node (See tech-reprot UKA 1999-14). For the construction of * types and entities see the documentation in those modules. * * First the Frontend needs to decide which variables and values used in @@ -327,13 +327,13 @@ * add_in_edge(this_block, cf_pred1); * add_in_edge(this_block, cf_pred2); * mature_block(this_block); - * a_val = get_value(17, mode_I); + * a_val = get_value(42, mode_I); * mem = get_store(); * div = new_Div(mem, a_val, a_val); * mem = new_Proj(div, mode_M, 0); * for the numbers for Proj see docu * * res = new_Proj(div, mode_I, 2); * set_store(mem); - * set_value(res, 17); + * set_value(res, 42); * cf_op = new_Jmp(); * * For further information look at the documentation of the nodes and diff --git a/ir/ir/irdump.c b/ir/ir/irdump.c index b9384b63b..129d25623 100644 --- a/ir/ir/irdump.c +++ b/ir/ir/irdump.c @@ -499,6 +499,7 @@ dump_type_info (type_or_ent *tore, void *env) { } break; case k_type: { + /* why can't I cast here??? @@@ */ type *type = tore; xfprintf (F, "\"%I %I", get_type_tpop_nameid(type), get_type_nameid(type)); @@ -530,10 +531,10 @@ dump_type_info (type_or_ent *tore, void *env) { case tpo_union: { xfprintf (F, "\"}\n"); - for (i = 0; i < get_union_n_types(type); i++) + for (i = 0; i < get_union_n_members(type); i++) xfprintf (F, "edge: { sourcename: \"%p\" targetname: \"%p\" " - "label: \"%I\"f" UNION_EDGE_ATTR "}\n", - type, get_union_unioned_type(type, i), get_union_delim_nameid(type, i)); + "label: \"\"f" UNION_EDGE_ATTR "}\n", + type, get_union_member(type, i)); } break; case tpo_array: { diff --git a/ir/ir/irmode.h b/ir/ir/irmode.h index 09a1eca57..08a838fa0 100644 --- a/ir/ir/irmode.h +++ b/ir/ir/irmode.h @@ -6,12 +6,12 @@ irmode.h Modes for ir operators. This module specifies the modes that type the firm nodes. See -UKA tech report 1999-44 for more information about modes. +UKA tech report 1999-14 for more information about modes. @@@ This file is at the level of the original fiasco. It needs to be ported -to the version of the tech report!!! This will be done with the reimplementation -of the tarval module. +to the version of the tech report!!! This will be done with the +reimplementation of the tarval module. */ # ifndef _IRMODE_H_ @@ -30,14 +30,14 @@ typedef struct tarval tarval; typedef enum { /* irm is short for `ir mode' */ irm_T, /* former irm_N */ - irm_f, irm_d, - irm_c, irm_C, irm_h, irm_H, irm_i, irm_I, irm_l, irm_L, - irm_B, irm_b, + irm_f, irm_d, /* 1, 2 */ + irm_c, irm_C, irm_h, irm_H, irm_i, irm_I, irm_l, irm_L, /* 3 .. 10 */ + irm_B, irm_b, /* 11, 12 */ irm_p, - irm_s, irm_S, + irm_s, irm_S, /* 14, 15 */ irm_X, irm_M, irm_R, irm_Z, irm_max - /* according to tech report 1999-44: + /* according to tech report 1999-14: irm_BB, irm_X, // basic block, execution irm_F, irm_D, irm_E, // float, double, extended irm_B, irm_Bu, irm_H, irm_Hu, irm_I, irm_Iu, irm_L, irm_Lu, diff --git a/ir/ir/irop.h b/ir/ir/irop.h index 6ad92f681..96dddcf59 100644 --- a/ir/ir/irop.h +++ b/ir/ir/irop.h @@ -7,7 +7,8 @@ ** irop.h operators of firm nodes ** ** This module specifies the opcodes possible for ir nodes. Their -** definition is close to the operations specified in UKA Tech-Report 1999-44 +** definition is close to the operations specified in UKA Tech-Report +** 1999-14 ** */