From d47921b9571cdd0e0ac1456a9209b48e48c4e317 Mon Sep 17 00:00:00 2001
From: Jan Kratochvil <jan.kratochvil@redhat.com>
Date: Sat, 2 Feb 2013 09:12:10 +0000
Subject: [PATCH] gdb/testsuite/ 	* lib/java.exp
 (compile_java_from_source): Initialize ARGS as a list.

---
 gdb/testsuite/ChangeLog    | 4 ++++
 gdb/testsuite/lib/java.exp | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 8fc13fe066f..176ac036773 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2013-02-02  Jan Kratochvil  <jan.kratochvil@redhat.com>
+
+	* lib/java.exp (compile_java_from_source): Initialize ARGS as a list.
+
 2013-02-01  Jan Kratochvil  <jan.kratochvil@redhat.com>
 
 	* gdb.base/gnu-debugdata.exp): Create ${binfile}.debug,
diff --git a/gdb/testsuite/lib/java.exp b/gdb/testsuite/lib/java.exp
index bd24c25dff6..1434e10c92f 100644
--- a/gdb/testsuite/lib/java.exp
+++ b/gdb/testsuite/lib/java.exp
@@ -93,7 +93,7 @@ proc compile_java_from_source { srcfile binfile compile_args } {
 
     if { $java_initialized != 1 } { java_init }
 
-    set args "compiler=$GCJ_UNDER_TEST"
+    set args [list "compiler=$GCJ_UNDER_TEST"]
     lappend args "additional_flags=--main=[file rootname [file tail $srcfile]]"
     if { $compile_args != "" } {
 	lappend args "additional_flags=$compile_args"