libjava.exp (bytecompile_file): Log compile command.

2004-01-09  Andrew Haley  <aph@redhat.com>

	* lib/libjava.exp (bytecompile_file): Log compile command.

From-SVN: r75593

diff --git a/libjava/testsuite/ChangeLog b/libjava/testsuite/ChangeLog
index 02eab407c58b225bdcd4c38d0fce84eb4f61cc88..d1394c5482741864daba02373faaaa9394165b6c 100644 (file)
--- a/libjava/testsuite/ChangeLog
+++ b/libjava/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2004-01-09  Andrew Haley  <aph@redhat.com>
+
+       * lib/libjava.exp (bytecompile_file): Log compile command.
+
 2004-01-07  Andreas Tobler  <a.tobler@schweiz.ch>
 
        PR libgcj/13011:

diff --git a/libjava/testsuite/lib/libjava.exp b/libjava/testsuite/lib/libjava.exp
index 9ae18821b1cc3a0a66c366b4fac368efd01a8203..3f55f7665680d851d1de24e45f4f555d9ea3d8ee 100644 (file)
--- a/libjava/testsuite/lib/libjava.exp
+++ b/libjava/testsuite/lib/libjava.exp
@@ -109,10 +109,11 @@ proc bytecompile_file { file objdir {classpath {}} } {
     }
     set here [pwd]
     cd $dirname
+    send_log "byte compile: $javac [list $file] -d $objdir 2>@ stdout\n"
     if {[catch {
        set q [eval exec "$javac [list $file] -d $objdir 2>@ stdout"]
     } msg]} then {
-       verbose "couldn't compile $file: $msg"
+       send_log "couldn't compile $file: $msg\n"
        set r 0
     } else {
        set r 1