[PATCH] testsuite: Fix send_log ""

[Bernhard Reutner-Fischer]

Fixes:
Running target unix
Using ./testsuite/../config/base-config.exp as tool-and-target-specific
interface file.
Using ./config/unix.exp as generic interface file for target.
Using ./testsuite/config/default.exp as tool-and-target-specific
interface file.
Running ./testsuite/libdejagnu/tunit.exp ...
Running ./testsuite/runtest.all/libs.exp ...
FAIL: clone_output(pass) without all_flag set
FAIL: clone_output(unresolved) without all_flag set
FAIL: clone_output(unsupported) without all_flag set
FAIL: clone_output(untested) without all_flag set
Running ./testsuite/runtest.all/options.exp ...
Running ./testsuite/runtest.all/stats-sub.exp ...
Running ./testsuite/runtest.all/stats.exp ...

                ===  Summary ===

 # of expected passes           62
 # of unexpected failures       4
make[1]: *** [check-DEJAGNU] Error 1
make[1]: Leaving directory `/scratch/src/dejagnu.mine'

which all complain about:
CMD(lib_pat_test) was: clone_output "PASS: Foo"
RESULT(lib_pat_test) was: "wrong # args: should be "send_log msg"" for pattern 
"".
FAILED: clone_output(pass) without all_flag set
FAIL: clone_output(pass) without all_flag set

ChangeLog:

2013-06-11  Bernhard Reutner-Fischer  <address@hidden>

        * testsuite/runtest.all/default_procs.tcl (send_log): Use va_args.
---
 testsuite/runtest.all/default_procs.tcl |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/testsuite/runtest.all/default_procs.tcl 
b/testsuite/runtest.all/default_procs.tcl
index 8a42dfb..c3358b3 100644
--- a/testsuite/runtest.all/default_procs.tcl
+++ b/testsuite/runtest.all/default_procs.tcl
@@ -16,7 +16,7 @@ proc lib_pat_test { cmd arg pattern } {
        return 0
     }
 }
-       
+
 # this tests a proc for a returned value
 proc lib_ret_test { cmd arg val } {
     catch "$cmd \"$arg\"" result
@@ -58,7 +58,7 @@ proc run_tests { tests } {
     }
 }
 
-proc send_log { msg } {
+proc send_log { args } {
     # this is just a stub for testing
 }
 
-- 
1.7.10.4