removed the two attributes, 'label lab' and 'bool used' , from the tarval struct...

[r16]

diff --git a/ir/tv/Makefile b/ir/tv/Makefile
index f8acba8..4518b37 100644 (file)
--- a/ir/tv/Makefile
+++ b/ir/tv/Makefile
@@ -22,8 +22,6 @@ SHELL       = /bin/sh
 MAKE        = /usr/bin/make
 
 MEMBERS         = tv.m
-# CS-hac
-# label.m
 
 CFILES = $(MEMBERS:.m=.c)
 

diff --git a/ir/tv/tv.c b/ir/tv/tv.c
index 5967526..dec1956 100644 (file)
--- a/ir/tv/tv.c
+++ b/ir/tv/tv.c
@@ -1593,35 +1593,6 @@ tarval_print (XP_PAR1, const xprintf_info *info ATTRIBUTE((unused)), XP_PARN)
   return printed;
 }
 
-\f
-/* Labeling of tarvals */
-// CS-hac
-/*
-label
-tarval_label (tarval *tv)
-{
-  if (!tv->lab) {
-    tv->lab = new_label();
-    tv->used = 1;
-  }
-  return tv->lab;
-}
-
-
-void
-tarval_forall_labeled (int (*f) (tarval *, void *), void *data)
-{
-  tarval *tv;
-
-  for (tv = pset_first (tarvals);  tv;  tv = pset_next (tarvals)) {
-    if (tv->lab && f (tv, data)) {
-      pset_break (tarvals);
-      return;
-    }
-  }
-}
-*/
-
 ir_mode *
 get_tv_mode (tarval *tv)
 {

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