/*
- * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
+ * Copyright (C) 1995-2011 University of Karlsruhe. All right reserved.
*
* This file is part of libFirm.
*
* Returns NULL if there isn`t a pos`th loop_node */
ir_loop *get_loop_son(ir_loop *loop, int pos)
{
- int child_nr = 0, loop_nr = -1;
+ size_t child_nr = 0;
+ int loop_nr = -1;
assert(loop && loop->kind == k_ir_loop);
- while (child_nr < ARR_LEN(loop->children)) {
+ for (child_nr = 0; child_nr < ARR_LEN(loop->children); ++child_nr) {
if (*(loop->children[child_nr].kind) == k_ir_loop)
loop_nr++;
if (loop_nr == pos)
return loop->children[child_nr].son;
- child_nr++;
}
return NULL;
}
* Returns NULL if there isn't a pos'th ir_node */
ir_node *get_loop_node(const ir_loop *loop, int pos)
{
- int child_nr, node_nr = -1;
+ size_t child_nr;
+ int node_nr = -1;
assert(loop && loop->kind == k_ir_loop);
assert(pos < get_loop_n_nodes(loop));
- for (child_nr = 0; child_nr < ARR_LEN(loop->children); child_nr++) {
+ for (child_nr = 0; child_nr < ARR_LEN(loop->children); ++child_nr) {
if (*(loop->children[child_nr].kind) == k_ir_node)
node_nr++;
if (node_nr == pos)
/*
- * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
+ * Copyright (C) 1995-2011 University of Karlsruhe. All right reserved.
*
* This file is part of libFirm.
*
reg->succ = NEW_ARR_D(ir_region *, obst, 1);
reg->succ[0] = exit;
- DEBUG_ONLY(
+ DEBUG_ONLY({
+ size_t i;
DB((dbg, LEVEL_2, " Created %s(%u)\n", reg->type == ir_rk_Switch ? "Switch" : "Case", reg->nr));
for (i = 1; i < ARR_LEN(reg->parts); ++i) {
DB((dbg, LEVEL_2, " Case(%u)\n", reg->parts[i].region->nr));
}
DB((dbg, LEVEL_2, " Exit(%u)\n", exit->nr));
- )
+ })
return reg;
} /* new_SwitchCase */
/*
- * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
+ * Copyright (C) 1995-2011 University of Karlsruhe. All right reserved.
*
* This file is part of libFirm.
*
Those are ascending with ascending addresses. */
qsort(exc_list, ARR_LEN(exc_list), sizeof(exc_list[0]), cmp_exc_entry);
{
- int i;
+ size_t i;
for (i = 0; i < ARR_LEN(exc_list); ++i) {
be_emit_cstring("\t.long ");
static inline ir_node *_get_irn_dep(const ir_node *node, int pos) {
assert(node->deps && "dependency array node yet allocated. use add_irn_dep()");
- assert(pos >= 0 && pos < ARR_LEN(node->deps) && "dependency index out of range");
+ assert(pos >= 0 && pos < (int)ARR_LEN(node->deps) && "dependency index out of range");
return node->deps[pos];
}
ir_node *old;
assert(node->deps && "dependency array node yet allocated. use add_irn_dep()");
- assert(pos >= 0 && pos < ARR_LEN(node->deps) && "dependency index out of range");
+ assert(pos >= 0 && pos < (int)ARR_LEN(node->deps) && "dependency index out of range");
old = node->deps[pos];
node->deps[pos] = dep;
edges_notify_edge_kind(node, pos, dep, old, EDGE_KIND_DEP, get_irn_irg(node));
static inline ir_graph *_get_irp_irg(int pos)
{
- assert(0 <= pos && pos <= ARR_LEN(irp->graphs));
+ assert(0 <= pos && pos <= (int)ARR_LEN(irp->graphs));
return irp->graphs[pos];
}
unsigned int width, int left_just, char pad)
{
int res = 0;
- int i;
+ size_t i;
size_t to_pad = width > len ? width - len : 0;
/* If not left justified, pad left */
/*
- * Copyright (C) 1995-2010 University of Karlsruhe. All right reserved.
+ * Copyright (C) 1995-2011 University of Karlsruhe. All right reserved.
*
* This file is part of libFirm.
*
prepare_links_and_handle_rotl, env);
if (env->flags & MUST_BE_LOWERED) {
- int i;
+ size_t i;
ir_reserve_resources(irg, IR_RESOURCE_IRN_VISITED);
inc_irg_visited(irg);
DB((dbg, LEVEL_1, " method %+F kept alive.\n", marked[idx]));
}
- for (i = 0; i < ARR_LEN(marked); ++i) {
- ir_graph *irg = get_entity_irg(marked[i]);
+ for (idx = 0; idx < ARR_LEN(marked); ++idx) {
+ ir_graph *irg = get_entity_irg(marked[idx]);
ir_node *node;
if (irg == NULL)
/* Does the loop inversion. */
static void inversion_walk(entry_edge *head_entries)
{
- int i;
+ size_t i;
/*
* The order of rewiring bottom-up is crucial.
static void place_copies(int copies)
{
ir_node *loophead = loop_head;
- int c, i;
+ size_t i;
+ int c;
int be_src_pos = loop_info.be_src_pos;
/* Serialize loops by fixing their head ins.
/* Copies the cur_loop several times. */
static void copy_loop(entry_edge *cur_loop_outs, int copies)
{
- int i, c;
+ int c;
ir_reserve_resources(current_ir_graph, IR_RESOURCE_IRN_VISITED);
for (c = 0; c < copies; ++c) {
+ size_t i;
inc_irg_visited(current_ir_graph);
{
int pos = q->pos;
ir_node *new_call, *call;
- int i;
+ size_t i;
/* We iterate the list of the "call".*/
for (i = 0; i < ARR_LEN(q->calls); ++i) {
static void remove_class_member(ir_type *clss, ir_entity *member)
{
- int i;
+ size_t i;
assert(clss && (clss->type_op == type_class));
- for (i = 0; i < (ARR_LEN (clss->attr.ca.members)); i++) {
+ for (i = 0; i < ARR_LEN(clss->attr.ca.members); ++i) {
if (clss->attr.ca.members[i] == member) {
- for (; i < (ARR_LEN (clss->attr.ca.members)) - 1; i++)
+ for (; i < ARR_LEN(clss->attr.ca.members) - 1; ++i)
clss->attr.ca.members[i] = clss->attr.ca.members[i + 1];
ARR_SETLEN(ir_entity*, clss->attr.ca.members, ARR_LEN(clss->attr.ca.members) - 1);
break;
void remove_class_subtype(ir_type *clss, ir_type *subtype)
{
- int i;
+ size_t i;
assert(clss && (clss->type_op == type_class));
- for (i = 0; i < (ARR_LEN (clss->attr.ca.subtypes)); i++)
+ for (i = 0; i < ARR_LEN(clss->attr.ca.subtypes); ++i)
if (clss->attr.ca.subtypes[i] == subtype) {
- for (; i < (ARR_LEN (clss->attr.ca.subtypes))-1; i++)
+ for (; i < ARR_LEN(clss->attr.ca.subtypes) - 1; ++i)
clss->attr.ca.subtypes[i] = clss->attr.ca.subtypes[i+1];
ARR_SETLEN(ir_type*, clss->attr.ca.subtypes, ARR_LEN(clss->attr.ca.subtypes) - 1);
break;
void remove_class_supertype(ir_type *clss, ir_type *supertype)
{
- int i;
+ size_t i;
assert(clss && (clss->type_op == type_class));
- for (i = 0; i < (ARR_LEN(clss->attr.ca.supertypes)); i++)
+ for (i = 0; i < ARR_LEN(clss->attr.ca.supertypes); ++i)
if (clss->attr.ca.supertypes[i] == supertype) {
- for (; i < (ARR_LEN(clss->attr.ca.supertypes))-1; i++)
+ for (; i < ARR_LEN(clss->attr.ca.supertypes) - 1; ++i)
clss->attr.ca.supertypes[i] = clss->attr.ca.supertypes[i+1];
ARR_SETLEN(ir_type*, clss->attr.ca.supertypes, ARR_LEN(clss->attr.ca.supertypes) - 1);
break;
static void remove_struct_member(ir_type *strct, ir_entity *member)
{
- int i;
+ size_t i;
assert(strct && (strct->type_op == type_struct));
- for (i = 0; i < (ARR_LEN (strct->attr.sa.members)); i++)
+ for (i = 0; i < ARR_LEN(strct->attr.sa.members); ++i)
if (strct->attr.sa.members[i] == member) {
- for (; i < (ARR_LEN (strct->attr.sa.members))-1; i++)
+ for (; i < ARR_LEN(strct->attr.sa.members) - 1; ++i)
strct->attr.sa.members[i] = strct->attr.sa.members[i+1];
ARR_SETLEN(ir_entity*, strct->attr.sa.members, ARR_LEN(strct->attr.sa.members) - 1);
break;
static void remove_union_member(ir_type *uni, ir_entity *member)
{
- int i;
+ size_t i;
assert(uni && (uni->type_op == type_union));
- for (i = 0; i < (ARR_LEN(uni->attr.ua.members)); i++) {
+ for (i = 0; i < ARR_LEN(uni->attr.ua.members); ++i) {
if (uni->attr.ua.members[i] == member) {
- for (; i < (ARR_LEN(uni->attr.ua.members))-1; i++)
+ for (; i < ARR_LEN(uni->attr.ua.members) - 1; i++)
uni->attr.ua.members[i] = uni->attr.ua.members[i+1];
ARR_SETLEN(ir_entity*, uni->attr.ua.members, ARR_LEN(uni->attr.ua.members) - 1);
break;