test: evaluate pointers to C99 vla correctly.

gdb/testsuite:
	* gdb.base/vla-ptr.c: New file.
	* gdb.base/vla-ptr.exp: New file.
This commit is contained in:
Sanimir Agovic 2013-11-15 12:47:44 +00:00
parent 1a237e0ee5
commit 024e13b46f
3 changed files with 104 additions and 0 deletions

View File

@ -1,3 +1,8 @@
2014-04-11 Sanimir Agovic <sanimir.agovic@intel.com>
* gdb.base/vla-ptr.c: New file.
* gdb.base/vla-ptr.exp: New file.
2014-04-11 Sanimir Agovic <sanimir.agovic@intel.com>
* gdb.base/vla-multi.c: New file.

View File

@ -0,0 +1,58 @@
/* This testcase is part of GDB, the GNU debugger.
Copyright 2014 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
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>. */
#define SIZE 5
void
foo (int n, int vla_ptr[n])
{
return; /* foo_bp */
}
void
bar (int *vla_ptr)
{
return; /* bar_bp */
}
void
vla_func (int n)
{
int vla[n];
typedef int typedef_vla[n];
typedef_vla td_vla;
int i;
for (i = 0; i < n; i++)
{
vla[i] = 2+i;
td_vla[i] = 4+i;
}
foo(n, vla);
bar(vla);
return; /* vla_func_bp */
}
int
main (void)
{
vla_func(SIZE);
return 0;
}

View File

@ -0,0 +1,41 @@
# Copyright 2014 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
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
standard_testfile
if { [prepare_for_testing ${testfile}.exp ${testfile} ${srcfile}] } {
return -1
}
if ![runto_main] {
return -1
}
set sizeof_int [get_sizeof "int" 4]
# Check that VLA passed to function (pointer) points to the first element.
gdb_breakpoint [gdb_get_line_number "foo_bp"]
gdb_continue_to_breakpoint "foo_bp"
gdb_test "print vla_ptr" "\\\(int \\\*\\\) $hex" "print vla_ptr (foo)"
gdb_test "print *vla_ptr" " = 2" "print *vla_ptr (foo)"
gdb_breakpoint [gdb_get_line_number "bar_bp"]
gdb_continue_to_breakpoint "bar_bp"
gdb_test "print vla_ptr" "\\\(int \\\*\\\) $hex" "print vla_ptr (bar)"
gdb_test "print *vla_ptr" " = 2" "print *vla_ptr (bar)"
gdb_breakpoint [gdb_get_line_number "vla_func_bp"]
gdb_continue_to_breakpoint "vla_func_bp"
gdb_test "print td_vla" " = \\\{4, 5, 6, 7, 8\\\}" "print td_vla"