* [rfa/testsuite] add test embryo for lang = minimal
@ 2003-05-22 0:13 Joel Brobecker
2003-05-22 13:53 ` Elena Zannoni
0 siblings, 1 reply; 6+ messages in thread
From: Joel Brobecker @ 2003-05-22 0:13 UTC (permalink / raw)
To: gdb-patches
[-- Attachment #1: Type: text/plain, Size: 406 bytes --]
Hello Elena,
here is a first shot at a small testcase for the minimal language
support. I am not sure exactly what kind of tests you wanted to do,
so I started with something small, which we can then expand at will
with more specific tests. What do you think?
2003-05-21 J. Brobecker <brobecker@gnat.com>
* gdb.base/minimal.c: New file.
* gdb.base/minimal.exp: New testcase.
--
Joel
[-- Attachment #2: minimal.c --]
[-- Type: text/plain, Size: 37 bytes --]
int
main (int argc, char **argv)
{
}
[-- Attachment #3: minimal.exp --]
[-- Type: text/plain, Size: 1594 bytes --]
# Copyright 2003 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 2 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, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# This is a test for the ``minimal'' language support.
if $tracelevel then {
strace $tracelevel
}
set testfile "minimal"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-w}] != "" } {
gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
}
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
if ![runto_main] then {
fail "Can't run to main"
return 0
}
gdb_test "set lang minimal" \
"Warning: the current language does not match this frame." \
"set lang to minimal"
# Make sure that even in minimal language support, we can print the
# value of a variable/parameter
gdb_test "print argc" " = 1" "print argc"
^ permalink raw reply [flat|nested] 6+ messages in thread* Re: [rfa/testsuite] add test embryo for lang = minimal
2003-05-22 0:13 [rfa/testsuite] add test embryo for lang = minimal Joel Brobecker
@ 2003-05-22 13:53 ` Elena Zannoni
2003-05-23 0:45 ` Joel Brobecker
0 siblings, 1 reply; 6+ messages in thread
From: Elena Zannoni @ 2003-05-22 13:53 UTC (permalink / raw)
To: Joel Brobecker; +Cc: gdb-patches
Joel Brobecker writes:
> Hello Elena,
>
> here is a first shot at a small testcase for the minimal language
> support. I am not sure exactly what kind of tests you wanted to do,
> so I started with something small, which we can then expand at will
> with more specific tests. What do you think?
>
Hmmm, it's ok, I wonder if it could be folded into langs.exp? Also,
default.exp, setshow.exp, help.exp have language tests that should
probably be updated including the minimal language.
elena
> 2003-05-21 J. Brobecker <brobecker@gnat.com>
>
> * gdb.base/minimal.c: New file.
> * gdb.base/minimal.exp: New testcase.
>
> --
> Joel
> int
> main (int argc, char **argv)
> {
> }
> # Copyright 2003 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 2 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, write to the Free Software
> # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
>
> # This is a test for the ``minimal'' language support.
>
> if $tracelevel then {
> strace $tracelevel
> }
>
> set testfile "minimal"
> set srcfile ${testfile}.c
> set binfile ${objdir}/${subdir}/${testfile}
>
> if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-w}] != "" } {
> gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
> }
>
> gdb_exit
> gdb_start
> gdb_reinitialize_dir $srcdir/$subdir
> gdb_load ${binfile}
>
> if ![runto_main] then {
> fail "Can't run to main"
> return 0
> }
>
> gdb_test "set lang minimal" \
> "Warning: the current language does not match this frame." \
> "set lang to minimal"
>
> # Make sure that even in minimal language support, we can print the
> # value of a variable/parameter
> gdb_test "print argc" " = 1" "print argc"
^ permalink raw reply [flat|nested] 6+ messages in thread* Re: [rfa/testsuite] add test embryo for lang = minimal
2003-05-22 13:53 ` Elena Zannoni
@ 2003-05-23 0:45 ` Joel Brobecker
2003-06-13 0:00 ` Joel Brobecker
0 siblings, 1 reply; 6+ messages in thread
From: Joel Brobecker @ 2003-05-23 0:45 UTC (permalink / raw)
To: Elena Zannoni; +Cc: gdb-patches
[-- Attachment #1: Type: text/plain, Size: 473 bytes --]
> Hmmm, it's ok, I wonder if it could be folded into langs.exp? Also,
> default.exp, setshow.exp, help.exp have language tests that should
> probably be updated including the minimal language.
Is the attached better? (merged the minimal.exp test into langs.exp).
I will be looking at setshow, default, and help momentarily.
2003-05-22 J. Brobecker <brobecker@gnat.com>
* gdb.base/langs.exp: Add some tests for the "minimal" language
support
--
Joel
[-- Attachment #2: langs.exp.diff --]
[-- Type: text/plain, Size: 728 bytes --]
Index: langs.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/langs.exp,v
retrieving revision 1.1.1.2
diff -u -r1.1.1.2 langs.exp
--- langs.exp 28 Jun 1999 16:03:20 -0000 1.1.1.2
+++ langs.exp 23 May 2003 00:41:29 -0000
@@ -145,5 +145,20 @@
}
}
+gdb_exit
+gdb_start
+gdb_reinitialize_dir $srcdir/$subdir
+gdb_load $binfile
+
+# Try exercising the "minimal" language a bit...
+
+if [runto csub] then {
+ gdb_test "set lang minimal" \
+ "Warning: the current language does not match this frame." \
+ "set lang to minimal"
+
+ gdb_test "print x" " = 5000" "print parameter value"
+}
+
set timeout $oldtimeout
return 0
^ permalink raw reply [flat|nested] 6+ messages in thread* Re: [rfa/testsuite] add test embryo for lang = minimal
2003-05-23 0:45 ` Joel Brobecker
@ 2003-06-13 0:00 ` Joel Brobecker
2003-06-23 19:48 ` Elena Zannoni
0 siblings, 1 reply; 6+ messages in thread
From: Joel Brobecker @ 2003-06-13 0:00 UTC (permalink / raw)
To: Elena Zannoni; +Cc: gdb-patches
Ping?
On Thu, May 22, 2003 at 05:45:19PM -0700, Joel Brobecker wrote:
> > Hmmm, it's ok, I wonder if it could be folded into langs.exp? Also,
> > default.exp, setshow.exp, help.exp have language tests that should
> > probably be updated including the minimal language.
>
> Is the attached better? (merged the minimal.exp test into langs.exp).
> I will be looking at setshow, default, and help momentarily.
>
> 2003-05-22 J. Brobecker <brobecker@gnat.com>
>
> * gdb.base/langs.exp: Add some tests for the "minimal" language
> support
>
> --
> Joel
> Index: langs.exp
> ===================================================================
> RCS file: /cvs/src/src/gdb/testsuite/gdb.base/langs.exp,v
> retrieving revision 1.1.1.2
> diff -u -r1.1.1.2 langs.exp
> --- langs.exp 28 Jun 1999 16:03:20 -0000 1.1.1.2
> +++ langs.exp 23 May 2003 00:41:29 -0000
> @@ -145,5 +145,20 @@
> }
> }
>
> +gdb_exit
> +gdb_start
> +gdb_reinitialize_dir $srcdir/$subdir
> +gdb_load $binfile
> +
> +# Try exercising the "minimal" language a bit...
> +
> +if [runto csub] then {
> + gdb_test "set lang minimal" \
> + "Warning: the current language does not match this frame." \
> + "set lang to minimal"
> +
> + gdb_test "print x" " = 5000" "print parameter value"
> +}
> +
> set timeout $oldtimeout
> return 0
--
Joel
^ permalink raw reply [flat|nested] 6+ messages in thread* Re: [rfa/testsuite] add test embryo for lang = minimal
2003-06-13 0:00 ` Joel Brobecker
@ 2003-06-23 19:48 ` Elena Zannoni
2003-06-23 23:41 ` Joel Brobecker
0 siblings, 1 reply; 6+ messages in thread
From: Elena Zannoni @ 2003-06-23 19:48 UTC (permalink / raw)
To: Joel Brobecker; +Cc: Elena Zannoni, gdb-patches
Joel Brobecker writes:
> Ping?
whoops. yes. Branch as well.
elena
>
> On Thu, May 22, 2003 at 05:45:19PM -0700, Joel Brobecker wrote:
> > > Hmmm, it's ok, I wonder if it could be folded into langs.exp? Also,
> > > default.exp, setshow.exp, help.exp have language tests that should
> > > probably be updated including the minimal language.
> >
> > Is the attached better? (merged the minimal.exp test into langs.exp).
> > I will be looking at setshow, default, and help momentarily.
> >
> > 2003-05-22 J. Brobecker <brobecker@gnat.com>
> >
> > * gdb.base/langs.exp: Add some tests for the "minimal" language
> > support
> >
> > --
> > Joel
>
> > Index: langs.exp
> > ===================================================================
> > RCS file: /cvs/src/src/gdb/testsuite/gdb.base/langs.exp,v
> > retrieving revision 1.1.1.2
> > diff -u -r1.1.1.2 langs.exp
> > --- langs.exp 28 Jun 1999 16:03:20 -0000 1.1.1.2
> > +++ langs.exp 23 May 2003 00:41:29 -0000
> > @@ -145,5 +145,20 @@
> > }
> > }
> >
> > +gdb_exit
> > +gdb_start
> > +gdb_reinitialize_dir $srcdir/$subdir
> > +gdb_load $binfile
> > +
> > +# Try exercising the "minimal" language a bit...
> > +
> > +if [runto csub] then {
> > + gdb_test "set lang minimal" \
> > + "Warning: the current language does not match this frame." \
> > + "set lang to minimal"
> > +
> > + gdb_test "print x" " = 5000" "print parameter value"
> > +}
> > +
> > set timeout $oldtimeout
> > return 0
>
>
> --
> Joel
^ permalink raw reply [flat|nested] 6+ messages in thread
end of thread, other threads:[~2003-06-23 23:41 UTC | newest]
Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2003-05-22 0:13 [rfa/testsuite] add test embryo for lang = minimal Joel Brobecker
2003-05-22 13:53 ` Elena Zannoni
2003-05-23 0:45 ` Joel Brobecker
2003-06-13 0:00 ` Joel Brobecker
2003-06-23 19:48 ` Elena Zannoni
2003-06-23 23:41 ` Joel Brobecker
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox