comp.lang.ada
 help / color / mirror / Atom feed
From: Samuel Tardieu <sam@rfc1149.net>
Subject: Re: GCC 4.4.0 Postcondition oddity.
Date: Mon, 06 Jul 2009 19:15:23 +0200
Date: 2009-07-06T19:20:01+02:00	[thread overview]
Message-ID: <87tz1pohqs.fsf@willow.rfc1149.net> (raw)
In-Reply-To: 7d651e73-09f9-49ed-a665-b5943e2c41e8@h2g2000yqg.googlegroups.com

>>>>> "xorque" == xorque  <xorquewasp@googlemail.com> writes:

xorque> Looks like I'll be filing a bug report...

Out of curiosity, what does the output of "gcc -gnatadg" look like?

Here, it is: (with a recent FSF GCC)

% gcc -c -gnatadg p.adb
with system.system__assertions;

package body p is

   procedure p__x (a : out natural) is

      procedure p__x___postconditions is
      begin
         if not (a >= 10) then
            $system__assertions__raise_assert_failure (
              "Postcondition failed at p.ads:4");
         end if;
         return;
      end p__x___postconditions;
   begin
      a := 20;
      p__x___postconditions;
      return;
   end p__x;
begin
   null;
end p;



  parent reply	other threads:[~2009-07-06 17:15 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2009-07-04 12:27 GCC 4.4.0 Postcondition oddity xorque
2009-07-06 12:15 ` xorque
2009-07-06 12:39   ` Georg Bauhaus
2009-07-06 13:45     ` xorque
2009-07-06 15:46       ` Tero Koskinen
2009-07-06 17:15       ` Samuel Tardieu [this message]
2009-07-06 21:25         ` xorque
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox