GDB copyright headers update after running GDB's copyright.py script.
[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.base / argv0-symlink.exp
index e4efe19d784ad6f32b0d8edc7457e5144b7746bc..cbd37fbbead8a87312f2c31dba8b0963bc491632 100644 (file)
@@ -1,4 +1,4 @@
-# Copyright 2013 Free Software Foundation, Inc.
+# Copyright 2013-2016 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
@@ -15,6 +15,8 @@
 
 standard_testfile
 
+set has_argv0 [gdb_has_argv0]
+
 if { [build_executable ${testfile}.exp ${testfile} ${srcfile}] == -1 } {
     return -1
 }
@@ -36,7 +38,14 @@ if ![runto_main] {
     return -1
 }
 
-gdb_test {print argv[0]} "/$filelink\"" $test
+gdb_test_no_output "set print repeats 10000"
+gdb_test_no_output "set print elements 10000"
+
+if { $has_argv0 } {
+    gdb_test {print argv[0]} "/$filelink\"" $test
+} else {
+    unsupported $test
+}
 
 # For a link named /PATH/TO/DIR/LINK, we want to check the output
 # against "/DIR/LINK", but computed in a way that doesn't make
@@ -67,9 +76,17 @@ if ![runto_main] {
     return -1
 }
 
-# gdbserver does not have this issue.
-if ![is_remote target] {
-    setup_kfail "*-*-*" gdb/15934
+gdb_test_no_output "set print repeats 10000"
+gdb_test_no_output "set print elements 10000"
+
+if { $has_argv0 } {
+    # gdbserver does not have this issue.
+    if ![is_remote target] {
+       setup_kfail "*-*-*" gdb/15934
+    }
+    gdb_test {print argv[0]} "/$dirlink/$filelink\"" $test
+} else {
+    unsupported $test
 }
-gdb_test {print argv[0]} "/$dirlink/$filelink\"" $test
+
 gdb_test "info inferiors" "/$lastdir/$filelink *" "$test for info inferiors"
This page took 0.027052 seconds and 4 git commands to generate.