*** empty log message ***

[r12]

diff --git a/Changes b/Changes
index a9f63ce..7070690 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,3 +1,23 @@
+  31.5.2000 Chris
+  Removed some files from the archive, after dependences and usage are checked.
+  - 'ir/common/strerror.c'
+  was nowhere used;
+  - 'ir/ident/xx_ident.h'
+  an empty file, only included by 'ident.c', but never used;
+  - 'ir/tv/label.c' and
+  - 'ir/tv/label.h'
+  contained a numeric counter;
+  The files were included in 'tv.h' and implemented in the 'tarval struct'.
+  but this attribute was never used. the two functions 'tarval_label' and
+  'tarval_forall_labeled' were also never used. In the old fiasco compiler,
+  the label thing is used in the backend. Search for 'babil' to see the usage.
+
+  26.5.2000 Chris
+  Moved the 'new_ir_node' constructor from ircons.* to irnode.* and fixed
+  afterwards some recursive includes, so libfirm works again.
+
+*** Goetz has to complete this lines - several changes are not annotated
+
   15.2.2000 Goetz
   Added access routine to attribute link of irnode in irnode.ch.
   Added get_negated_pnc to irnode.ch.

diff --git a/ir/common/Makefile b/ir/common/Makefile
index d401ff3..2a2ae32 100644 (file)
--- a/ir/common/Makefile
+++ b/ir/common/Makefile
@@ -37,7 +37,6 @@ OFILES = $(MEMBERS:%.m=../objects/%.o)
 OFILES +=  ../objects/xfprintf.o \
           ../objects/xgprintf.o \
           ../objects/xoprintf.o \
-          ../objects/strerror.o
 
 DFILES = $(MEMBERS:.m=.d)
 

diff --git a/ir/tv/Makefile b/ir/tv/Makefile
index ce3ad51..f8acba8 100644 (file)
--- a/ir/tv/Makefile
+++ b/ir/tv/Makefile
@@ -21,7 +21,9 @@ X_INCLUDES  =
 SHELL       = /bin/sh
 MAKE        = /usr/bin/make
 
-MEMBERS         = tv.m label.m
+MEMBERS         = tv.m
+# CS-hac
+# label.m
 
 CFILES = $(MEMBERS:.m=.c)
 

diff --git a/ir/tv/tv.c b/ir/tv/tv.c
index 25e79e7..8b0a428 100644 (file)
--- a/ir/tv/tv.c
+++ b/ir/tv/tv.c
@@ -1622,7 +1622,8 @@ tarval_print (XP_PAR1, const xprintf_info *info ATTRIBUTE((unused)), XP_PARN)
 
 \f
 /* Labeling of tarvals */
-
+// CS-hac
+/*
 label
 tarval_label (tarval *tv)
 {
@@ -1646,7 +1647,7 @@ tarval_forall_labeled (int (*f) (tarval *, void *), void *data)
     }
   }
 }
-
+*/
 
 ir_mode *
 get_tv_mode (tarval *tv)

diff --git a/ir/tv/tv.h b/ir/tv/tv.h
index fbe4f6e..7f39326 100644 (file)
--- a/ir/tv/tv.h
+++ b/ir/tv/tv.h
@@ -6,7 +6,8 @@
 
 # include "irmode.h"
 # include "entity.h"
-# include "label.h"
+// CS-hac
+//# include "label.h"
 # include "xprintf.h"
 
 typedef struct tarval tarval;
@@ -50,9 +51,11 @@ struct tarval {
     tarval_B B;                        /* universal bits */
     tarval_s s;                        /* string */
   } u;
-  label lab;                   /* value's label in the constant segment */
+  // CS-hac
+  //  label lab;                       /* value's label in the constant segment */
   ir_mode *mode;
-  bool used;                   /* labeled tv is used (default) */
+  // CS-hac
+  //  bool used;                       /* labeled tv is used (default) */
 };
 
 extern tarval *tarval_bad;
@@ -138,8 +141,9 @@ long tarval_ord (tarval *, int *fail);
 int tarval_print (XP_PAR1, const xprintf_info *, XP_PARN);
 
 /* Labeling of tarvals */
-label tarval_label (tarval *);
-void tarval_forall_labeled (int (*) (tarval *, void *), void *);
+// CS-hac
+//label tarval_label (tarval *);
+//void tarval_forall_labeled (int (*) (tarval *, void *), void *);
 
 
 /* return a mode-specific value */