OSDN Git Service

* testsuite/lib/libstdc++.exp (libstdc++_exit): New proc.
authorrearnsha <rearnsha@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 7 Oct 2004 22:00:29 +0000 (22:00 +0000)
committerrearnsha <rearnsha@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 7 Oct 2004 22:00:29 +0000 (22:00 +0000)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88710 138bc75d-0d04-0410-961f-82ee72b054a4

libstdc++-v3/ChangeLog
libstdc++-v3/testsuite/lib/libstdc++.exp

index dd5eb2f..4ff8dcd 100644 (file)
@@ -1,3 +1,7 @@
+2004-10-07  Richard Earnshaw  <rearnsha@arm.com>
+
+       * testsuite/lib/libstdc++.exp (libstdc++_exit): New proc.
+
 2004-10-07  Roger Sayle  <roger@eyesopen.com>
 
        PR libstdc++/17850
index 2e8db1f..6394307 100644 (file)
@@ -212,6 +212,15 @@ proc libstdc++_init { testfile } {
     libstdc++_maybe_build_wrapper "${objdir}/testglue.o"
 }
 
+proc libstdc++_exit { } {
+    global gluefile;
+
+    if [info exists gluefile] {
+       file_on_build delete $gluefile;
+       unset gluefile;
+    }
+}
+
 # Callback from system dg-test.
 proc libstdc++-dg-test { prog do_what extra_tool_flags } {
     # Set up the compiler flags, based on what we're going to do.