-
- /* while(xbt_dynar_length(dynar)) */
-/* xbt_graph_free_node(graph,*((xbt_node_t*)xbt_dynar_get_ptr(dynar,0)),NULL,NULL); */
-
- dynar = xbt_graph_get_edges(graph);
-while(xbt_dynar_length(dynar))
- xbt_graph_free_edge(graph,*((xbt_edge_t*)xbt_dynar_get_ptr(dynar,0)),NULL);
-
- printf("%lu edges\n",xbt_dynar_length(dynar));
- dynar1 = xbt_graph_get_nodes(graph);
- printf("%lu nodes\n",xbt_dynar_length(dynar1));
- xbt_free(adj);
- xbt_free(route);
- xbt_graph_free_graph(graph, NULL, NULL, NULL);
+ free(sorted);
+ }
+
+
+ if (test_node_deletion) {
+ XBT_INFO("---- Testing Node Deletion ----");
+ nodes = xbt_graph_get_nodes(graph);
+ edges = xbt_graph_get_edges(graph);
+ XBT_INFO("Before Node deletion: %lu nodes, %lu edges",
+ xbt_dynar_length(nodes), xbt_dynar_length(edges));
+
+ while (!xbt_dynar_is_empty(nodes))
+ xbt_graph_free_node(graph,
+ *((xbt_node_t *) xbt_dynar_get_ptr(nodes, 0)),
+ free_label, NULL);
+ XBT_INFO("After Node deletion: %lu nodes, %lu edges",
+ xbt_dynar_length(nodes), xbt_dynar_length(edges));
+ }
+
+ if (test_edge_deletion) {
+ XBT_INFO("---- Testing Edge Deletion ----");
+ nodes = xbt_graph_get_nodes(graph);
+ edges = xbt_graph_get_edges(graph);
+ XBT_INFO("Before Edge deletion: %lu nodes, %lu edges",
+ xbt_dynar_length(nodes), xbt_dynar_length(edges));
+
+ while (!xbt_dynar_is_empty(edges))
+ xbt_graph_free_edge(graph,
+ *((xbt_edge_t *) xbt_dynar_get_ptr(edges, 0)),
+ NULL);
+
+ XBT_INFO("After Edge deletion: %lu nodes, %lu edges",
+ xbt_dynar_length(nodes), xbt_dynar_length(edges));
+ }
+
+ xbt_graph_free_graph(graph, free_label, NULL, NULL);
+