nsz Git - libfirm/blob - ir/ana2/pto_debug.c

   1 /* -*- c -*- */
   2
   3 /*
   4    Project:     libFIRM
   5    File name:   ir/ana/pto_debug.c
   6    Purpose:     Useful Macros for Debugging
   7    Author:      Florian
   8    Modified by:
   9    Created:     Sat Nov 13 19:30:21 CET 2004
  10    CVS-ID:      $Id$
  11    Copyright:   (c) 1999-2004 Universität Karlsruhe
  12    Licence:     This file is protected by the GPL -  GNU GENERAL PUBLIC LICENSE.
  13 */
  14
  15 # ifdef HAVE_CONFIG_H
  16 #  include "config.h"
  17 # endif
  18
  19 /*
  20  pto_debug: Useful Macros for Debugging
  21 */
  22
  23 # include "pto_debug.h"
  24
  25 # include "irnode.h"
  26 /* # include "xmalloc.h" */
  27
  28 /* Local Defines: */
  29
  30 /* Local Data Types: */
  31
  32 /* Local Variables: */
  33 static int dbg_lvl = 0;
  34
  35 /* Local Prototypes: */
  36
  37 /* ===================================================
  38    Local Implementation:
  39    =================================================== */
  40
  41
  42 /* ===================================================
  43    Exported Implementation:
  44    =================================================== */
  45 int get_dbg_lvl ()
  46 {
  47   return (dbg_lvl);
  48 }
  49
  50 void set_dbg_lvl (int lvl)
  51 {
  52   dbg_lvl = lvl;
  53 }
  54
  55
  56 \f
  57 /*
  58   $Log$
  59   Revision 1.3  2004/12/02 16:17:51  beck
  60   fixed config.h include
  61
  62   Revision 1.2  2004/11/24 14:53:56  liekweg
  63   Bugfixes
  64
  65   Revision 1.1  2004/11/18 16:37:34  liekweg
  66   rewritten
  67
  68
  69 */