Mercurial > hg > CbC > CbC_gcc
comparison gcc/tree.c @ 117:f81c5aa9f14f
fix
author | mir3636 |
---|---|
date | Tue, 28 Nov 2017 21:17:15 +0900 |
parents | ab0bcb71f44d |
children | d34655255c78 |
comparison
equal
deleted
inserted
replaced
116:367f9f4f266e | 117:f81c5aa9f14f |
---|---|
104 | 104 |
105 #undef DEFTREECODE | 105 #undef DEFTREECODE |
106 #undef END_OF_BASE_TREE_CODES | 106 #undef END_OF_BASE_TREE_CODES |
107 | 107 |
108 #ifndef noCbC | 108 #ifndef noCbC |
109 #include "cbc-tree.h" | 109 #include "c/cbc-tree.h" |
110 #endif | 110 #endif |
111 | 111 |
112 /* Each tree code class has an associated string representation. | 112 /* Each tree code class has an associated string representation. |
113 These must correspond to the tree_code_class entries. */ | 113 These must correspond to the tree_code_class entries. */ |
114 | 114 |
11491 return LOCATION_BLOCK (t->exp.locus); | 11491 return LOCATION_BLOCK (t->exp.locus); |
11492 gcc_unreachable (); | 11492 gcc_unreachable (); |
11493 return NULL; | 11493 return NULL; |
11494 } | 11494 } |
11495 | 11495 |
11496 <<<<<<< local | |
11497 void | 11496 void |
11498 tree_set_block (tree t, tree b) | 11497 tree_set_block (tree t, tree b) |
11499 { | 11498 { |
11500 const enum tree_code_class c = TREE_CODE_CLASS (TREE_CODE (t)); | 11499 const enum tree_code_class c = TREE_CODE_CLASS (TREE_CODE (t)); |
11501 | 11500 |
11505 } | 11504 } |
11506 else | 11505 else |
11507 gcc_unreachable (); | 11506 gcc_unreachable (); |
11508 } | 11507 } |
11509 | 11508 |
11510 ======= | |
11511 /* Build and return a TREE_LIST of arguments in the CALL_EXPR exp. | |
11512 FIXME: don't use this function. It exists for compatibility with | |
11513 the old representation of CALL_EXPRs where a list was used to hold the | |
11514 arguments. Places that currently extract the arglist from a CALL_EXPR | |
11515 ought to be rewritten to use the CALL_EXPR itself. */ | |
11516 tree | |
11517 call_expr_arglist (tree exp) | |
11518 { | |
11519 tree arglist = NULL_TREE; | |
11520 int i; | |
11521 for (i = call_expr_nargs (exp) - 1; i >= 0; i--) | |
11522 arglist = tree_cons (NULL_TREE, CALL_EXPR_ARG (exp, i), arglist); | |
11523 return arglist; | |
11524 } | |
11525 | |
11526 | |
11527 >>>>>>> other | |
11528 /* Create a nameless artificial label and put it in the current | 11509 /* Create a nameless artificial label and put it in the current |
11529 function context. The label has a location of LOC. Returns the | 11510 function context. The label has a location of LOC. Returns the |
11530 newly created label. */ | 11511 newly created label. */ |
11531 | 11512 |
11532 tree | 11513 tree |