2 * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
4 * This file is part of libFirm.
6 * This file may be distributed and/or modified under the terms of the
7 * GNU General Public License version 2 as published by the Free Software
8 * Foundation and appearing in the file LICENSE.GPL included in the
9 * packaging of this file.
11 * Licensees holding valid libFirm Professional Edition licenses may use
12 * this file in accordance with the libFirm Commercial License.
13 * Agreement provided with the Software.
15 * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
16 * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24 * @author Sebastian Buchwald
29 #include "adt/array.h"
35 #include "pbqp_edge.h"
36 #include "pbqp_edge_t.h"
37 #include "pbqp_node.h"
38 #include "pbqp_node_t.h"
41 pbqp_edge *alloc_edge(pbqp *pbqp, int src_index, int tgt_index, pbqp_matrix *costs)
45 if (tgt_index < src_index) {
47 src_index = tgt_index;
53 pbqp_edge *edge = obstack_alloc(&pbqp->obstack, sizeof(*edge));
56 pbqp_node *src_node = get_node(pbqp, src_index);
59 pbqp_node *tgt_node = get_node(pbqp, tgt_index);
63 edge->costs = pbqp_matrix_copy_and_transpose(pbqp, costs);
65 edge->costs = pbqp_matrix_copy(pbqp, costs);
69 * Connect edge with incident nodes. Since the edge is allocated, we know
70 * that it don't appear in the edge lists of the nodes.
72 ARR_APP1(pbqp_edge *, src_node->edges, edge);
74 ARR_APP1(pbqp_edge *, tgt_node->edges, edge);
76 edge->bucket_index = UINT_MAX;
81 void delete_edge(pbqp_edge *edge)
93 disconnect_edge(src_node, edge);
94 disconnect_edge(tgt_node, edge);
99 reorder_node_after_edge_deletion(src_node);
100 reorder_node_after_edge_deletion(tgt_node);
103 unsigned is_deleted(pbqp_edge *edge)
109 deleted = (edge->src == NULL) && (edge-> tgt == NULL);
114 pbqp_edge *pbqp_edge_deep_copy(pbqp *pbqp, pbqp_edge *edge,
115 pbqp_node *src_node, pbqp_node *tgt_node)
117 pbqp_edge *copy = obstack_alloc(&pbqp->obstack, sizeof(*copy));
122 copy->costs = pbqp_matrix_copy(pbqp, edge->costs);
124 /* Connect edge with incident nodes. */
125 copy->src = src_node;
126 copy->tgt = tgt_node;
127 copy->bucket_index = UINT_MAX;