Imported Upstream version 7.9

[platform/upstream/gdb.git] / gdb / testsuite / gdb.base / permissions.exp

diff --git a/gdb/testsuite/gdb.base/permissions.exp b/gdb/testsuite/gdb.base/permissions.exp
index 9930674..970a0e3 100644 (file)
--- a/gdb/testsuite/gdb.base/permissions.exp
+++ b/gdb/testsuite/gdb.base/permissions.exp
@@ -1,4 +1,4 @@
-# Copyright 2010-2012 Free Software Foundation, Inc.
+# Copyright 2010-2015 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
@@ -18,14 +18,13 @@
 # The permissions flags are only fully functional with stubs or targets
 # that can run asynchronously.
 
-set testfile permission
-set srcfile start.c
-set binfile ${objdir}/${subdir}/${testfile}
+standard_testfile start.c
 
-if  { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug nowarnings}] != "" } {
-     untested permissions.exp
-     return -1
-    }
+if {[build_executable $testfile.exp $testfile \
+        $srcfile {debug nowarnings}] == -1} {
+    untested $testfile.exp
+    return -1
+}
 
 if [get_compiler_info] {
     return -1