/*
- * Copyright (C) 1995-2007 University of Karlsruhe. All right reserved.
+ * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
*
* This file is part of libFirm.
*
* PURPOSE.
*/
-/*
- * Project: libFIRM
- * File name: ir/ir/distrib.c
- * Purpose: Statistics for Firm. Distribution tables.
- * Author: Michael Beck
- * Created:
- * CVS-ID: $Id$
- * Copyright: (c) 2004 Universität Karlsruhe
+/**
+ * @file
+ * @brief Statistics for Firm. Distribution tables.
+ * @author Michael Beck
+ * @version $Id$
*/
-#ifdef HAVE_CONFIG_H
-# include "config.h"
-#endif
+#include "config.h"
#include "hashptr.h"
#include "irtools.h"
*/
distrib_tbl_t *stat_new_distrib_tbl(pset_cmp_fun cmp_func, distrib_hash_fun hash_func)
{
- distrib_tbl_t *res;
-
- res = xmalloc(sizeof(*res));
+ distrib_tbl_t *res = XMALLOC(distrib_tbl_t);
obstack_init(&res->cnts);
if (elem)
return elem;
- elem = obstack_alloc(&tbl->cnts, sizeof(*elem));
+ elem = OALLOC(&tbl->cnts, distrib_entry_t);
/* clear counter */
cnt_clr(&elem->cnt);
*/
void stat_add_int_distrib_tbl(distrib_tbl_t *tbl, int key, const counter_t *cnt)
{
- stat_add_distrib_tbl(tbl, (const void *)key, cnt);
+ stat_add_distrib_tbl(tbl, INT_TO_PTR(key), cnt);
}
/*
*/
void stat_inc_int_distrib_tbl(distrib_tbl_t *tbl, int key)
{
- stat_inc_distrib_tbl(tbl, (const void *)key);
+ stat_inc_distrib_tbl(tbl, INT_TO_PTR(key));
}
/*
*/
void stat_insert_int_distrib_tbl(distrib_tbl_t *tbl, int key)
{
- stat_insert_distrib_tbl(tbl, (const void *)key);
+ stat_insert_distrib_tbl(tbl, INT_TO_PTR(key));
}
/*
return 0.0;
min =
- max = (int)entry->object;
+ max = PTR_TO_INT(entry->object);
sum = cnt_to_dbl(&entry->cnt);
for (entry = pset_next(tbl->hash_map); entry; entry = pset_next(tbl->hash_map)) {
- int value = (int)entry->object;
+ int value = PTR_TO_INT(entry->object);
if (value < min)
min = value;
- if (value > max);
+ if (value > max)
max = value;
sum += cnt_to_dbl(&entry->cnt);
}
count = max - min + 1;
- }
- else {
+ } else {
sum = 0.0;
count = 0;
foreach_pset(tbl->hash_map, entry) {
return 0.0;
foreach_pset(tbl->hash_map, entry) {
- sum += cnt_to_dbl(&entry->cnt) * (int)entry->object;
+ sum += cnt_to_dbl(&entry->cnt) * PTR_TO_INT(entry->object);
count += cnt_to_uint(&entry->cnt);
}
- }
- else {
+ } else {
foreach_pset(tbl->hash_map, entry) {
sum += cnt_to_dbl(&entry->cnt);
++count;