diff --git a/ChangeLog b/ChangeLog
index e9404f91a..21806c622 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2001-06-20  Martin Grabmueller  <mgrabmue@cs.tu-berlin.de>
+
+	* libguile.h: Removed inclusion of libguile/tag.h.
+
 2001-06-16  Marius Vollmer  <mvo@zagadka.ping.de>
 
 	* libguile.h (scm_cond_t, scm_key_t, scm_mutex_t): Only define
diff --git a/libguile.h b/libguile.h
index c5fc73387..cb7d3bfca 100644
--- a/libguile.h
+++ b/libguile.h
@@ -122,7 +122,6 @@ extern "C" {
 #include "libguile/strports.h"
 #include "libguile/struct.h"
 #include "libguile/symbols.h"
-#include "libguile/tag.h"
 #include "libguile/tags.h"
 #include "libguile/throw.h"
 #include "libguile/unif.h"
diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 311be7248..7e7a47703 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,13 @@
+2001-06-20  Martin Grabmueller  <mgrabmue@cs.tu-berlin.de>
+
+	* init.c (scm_init_guile_1): Removed initialization of tag.c.
+
+	* gdbint.c, init.c: Removed inclusion of tag.h.
+
+	* tag.h, tag.c: Removed files.
+
+	* Makefile.am: Removed tag.{h,c,doc,x} in various places.
+
 2001-06-20  Gary Houston  <ghouston@arglist.com>
 
 	* deprecation.c, extensions.c, rw.c: include string.h.
diff --git a/libguile/Makefile.am b/libguile/Makefile.am
index 5badd240a..e8d0ab4a5 100644
--- a/libguile/Makefile.am
+++ b/libguile/Makefile.am
@@ -51,7 +51,7 @@ libguile_la_SOURCES = alist.c arbiters.c async.c backtrace.c boolean.c	    \
     options.c pairs.c ports.c print.c procprop.c procs.c properties.c	    \
     random.c rdelim.c read.c root.c rw.c scmsigs.c script.c simpos.c smob.c \
     sort.c srcprop.c stackchk.c stacks.c stime.c strings.c strop.c	    \
-    strorder.c strports.c struct.c symbols.c tag.c throw.c values.c	    \
+    strorder.c strports.c struct.c symbols.c throw.c values.c 		    \
     variable.c vectors.c version.c vports.c weaks.c symbols-deprecated.c
 
 DOT_X_FILES = alist.x arbiters.x async.x backtrace.x boolean.x chars.x	  \
@@ -65,7 +65,7 @@ DOT_X_FILES = alist.x arbiters.x async.x backtrace.x boolean.x chars.x	  \
     procprop.x procs.x properties.x random.x rdelim.x read.x root.x rw.x  \
     scmsigs.x script.x simpos.x smob.x sort.x srcprop.x			  \
     stackchk.x stacks.x stime.x strings.x strop.x strorder.x strports.x	  \
-    struct.x symbols.x tag.x throw.x values.x variable.x vectors.x	  \
+    struct.x symbols.x throw.x values.x variable.x vectors.x		  \
     version.x vports.x weaks.x symbols-deprecated.x
 
 EXTRA_DOT_X_FILES = @EXTRA_DOT_X_FILES@
@@ -82,7 +82,7 @@ DOT_DOC_FILES = alist.doc arbiters.doc async.doc backtrace.doc		    \
     procs.doc properties.doc random.doc rdelim.doc read.doc root.doc rw.doc \
     scmsigs.doc script.doc simpos.doc smob.doc sort.doc			    \
     srcprop.doc stackchk.doc stacks.doc stime.doc strings.doc strop.doc	    \
-    strorder.doc strports.doc struct.doc symbols.doc tag.doc throw.doc	    \
+    strorder.doc strports.doc struct.doc symbols.doc throw.doc		    \
     values.doc variable.doc vectors.doc version.doc vports.doc weaks.doc    \
     symbols-deprecated.doc
 
@@ -134,7 +134,7 @@ modinclude_HEADERS = __scm.h alist.h arbiters.h async.h backtrace.h boolean.h \
     regex-posix.h print.h procprop.h procs.h properties.h random.h ramap.h    \
     rdelim.h read.h root.h rw.h scmsigs.h validate.h script.h simpos.h smob.h \
     snarf.h socket.h sort.h srcprop.h stackchk.h stacks.h stime.h strings.h   \
-    strop.h strorder.h strports.h struct.h symbols.h tag.h tags.h threads.h   \
+    strop.h strorder.h strports.h struct.h symbols.h tags.h threads.h	      \
     throw.h unif.h values.h variable.h vectors.h version.h vports.h weaks.h
 
 ## This file is generated at configure time.  That is why it is DATA
diff --git a/libguile/gdbint.c b/libguile/gdbint.c
index 1f69ff2b2..afb649e0d 100644
--- a/libguile/gdbint.c
+++ b/libguile/gdbint.c
@@ -55,7 +55,6 @@
 #include <unistd.h>
 #endif
 
-#include "libguile/tag.h"
 #include "libguile/strports.h"
 #include "libguile/read.h"
 #include "libguile/eval.h"
diff --git a/libguile/init.c b/libguile/init.c
index 97c8a67a1..9aefedcd5 100644
--- a/libguile/init.c
+++ b/libguile/init.c
@@ -132,7 +132,6 @@
 #include "libguile/strports.h"
 #include "libguile/struct.h"
 #include "libguile/symbols.h"
-#include "libguile/tag.h"
 #include "libguile/throw.h"
 #include "libguile/unif.h"
 #include "libguile/values.h"
@@ -548,7 +547,6 @@ scm_init_guile_1 (SCM_STACKITEM *base)
   scm_init_struct ();   /* Requires strings */
   scm_init_stacks ();   /* Requires strings, struct */
   scm_init_symbols ();
-  scm_init_tag ();
   scm_init_values ();   /* Requires struct */
   scm_init_load ();     /* Requires strings */
   scm_init_objects ();	/* Requires struct */
diff --git a/libguile/tag.c b/libguile/tag.c
deleted file mode 100644
index e69de29bb..000000000
diff --git a/libguile/tag.h b/libguile/tag.h
deleted file mode 100644
index e69de29bb..000000000