use default error handler if none is specified
[libfirm] / ir / be / bestabs.c
index 2c3b029..9073c15 100644 (file)
@@ -24,9 +24,7 @@
  * @date    11.9.2006
  * @version $Id$
  */
-#ifdef HAVE_CONFIG_H
-# include "config.h"
-#endif
+#include "config.h"
 
 #include <stdio.h>
 #include <stdlib.h>
@@ -41,7 +39,7 @@
 #include "pdeq.h"
 #include "irtools.h"
 #include "obst.h"
-#include "array.h"
+#include "array_t.h"
 #include "be_dbgout_t.h"
 #include "beabi.h"
 #include "bemodule.h"
@@ -469,13 +467,13 @@ static void gen_method_type(wenv_t *env, ir_type *tp) {
  * type-walker: generate declaration for simple types,
  * put all other types on a wait queue
  */
-static void walk_type(type_or_ent *tore, void *ctx)
+static void walk_type(type_or_ent tore, void *ctx)
 {
        wenv_t *env = ctx;
        ir_type  *tp;
 
-       if (get_kind(tore) == k_type) {
-               tp = (ir_type *)tore;
+       if (is_type(tore.typ)) {
+               tp = tore.typ;
 
                /* ignore the unknown type */
                if (tp == firm_unknown_type)
@@ -618,12 +616,6 @@ static void stabs_set_dbg_info(dbg_handle *h, dbg_info *dbgi)
                return;
 
        if (handle->curr_file != fname) {
-               /* TODO: escape filename correctly */
-               if (handle->curr_file != handle->main_file) {
-                       be_emit_irprintf("\t.stabs\t\"%s\",%d,0,0,0\n", handle->curr_file,
-                                        N_EINCL);
-                       be_emit_write_line();
-               }
                if (fname != handle->main_file) {
                        be_emit_irprintf("\t.stabs\t\"%s\",%d,0,0,0\n", fname, N_SOL);
                        be_emit_write_line();
@@ -824,7 +816,7 @@ static const debug_ops stabs_ops = {
 
 /* Opens a stabs handler */
 dbg_handle *be_stabs_open(void) {
-       stabs_handle *h = xmalloc(sizeof(*h));
+       stabs_handle *h = XMALLOC(stabs_handle);
 
        h->base.ops     = &stabs_ops;
        h->cur_ent      = NULL;