Index: gdb/system-gdbinit/wrs-linux.py |
diff --git a/gdb/testsuite/gdb.ada/ptype_arith_binop.exp b/gdb/system-gdbinit/wrs-linux.py |
similarity index 63% |
copy from gdb/testsuite/gdb.ada/ptype_arith_binop.exp |
copy to gdb/system-gdbinit/wrs-linux.py |
index 75d381291f35cc40b60acd4dff047de319450f61..5571e668eb3ff85059d417043820b68e8ff07cc1 100644 |
--- a/gdb/testsuite/gdb.ada/ptype_arith_binop.exp |
+++ b/gdb/system-gdbinit/wrs-linux.py |
@@ -1,5 +1,5 @@ |
-# Copyright 2009-2012 Free Software Foundation, Inc. |
-# |
+# Copyright (C) 2011-2013 Free Software Foundation, Inc. |
+ |
# This program is free software; you can redistribute it and/or modify |
# it under the terms of the GNU General Public License as published by |
# the Free Software Foundation; either version 3 of the License, or |
@@ -13,19 +13,13 @@ |
# You should have received a copy of the GNU General Public License |
# along with this program. If not, see <http://www.gnu.org/licenses/>. |
-gdb_exit |
-gdb_start |
-gdb_reinitialize_dir $srcdir/$subdir |
- |
-gdb_test_no_output "set lang ada" \ |
- "set lang ada" |
- |
-gdb_test "ptype 3 * 2.0" \ |
- "= <\[0-9\]+-byte float>" \ |
- "ptype 3 * 2.0" |
+"""Configure GDB using the WRS/Linux environment.""" |
-gdb_test "ptype 3 / 2.0" \ |
- "= <\[0-9\]+-byte float>" \ |
- "ptype 3 / 2.0" |
+import os |
+if 'ENV_PREFIX' in os.environ: |
+ gdb.execute('set sysroot %s' % os.environ['ENV_PREFIX']) |
+else: |
+ print "warning: ENV_PREFIX environment variable missing." |
+ print "The debugger will probably be unable to find the correct system libraries" |