* testsuite/libdejagnu/tunit.exp: Clean up.

diff --git a/ChangeLog b/ChangeLog
index 48af03b..90ef283 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2016-03-15  Ben Elliston  <bje@gnu.org>
 
+       * testsuite/libdejagnu/tunit.exp: Clean up.
+
+2016-03-15  Ben Elliston  <bje@gnu.org>
+
        * lib/utils.exp (diff): Remove proc.
        * doc/ref.xml: Update documentation.
        * doc/dejagnu.texi: Regenerate.

diff --git a/testsuite/libdejagnu/tunit.exp b/testsuite/libdejagnu/tunit.exp
index 9f94263..ee194e2 100644 (file)
--- a/testsuite/libdejagnu/tunit.exp
+++ b/testsuite/libdejagnu/tunit.exp
@@ -19,29 +19,6 @@
 
 load_lib "dejagnu.exp"
 
-# Uncomment these for debugging help
-#strace $tracelevel
-# exp_internal -f dbg.log 1
-
-# Get the size of the module being tested.
-set sizes [exe_size "unit"]
-if {[lindex $sizes 0] == "-1"} {
-    perror "Couldn't get the object file size" 0
-}
-
-# Extract the text section size
-set textsize [lindex $sizes 0]
-
-# Extract the data section size
-set datasize [lindex $sizes 1]
-
-# FIXME: This ultimately needs to be recorded in the testing database,
-# which doesn't exist yet. Till then it's kinda bogus, but I figured
-# it would be useful having working code to get this data. So we print
-# it out, just for the demo aspects.
-verbose "Text section size of proctor is 0x$textsize"
-verbose "Data section size of proctor is 0x$datasize"
-
 # Execute the test case, and analyse the output
 if { [host_execute "unit"] != "" } {
     perror "unit had an execution error" 0