diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index f1ce47e82c3..885f405d346 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2013-07-16  Tom Tromey  <tromey@redhat.com>
+
+	* gdb.ada/info_types.exp: Use standard_testfile.
+
 2013-07-16  Tom Tromey  <tromey@redhat.com>
 
 	* gdb.mi/mi-basics.exp: Use standard_output_file.
diff --git a/gdb/testsuite/gdb.ada/info_types.exp b/gdb/testsuite/gdb.ada/info_types.exp
index b2c9df97c94..cf6bbe16af3 100644
--- a/gdb/testsuite/gdb.ada/info_types.exp
+++ b/gdb/testsuite/gdb.ada/info_types.exp
@@ -13,8 +13,8 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-set testfile info_types
-set srcfile ${testfile}.c
+standard_testfile .c
+
 if { [prepare_for_testing ${testfile}.exp ${testfile} ${srcfile}] } {
     return -1
 }