added copyright information

[r1714]

diff --git a/ir/ir/ircgcons.c b/ir/ir/ircgcons.c
index 1b8377e..0d4d0e3 100644 (file)
--- a/ir/ir/ircgcons.c
+++ b/ir/ir/ircgcons.c
@@ -1,6 +1,6 @@
 /*
  * Project:     libFIRM
- * File name:   ir/common
+ * File name:   ir/ir/ircgcons.c
  * Purpose:     Construction and removal of interprocedural representation
  *              (explicit interprocedural dependencies).
  * Author:      Hubert Schmid

diff --git a/ir/ir/irnode.c b/ir/ir/irnode.c
index 018670a..af41663 100644 (file)
--- a/ir/ir/irnode.c
+++ b/ir/ir/irnode.c
@@ -19,7 +19,7 @@
 #include "irnode_t.h"
 #include "irgraph_t.h"
 #include "irmode_t.h"
-#include "typegmod_t.h"
+#include "typegmod.h"
 #include "array.h"
 #include "irbackedge_t.h"
 #include "irdump.h"

diff --git a/ir/ir/irop_t.h b/ir/ir/irop_t.h
index 5d1f23f..80fc0c1 100644 (file)
--- a/ir/ir/irop_t.h
+++ b/ir/ir/irop_t.h
@@ -1,5 +1,15 @@
+/*
+ * Project:     libFIRM
+ * File name:   ir/ir/irop_t.h
+ * Purpose:     Representation of opcode of intermediate operation -- private header.
+ * Author:      Christian Schaefer
+ * Modified by: Goetz Lindenmaier
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1998-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
-/* $Id$ */
 
 # ifndef _IROP_T_H_
 # define _IROP_T_H_

diff --git a/ir/st/Makefile.in b/ir/st/Makefile.in
index d67e179..2f67e20 100644 (file)
--- a/ir/st/Makefile.in
+++ b/ir/st/Makefile.in
@@ -1,8 +1,13 @@
-# Hey Emacs, this is a -*- makefile -*-
 #
-# libFIRM Project
-#
-# $Id$
+# Project:     libFIRM
+# File name:   ir/st/Makefile.in
+# Purpose:
+# Author:      Florian Liekweg, Till Riedel
+# Modified by:
+# Created:
+# CVS-ID:      $Id$
+# Copyright:   (c) 2001-2003 Universität Karlsruhe
+# Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
 #
 
 top_srcdir := @top_srcdir@

diff --git a/ir/st/bs.h b/ir/st/bs.h
index bd96623..bfe6f48 100644 (file)
--- a/ir/st/bs.h
+++ b/ir/st/bs.h
@@ -1,4 +1,14 @@
-/* Copyright (c) 2002 by Universitaet Karlsruhe (TH).  All Rights Reserved */
+/*
+ * Project:     libFIRM
+ * File name:   ir/st/bs.h
+ * Purpose:     Provides a simple bit set.
+ * Author:      Florian Liekweg
+ * Modified by:
+ * Created:     4.3.2002
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2002-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 /**
    @file bs.h
@@ -8,7 +18,6 @@
    Not quite complete
 */
 
-/* $Id$ */
 
 # ifndef _BS_H_
 # define _BS_H_

diff --git a/ir/st/exc.c b/ir/st/exc.c
index bd8f159..53e1185 100644 (file)
--- a/ir/st/exc.c
+++ b/ir/st/exc.c
@@ -1,7 +1,14 @@
-/* Copyright (c) 2002 by Universität Karlsruhe (TH).  All Rights Reserved */
 /*
-* Time-stamp: <Monday, 04.11.2002, 17:28:27 goetz@i44pc2.info.uni-karlsruhe.de>
-*/
+ * Project:     libFIRM
+ * File name:   ir/st/exc.c
+ * Purpose:     Helper functions for jack exceptions.
+ * Author:      Florian Liekweg
+ * Modified by:
+ * Created:     4.3.2002
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2002-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 /**
    NAME
@@ -10,10 +17,6 @@
      Helper functions for exceptions
    S
      not quite complete
-   HISTORY
-     liekweg - Mar 4, 2002: Created.
-   CVS:
-     $Id$
 ***/
 
 # include "exc.h"

diff --git a/ir/st/exc.h b/ir/st/exc.h
index f270664..c2cdc84 100644 (file)
--- a/ir/st/exc.h
+++ b/ir/st/exc.h
@@ -1,7 +1,15 @@
-/* Copyright (c) 2002 by Universität Karlsruhe (TH).  All Rights Reserved */
 /*
-* Time-stamp: <Thursday, 19.12.2002, 15:45:43 goetz@i44pc2.info.uni-karlsruhe.de>
-*/
+ * Project:     libFIRM
+ * File name:   ir/st/exc.h
+ * Purpose:     Helper functions for jack exceptions.
+ * Author:      Florian Liekweg
+ * Modified by:
+ * Created:     4.3.2002
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2002-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
+
 
 /**
    NAME
@@ -10,10 +18,6 @@
      Helper functions for exceptions
    S
      not quite complete
-   HISTORY
-     liekweg - Mar 4, 2002: Created.
-   CVS:
-     $Id$
 ***/
 
 # include "irnode.h"

diff --git a/ir/st/st.c b/ir/st/st.c
index 8fa4749..ed7d501 100644 (file)
--- a/ir/st/st.c
+++ b/ir/st/st.c
@@ -1,7 +1,14 @@
-/* Copyright (c) 2002 by Universität Karlsruhe (TH).  All Rights Reserved */
 /*
-* Time-stamp: <Thursday, 31.10.2002, 16:03:00 goetz@i44pc2.info.uni-karlsruhe.de>
-*/
+ * Project:     libFIRM
+ * File name:   ir/st/st.c
+ * Purpose:     Provide some auxilliary structures for firm graphs.
+ * Author:      Florian Liekweg
+ * Modified by:
+ * Created:     26.2.2002
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2002-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 /**
    NAME
@@ -10,10 +17,6 @@
      provide some auxilliary structures for firm graphs.
    S
      not quite complete
-   HISTORY
-     liekweg - Feb 26, 2002: Created.
-   CVS:
-     $Id$
 ***/
 
 #ifdef HAVE_CONFIG_H

diff --git a/ir/st/st.h b/ir/st/st.h
index 309df8a..37c74fd 100644 (file)
--- a/ir/st/st.h
+++ b/ir/st/st.h
@@ -1,5 +1,14 @@
-/* Copyright (c) 2002 by Universitaet Karlsruhe (TH).  All Rights Reserved  */
-
+/*
+ * Project:     libFIRM
+ * File name:   ir/st/st.h
+ * Purpose:     Provide some auxilliary structures for firm graphs.
+ * Author:      Florian Liekweg
+ * Modified by:
+ * Created:     26.2.2002
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2002-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 /**
    @file st.h
 
@@ -11,13 +20,6 @@
      not quite complete
 */
 
-/*
-   HISTORY
-     liekweg - Feb 26, 2002: Created.
-   CVS:
-     $Id$
-*/
-
 # ifndef _ST_H_
 # define _ST_H_
 

diff --git a/ir/tr/Makefile.in b/ir/tr/Makefile.in
index 490c985..8904612 100644 (file)
--- a/ir/tr/Makefile.in
+++ b/ir/tr/Makefile.in
@@ -1,8 +1,13 @@
-# Hey Emacs, this is a -*- makefile -*-
 #
-# libFIRM Project
-#
-# $Id$
+# Project:     libFIRM
+# File name:   ir/tr/Makefile.in
+# Purpose:
+# Author:      Boris Boesler, Till Riedel
+# Modified by:
+# Created:
+# CVS-ID:      $Id$
+# Copyright:   (c) 1999-2003 Universität Karlsruhe
+# Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
 #
 
 top_srcdir := @top_srcdir@
@@ -17,7 +22,7 @@ SOURCES = $(INSTALL_HEADERS)
 
 SOURCES += Makefile.in \
                entity.c entity_t.h mangle.c tpop.c tpop_t.h type.c type_t.h    \
-               typewalk.c typegmod.c typegmod_t.h trvrfy.h trvrfy.c
+               typewalk.c typegmod.c trvrfy.h trvrfy.c
 
 
 include $(topdir)/MakeRules

diff --git a/ir/tr/entity.c b/ir/tr/entity.c
index d67d398..cf61bde 100644 (file)
--- a/ir/tr/entity.c
+++ b/ir/tr/entity.c
@@ -1,11 +1,14 @@
-/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-* All rights reserved.
-*
-* Authors: Martin Trapp, Christian Schaefer
-*
-*/
-
-/* $Id$ */
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/entity.c
+ * Purpose:     Representation of all program known entities.
+ * Author:      Martin Trapp, Christian Schaefer
+ * Modified by: Goetz Lindenmaier
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1998-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 #ifdef HAVE_CONFIG_H
 # include <config.h>
@@ -17,7 +20,7 @@
 
 # include "entity_t.h"
 # include "mangle.h"
-# include "typegmod_t.h"
+# include "typegmod.h"
 # include "array.h"
 /* All this is needed to build the constant node for methods: */
 # include "irprog_t.h"

diff --git a/ir/tr/entity.h b/ir/tr/entity.h
index 0544c70..8d96727 100644 (file)
--- a/ir/tr/entity.h
+++ b/ir/tr/entity.h
@@ -1,8 +1,14 @@
 /*
-*  Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-*  All rights reserved.
-*
-*/
+ * Project:     libFIRM
+ * File name:   ir/tr/entity.h
+ * Purpose:     Representation of all program known entities.
+ * Author:      Martin Trapp, Christian Schaefer
+ * Modified by: Goetz Lindenmaier
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1998-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 /**
 *  @file entity.h

diff --git a/ir/tr/entity_t.h b/ir/tr/entity_t.h
index f57899f..13617ad 100644 (file)
--- a/ir/tr/entity_t.h
+++ b/ir/tr/entity_t.h
@@ -1,7 +1,14 @@
-/*10 2002/03/19 13:08:33
-*  Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-*  All rights reserved.
-*/
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/entity_t.h
+ * Purpose:     Representation of all program known entities -- private header.
+ * Author:      Martin Trapp, Christian Schaefer
+ * Modified by: Goetz Lindenmaier
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1998-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 /**
 * @file entity_t.h
@@ -28,7 +35,6 @@
 *  enclosing procedure.
 */
 
-/* $Id$ */
 
 # ifndef _ENTITY_T_H_
 # define _ENTITY_T_H_

diff --git a/ir/tr/mangle.c b/ir/tr/mangle.c
index 26987d8..9bca822 100644 (file)
--- a/ir/tr/mangle.c
+++ b/ir/tr/mangle.c
@@ -1,11 +1,16 @@
-/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-* All rights reserved.
-*
-* Authors: Martin Trapp, Christian Schaefer
-*
-*/
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/mangle.c
+ * Purpose:     Methods to manipulate names.
+ * Author:      Martin Trapp, Christian Schaefer
+ * Modified by: Goetz Lindenmaier
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1998-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
+
 
-/* $Id$ */
 
 #ifdef HAVE_CONFIG_H
 # include <config.h>
@@ -22,6 +27,13 @@
 
 static struct obstack mangle_obst;
 
+static INLINE ident *
+mangle_type (type *tp)
+{
+  assert (tp->kind == k_type);
+  return tp->name;
+}
+
 ident *
 mangle_entity (entity *ent)
 {
@@ -41,12 +53,6 @@ mangle_entity (entity *ent)
   return res;
 }
 
-ident *
-mangle_type (type *tp)
-{
-  assert (tp->kind == k_type);
-  return tp->name;
-}
 
 /* Returns a new ident that represents firstscnd. */
 ident *mangle (ident *first, ident* scnd) {

diff --git a/ir/tr/mangle.h b/ir/tr/mangle.h
index 4a49f7a..8f3ded8 100644 (file)
--- a/ir/tr/mangle.h
+++ b/ir/tr/mangle.h
@@ -1,34 +1,42 @@
-/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-* All rights reserved.
-*/
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/mangle.h
+ * Purpose:     Methods to manipulate names.
+ * Author:      Martin Trapp, Christian Schaefer
+ * Modified by: Goetz Lindenmaier
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1998-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 /**
 * @file mangle.h
 *
-* FIRM name mangling.
+* FIRM name mangling -- methods to manipulate names.
 *
 * @author Martin Trapp, Christian Schaefer
 */
 
-/* $Id$ */
+#ifndef _MANGLE_H_
+#define _MANGLE_H_
 
 # include "ident.h"
 # include "entity.h"
 # include "type.h"
 
 /** initializes the name mangling code */
-void init_mangle (void);
+void   init_mangle (void);
 
 /** Computes a definite name for this entity by concatenating
    the name of the owner type and the name of the entity with
-   a separating "_". f*/
+   a separating "_". */
 ident *mangle_entity (entity *ent);
 
-/** Sorry, I'm not sure what this does... seems to copy the string. */
-ident *mangle_type   (type *tp);
-
 /** mangle underscore: Returns a new ident that represents first_scnd. */
 ident *mangle_u (ident *first, ident* scnd);
 
 /** mangle: Returns a new ident that represents firstscnd. */
 ident *mangle (ident *first, ident* scnd);
+
+#endif /* _MANGLE_H_ */

diff --git a/ir/tr/tpop.c b/ir/tr/tpop.c
index bcf5dd1..71885e0 100644 (file)
--- a/ir/tr/tpop.c
+++ b/ir/tr/tpop.c
@@ -1,11 +1,15 @@
-/* Copyright (C) 2001 by Universitaet Karlsruhe
-* All rights reserved.
-*
-* Authors: Goetz Lindenmaier
-*
-*/
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/tpop.c
+ * Purpose:     Opcode of types.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2001-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
-/* $Id$ */
 
 #ifdef HAVE_CONFIG_H
 # include <config.h>

diff --git a/ir/tr/tpop.h b/ir/tr/tpop.h
index 63ffcb3..bbd1196 100644 (file)
--- a/ir/tr/tpop.h
+++ b/ir/tr/tpop.h
@@ -1,6 +1,14 @@
-/* (C) 2001 by Universitaet Karlsruhe */
-
-/* $Id$ */
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/tpop.h
+ * Purpose:     Opcode of types.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2001-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 # ifndef _TYPEOP_H_
 # define _TYPEOP_H_

diff --git a/ir/tr/tpop_t.h b/ir/tr/tpop_t.h
index c0a81f1..fe9accc 100644 (file)
--- a/ir/tr/tpop_t.h
+++ b/ir/tr/tpop_t.h
@@ -1,6 +1,15 @@
-/*   (C) 2001 by Universitaet Karlsruhe  */
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/tpop_t.h
+ * Purpose:     Opcode of types -- private header.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2001-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
-/* $Id$ */
 
 # ifndef _TPOP_T_H_
 # define _TPOP_T_H_

diff --git a/ir/tr/trvrfy.c b/ir/tr/trvrfy.c
index 6d9076f..de44d6c 100644 (file)
--- a/ir/tr/trvrfy.c
+++ b/ir/tr/trvrfy.c
@@ -1,3 +1,14 @@
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/trvrfy.c
+ * Purpose:     Check types and entities for correctness.
+ * Author:      Michael Beck, Goetz Lindenmaier
+ * Modified by:
+ * Created:     29.1.2003
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 #include "trvrfy.h"
 #include "irgraph_t.h"  /* for checking whether constant code is allocated

diff --git a/ir/tr/trvrfy.h b/ir/tr/trvrfy.h
index 2d153af..60d57a3 100644 (file)
--- a/ir/tr/trvrfy.h
+++ b/ir/tr/trvrfy.h
@@ -1,3 +1,14 @@
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/trvrfy.h
+ * Purpose:     Check types and entities for correctness.
+ * Author:      Michael Beck, Goetz Lindenmaier
+ * Modified by:
+ * Created:     29.1.2003
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 
 #ifndef TRVRFY_H
@@ -8,13 +19,12 @@
  *
  * Methods to verify the type representations.
  *
- * @author Goetz Lindenmaier
+ * @author Michael Beck, Goetz Lindenmaier
  *
  * Methods to verify the type representations.
  * Copyright 2003 University of Karlsruhe.
  * Created 29.1.2003.
  *
- * $Id$
  */
 
 #include "firm.h"

diff --git a/ir/tr/type.c b/ir/tr/type.c
index 494953d..b41a6ee 100644 (file)
--- a/ir/tr/type.c
+++ b/ir/tr/type.c
@@ -1,9 +1,21 @@
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/type.c
+ * Purpose:     Representation of types.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2001-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
+
 /**
  *
  *   file type.c - implementation of the datastructure to hold
  *   type information.
  *  (C) 2001 by Universitaet Karlsruhe
- *  Martin Trapp, Christian Schaefer, Goetz Lindenmaier
+ *  Goetz Lindenmaier
  *
  *  This module supplies a datastructure to represent all types
  *  known in the compiled program.  This includes types specified
@@ -23,7 +35,6 @@
  * @see  type_t.h type tpop
  */
 
-/* $Id$ */
 #ifdef HAVE_CONFIG_H
 # include <config.h>
 #endif
@@ -35,7 +46,7 @@
 # include "type_t.h"
 # include "tpop_t.h"
 # include "irprog_t.h"
-# include "typegmod_t.h"
+# include "typegmod.h"
 # include "array.h"
 # include "irprog.h"
 # include "mangle.h"

diff --git a/ir/tr/type.h b/ir/tr/type.h
index 9e558fd..dcf43fc 100644 (file)
--- a/ir/tr/type.h
+++ b/ir/tr/type.h
@@ -1,5 +1,13 @@
 /*
- * (C) 2001 by Universitaet Karlsruhe
+ * Project:     libFIRM
+ * File name:   ir/tr/type.h
+ * Purpose:     Representation of types.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2001-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  */
 
 /**
@@ -25,11 +33,9 @@
  *  on the level of the programming language, modes at the level of
  *  the target processor.
  *
- * @see  tpop.h
+ *  @see  tpop.h
  */
 
-/* $Id$ */
-
 # ifndef _TYPE_H_
 # define _TYPE_H_
 

diff --git a/ir/tr/type_or_entity.h b/ir/tr/type_or_entity.h
index 4d3fc76..3e9ac14 100644 (file)
--- a/ir/tr/type_or_entity.h
+++ b/ir/tr/type_or_entity.h
@@ -1,6 +1,14 @@
-/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-* All rights reserved.
-*/
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/type_or_entity.h
+ * Purpose:     Provides a datatype to treat types and entities as the same.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1999-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 /**
  * @file type_or_entity.h
@@ -10,9 +18,6 @@
  * @author Goetz Lindenmaier
  */
 
-/* $Id$ */
-
-
 # ifndef _TYPE_OR_ENTITY_H_
 # define _TYPE_OR_ENTITY_H_
 

diff --git a/ir/tr/type_t.h b/ir/tr/type_t.h
index 42f6d87..db2968e 100644 (file)
--- a/ir/tr/type_t.h
+++ b/ir/tr/type_t.h
@@ -1,9 +1,15 @@
 /*
- * (C) 2001 by Universitaet Karlsruhe
+ * Project:     libFIRM
+ * File name:   ir/tr/type_t.h
+ * Purpose:     Representation of types -- private header.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2001-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  */
 
-/* $Id$ */
-
 # ifndef _TYPE_T_H_
 # define _TYPE_T_H_
 # ifdef HAVE_CONFIG_H

diff --git a/ir/tr/typegmod.c b/ir/tr/typegmod.c
index bc4744a..e5c445f 100644 (file)
--- a/ir/tr/typegmod.c
+++ b/ir/tr/typegmod.c
@@ -1,13 +1,16 @@
-/* Copyright (C) 2001 by Universitaet Karlsruhe
-* All rights reserved.
-*
-* Authors: Goetz Lindenmaier
-*
-*/
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/typegmod.c
+ * Purpose:     Functionality to modify the type graph.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2001-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
-/* $Id$ */
-
-# include "typegmod_t.h"
+# include "typegmod.h"
 # include "type_t.h"
 # include "tpop_t.h"
 # include "irmode.h"
@@ -37,6 +40,7 @@ INLINE void exchange_types(type *old_type, type *new_type) {
 }
 
 INLINE type *skip_tid(type *tp) {
+  /* @@@ implement the self cycle killing trick of skip_id(ir_node *) */
   while (tp->type_op == type_id)
     tp = (type *) tp->mode;
   return tp;

diff --git a/ir/tr/typegmod.h b/ir/tr/typegmod.h
index 38d4683..379025b 100644 (file)
--- a/ir/tr/typegmod.h
+++ b/ir/tr/typegmod.h
@@ -1,12 +1,16 @@
 /*
- * typegmod.h
- *
- * (C) 2001 by Universitaet Karlsruhe
- * Goetz Lindenmaier
- *
- * $Id$
+ * Project:     libFIRM
+ * File name:   ir/tr/typegmod.h
+ * Purpose:     Functionality to modify the type graph.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2001-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  */
 
+
 # ifndef _TYPEGMOD_H_
 # define _TYPEGMOD_H_
 

diff --git a/ir/tr/typegmod_t.h b/ir/tr/typegmod_t.h
deleted file mode 100644 (file)
index 298a879..0000000
--- a/ir/tr/typegmod_t.h
+++ /dev/null
@@ -1,19 +0,0 @@
-/* (C) 2001 by Universitaet Karlsruhe */
-
-/* $Id$ */
-
-# ifndef _TYPEGMOD_T_H_
-# define _TYPEGMOD_T_H_
-
-# include "typegmod.h"
-
-/**
- * @file typegmod_t.h
- *
- *  This module supplies routines that support changing the type graph.
- *
- *  @author Goetz Lindenmaier
- */
-
-
-# endif /*_TYPEGMOD_T_H_ */

diff --git a/ir/tr/typewalk.c b/ir/tr/typewalk.c
index 193c739..e91357a 100644 (file)
--- a/ir/tr/typewalk.c
+++ b/ir/tr/typewalk.c
@@ -1,15 +1,22 @@
-/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-* All rights reserved.
-*
-* Author: Goetz Lindenmaier
-*
-* traverse the type information.  The walker walks the whole ir graph
-* to find the distinct type trees in the type graph forest.
-* - execute the pre function before recursion
-* - execute the post function after recursion
-*/
-
-/* $Id$ */
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/typewalk.c
+ * Purpose:     Traverse the type information.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1999-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
+
+/*
+ * traverse the type information.  The walker walks the whole ir graph
+ * to find the distinct type trees in the type graph forest.
+ * - execute the pre function before recursion
+ * - execute the post function after recursion
+ */
+
 
 #ifdef HAVE_CONFIG_H
 # include <config.h>

diff --git a/ir/tr/typewalk.h b/ir/tr/typewalk.h
index 85ddef0..76cf655 100644 (file)
--- a/ir/tr/typewalk.h
+++ b/ir/tr/typewalk.h
@@ -1,24 +1,27 @@
-/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
-* All rights reserved.
-*/
+/*
+ * Project:     libFIRM
+ * File name:   ir/tr/typewalk.h
+ * Purpose:     Traverse the type information.
+ * Author:      Goetz Lindenmaier
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 1999-2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 /**
-* @file typewalk.h
-*
-* Traverse the type information.
-*
-* @author Goetz Lindenmaier
-*
-* The walker walks the whole ir graph
-* to find the distinct type trees in the type graph forest.
-* - execute the pre() function before recursion
-* - execute the post() function after recursion
-*/
-
-/* $Id$ */
-
-
-/* walk over all type information reachable from the ir graph. */
+ * @file typewalk.h
+ *
+ * Traverse the type information.
+ *
+ * @author Goetz Lindenmaier
+ *
+ * The walker walks the whole ir graph
+ * to find the distinct type trees in the type graph forest.
+ * - execute the pre() function before recursion
+ * - execute the post() function after recursion
+ */
 
 #ifndef _TYPEWALK_H_
 #define _TYPEWALK_H_

diff --git a/ir/tv/Makefile.in b/ir/tv/Makefile.in
index b5edcdd..cf9e679 100644 (file)
--- a/ir/tv/Makefile.in
+++ b/ir/tv/Makefile.in
@@ -1,8 +1,13 @@
-# Hey Emacs, this is a -*- makefile -*-
 #
-# libFIRM Project
-#
-# $Id$
+# Project:     libFIRM
+# File name:   ir/tv/Makefile.in
+# Purpose:
+# Author:      Boris Boesler, Till Riedel
+# Modified by:
+# Created:
+# CVS-ID:      $Id$
+# Copyright:   (c) 1999-2003 Universität Karlsruhe
+# Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
 #
 
 top_srcdir := @top_srcdir@
@@ -18,9 +23,9 @@ SOURCES += Makefile.in tv.c tv_t.h strcalc.c strcalc.h fltcalc.c fltcalc.h
 
 include $(topdir)/MakeRules
 
-CPPFLAGS += -I$(top_srcdir)/ir/common -I$(top_srcdir)/ir/tr -I$(top_srcdir)/ir/adt \
-           -I$(top_srcdir)/ir/ident -I$(top_srcdir)/ir/ir -I$(top_srcdir)/ir/debug \
-           -I$(top_srcdir)/ir/st -I$(top_srcdir)/ir/ana \
+CPPFLAGS += -I$(top_srcdir)/ir/common -I$(top_srcdir)/ir/tr -I$(top_srcdir)/ir/adt   \
+           -I$(top_srcdir)/ir/ident  -I$(top_srcdir)/ir/ir -I$(top_srcdir)/ir/debug \
+           -I$(top_srcdir)/ir/st     -I$(top_srcdir)/ir/ana
 
 tv.o: tv.h tv.c fltcalc.h fltcalc.c strcalc.h strcalc.c
 

diff --git a/ir/tv/fltcalc.c b/ir/tv/fltcalc.c
index b3117ef..77b675d 100644 (file)
--- a/ir/tv/fltcalc.c
+++ b/ir/tv/fltcalc.c
@@ -1,7 +1,16 @@
-/* fltcalc.c
- * Authors: Matthias Heil
+/*
+ * Project:     libFIRM
+ * File name:   ir/tv/fltcalc.c
+ * Purpose:
+ * Author:
+ * Modified by:
+ * Created:     2003
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  */
 
+
 #include "fltcalc.h"
 #include "strcalc.h"
 

diff --git a/ir/tv/fltcalc.h b/ir/tv/fltcalc.h
index 6c45945..448ccd7 100644 (file)
--- a/ir/tv/fltcalc.h
+++ b/ir/tv/fltcalc.h
@@ -1,3 +1,15 @@
+/*
+ * Project:     libFIRM
+ * File name:   ir/tv/fltcalc.h
+ * Purpose:
+ * Author:
+ * Modified by:
+ * Created:     2003
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
+
 #ifndef _FLTCALC_H_
 #define _FLTCALC_H_
 

diff --git a/ir/tv/strcalc.c b/ir/tv/strcalc.c
index e26e622..bd69ca8 100644 (file)
--- a/ir/tv/strcalc.c
+++ b/ir/tv/strcalc.c
@@ -1,10 +1,14 @@
-/****i* strcalc/implementation
- *
- * AUTHORS
- *    Matthias Heil
- *
- * NOTES
- ******/
+/*
+ * Project:     libFIRM
+ * File name:   ir/tv/strcalc.c
+ * Purpose:
+ * Author:      Mathias Heil
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
 #include "strcalc.h"
 

diff --git a/ir/tv/strcalc.h b/ir/tv/strcalc.h
index 7a33ef5..68498dd 100644 (file)
--- a/ir/tv/strcalc.h
+++ b/ir/tv/strcalc.h
@@ -1,19 +1,24 @@
-  /****h* tools/strcalc
- *
- * NAME
- *   strcalc -- calculations using strings
- *   Provides basic mathematical operations on values represented as strings
- *
- * AUTHORS
- *   Matthias Heil
+/*
+ * Project:     libFIRM
+ * File name:   ir/tv/strcalc.h
+ * Purpose:     Provides basic mathematical operations on values represented as strings.
+ * Author:      Mathias Heil
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
+
+/**
+ * @file strcalc.h
  *
- * DESCRIPTION
- *    The module uses a string to represent values, and provides operations
- *   to perform calculations with these values.
- *    Results are stored in an internal buffer, so you have to make a copy
- *   of them if you need to store the result.
+ * The module uses a string to represent values, and provides operations
+ * to perform calculations with these values.
+ * Results are stored in an internal buffer, so you have to make a copy
+ * of them if you need to store the result.
  *
- ******/
+ */
 
 #ifndef _STRCALC_H_
 #define _STRCALC_H_

diff --git a/ir/tv/tv.c b/ir/tv/tv.c
index 518bc8a..7927252 100644 (file)
--- a/ir/tv/tv.c
+++ b/ir/tv/tv.c
@@ -1,17 +1,21 @@
-/* TV --- Target Values, aka Constant Table.
-   Copyright (C) 1995, 1996 Christian von Roques */
-
-/* $Id$ */
+/*
+ * Project:     libFIRM
+ * File name:   ir/tv/tv.c
+ * Purpose:     Representation of and static computations on target machine
+ *              values.
+ * Author:      Mathias Heil
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
-/****i* tv/implementation
- *
- * AUTHORS
- *    Matthias Heil
- *
- * NOTES
+/*
  *    Values are stored in a format depending upon chosen arithmetic
  *    module. Default uses strcalc and fltcalc.
- ******/
+ *
+ */
 
 /* This implementation assumes:
  *  - target has IEEE-754 floating-point arithmetic.  */

diff --git a/ir/tv/tv.h b/ir/tv/tv.h
index e187be1..7b93cf8 100644 (file)
--- a/ir/tv/tv.h
+++ b/ir/tv/tv.h
@@ -1,11 +1,22 @@
+/*
+ * Project:     libFIRM
+ * File name:   ir/tv/tv.h
+ * Purpose:     Representation of and static computations on target machine
+ *              values.
+ * Author:      Mathias Heil
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
+
 /**
  * @file tv.h
  *
  * Declarations for Target Values.
  */
 
-/* $Id$ */
-
 #ifndef _TV_H_
 #define _TV_H_
 

diff --git a/ir/tv/tv_t.h b/ir/tv/tv_t.h
index 1f042ab..8272c78 100644 (file)
--- a/ir/tv/tv_t.h
+++ b/ir/tv/tv_t.h
@@ -1,12 +1,17 @@
-/* Declarations for Target Values. */
+/*
+ * Project:     libFIRM
+ * File name:   ir/tv/tv_t.h
+ * Purpose:     Representation of and static computations on target machine
+ *              values -- private header.
+ * Author:      Mathias Heil
+ * Modified by:
+ * Created:
+ * CVS-ID:      $Id$
+ * Copyright:   (c) 2003 Universität Karlsruhe
+ * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
+ */
 
-/**
-* @file tv_t.h
-*
-* @author Mathias Heil
-*/
 
-/* $Id$ */
 
 #ifndef _TV_T_H_
 #define _TV_T_H_