X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fana2%2Fpto_util.c;h=b73c4d6d2f25e375bdafb96b2cbffdcc44ffbadd;hb=b22a9a16f0a5a1a108bed2dec0e1d29af5605107;hp=10a7cc04c0b3eea5d56d42ad161096aeb071cfc1;hpb=18d4e44e30fd469c0737020cfe69cff5e55449ba;p=libfirm

diff --git a/ir/ana2/pto_util.c b/ir/ana2/pto_util.c
index 10a7cc04c..b73c4d6d2 100644
--- a/ir/ana2/pto_util.c
+++ b/ir/ana2/pto_util.c
@@ -27,6 +27,7 @@
 # include "xmalloc.h"
 
 # include "pto_debug.h"
+# include "gnu_ext.h"
 
 /* Local Defines: */
 # ifndef TRUE
@@ -76,10 +77,11 @@ ir_node **find_irg_args (ir_graph *graph)
 {
   type *tp = get_entity_type (get_irg_entity (graph));
   const int n_args = get_method_n_params (tp);
-  ir_node **args = (ir_node**) xmalloc (sizeof (ir_node*) * (n_args+1));
+  ir_node **args = xcalloc (n_args + 1, sizeof (ir_node*));
   ir_node *arg = get_irg_args (graph);
-  find_irg_args_env_t *arg_env =
-    (find_irg_args_env_t*) xmalloc (sizeof (find_irg_args_env_t));
+  find_irg_args_env_t *arg_env;
+
+  arg_env = (find_irg_args_env_t*) xmalloc (sizeof (find_irg_args_env_t));
 
   arg_env->args = args;
   arg_env->arg  = arg;
@@ -92,8 +94,8 @@ ir_node **find_irg_args (ir_graph *graph)
     set_current_ir_graph (save);
   }
 
-  memset (arg_env, 0x00, sizeof (find_irg_args_env_t));
-  free (arg_env);
+   memset (arg_env, 0x00, sizeof (find_irg_args_env_t));
+   free (arg_env);
 
   args [n_args] = NULL;
 
@@ -152,6 +154,22 @@ int is_dummy_load_ptr (ir_node *ptr)
 
 /*
   $Log$
+  Revision 1.16  2005/01/14 14:13:32  liekweg
+  fix gnu extension
+
+  Revision 1.15  2005/01/10 17:26:34  liekweg
+  fixup printfs, don't put environments on the stack
+
+  Revision 1.14  2004/12/23 15:47:09  beck
+  removed uneeded allocations
+  used new xcalloc
+
+  Revision 1.13  2004/12/22 14:43:14  beck
+  made allocations C-like
+
+  Revision 1.12  2004/12/21 15:53:12  beck
+  removed GNUC constructs
+
   Revision 1.11  2004/12/20 17:34:35  liekweg
   fix recursion handling