OpenE2K/binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

test: multi-dimensional c99 vla.

Browse Source 
gdb/testsuite:
	* gdb.base/vla-multi.c: New file.
	* gdb.base/vla-multi.exp: New file.
This commit is contained in:
Sanimir Agovic 2013-11-15 12:47:32 +00:00
parent 504f34326e
commit 1a237e0ee5
3 changed files with 94 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/testsuite/ChangeLog
View File

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

48
gdb/testsuite/gdb.base/vla-multi.c Normal file
View File

@ -0,0 +1,48 @@
/* 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/>. */
void
f1 (int n, int m, int vla_ptr[n][m])
{
return; /* f1_breakpoint */
}
void
vla_mult (int n, int m)
{
int vla[n][m];
int i, j;
for (i = 0; i < n; i++)
{
for (j = 0; j < m; j++)
{
vla[i][j] = i + j;
}
}
f1(n, m, vla); /* vla_filled */
return;
}
int
main(void)
{
vla_mult(2, 2);
return 0;
}

41
gdb/testsuite/gdb.base/vla-multi.exp Normal file
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]
gdb_breakpoint [gdb_get_line_number "vla_filled"]
gdb_continue_to_breakpoint "vla_filled"
gdb_test "print vla" " = \\\{\\\{0, 1\\\}, \\\{1, 2\\\}\\\}" \
"print vla"
gdb_test "print vla\[0\]\[1\]" " = 1" "print vla\[0\]\[1\]"
gdb_breakpoint [gdb_get_line_number "f1_breakpoint"]
gdb_continue_to_breakpoint "f1_breakpoint"
# Calculate the overall size of the vla.
set sizeof_vla [ expr "2" * "$sizeof_int" ]
gdb_test "ptype &vla_ptr" \
"type = int \\\(\\\*\\\*\\\)\\\[variable length\\\]" \
"ptype &vla_ptr"