Mirror of the gdb-patches mailing list
 help / color / mirror / Atom feed
* [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

* Re: [rfa/testsuite] add test embryo for lang = minimal
  2003-06-23 19:48       ` Elena Zannoni
@ 2003-06-23 23:41         ` Joel Brobecker
  0 siblings, 0 replies; 6+ messages in thread
From: Joel Brobecker @ 2003-06-23 23:41 UTC (permalink / raw)
  To: Elena Zannoni; +Cc: gdb-patches

>  > > 2003-05-22  J. Brobecker  <brobecker@gnat.com>
>  > > 
>  > >         * gdb.base/langs.exp: Add some tests for the "minimal" language
>  > >         support
>  > > 
> whoops. yes. Branch as well.

Thank you. Committed, branch and mainline.

-- 
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