* lib/ada.exp (gdb_compile_ada): Fix typo.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 30883204b648e8b90e3ca3e1bd5cde5411b03e6f..b3b398cc46172eacd9167ca10ae0e210dc9cac88 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2016-01-21  Doug Evans  <dje@google.com>
+
+       * lib/ada.exp (gdb_compile_ada): Fix typo.
+
 2016-01-21  Joel Brobecker  <brobecker@adacore.com>
 
        * gdb.base/break-fun-addr.exp: New file.

diff --git a/gdb/testsuite/lib/ada.exp b/gdb/testsuite/lib/ada.exp
index 66dfad2a065d801ddedebf670c4b2d88566e3dc6..01f30082899a970fa4886a0fd025b24b4f3373e9 100644 (file)
--- a/gdb/testsuite/lib/ada.exp
+++ b/gdb/testsuite/lib/ada.exp
@@ -45,7 +45,7 @@ proc gdb_compile_ada {source dest type options} {
     append options " additional_flags=-I$srcdir"
 
     set result [target_compile_ada_from_dir \
-                    $objdir [file tail $source] $dest $type $options]]
+                    $objdir [file tail $source] $dest $type $options]
 
     # The Ada build always produces some output, even when the build
     # succeeds. Thus, we can not use the output the same way we do in