public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug ada/15805] New: Illegal program not detected, allows writing through access to constant
@ 2004-06-03 19:18 ludovic dot brenta at insalien dot org
  2004-10-12  3:59 ` [Bug ada/15805] " pinskia at gcc dot gnu dot org
                   ` (2 more replies)
  0 siblings, 3 replies; 7+ messages in thread
From: ludovic dot brenta at insalien dot org @ 2004-06-03 19:18 UTC (permalink / raw)
  To: gcc-bugs

(Debian bug #246387)

with text_io;
procedure Test_246387 is

   c: aliased constant integer := 3;

   type const_ptr is access constant integer;
   cp : const_ptr := c'access;

   procedure inc(var_ptr: access integer := cp) is
   begin
      var_ptr.all := var_ptr.all + 1;
   end inc;

begin
   text_io.put_line(integer'image(cp.all));
   inc;
   text_io.put_line(integer'image(cp.all));
end Test_246387;


I expect:
test_246387.adb:9:44: incompatible types; expected "access integer", received
"const_ptr"

But I get nothing.

-- 
           Summary: Illegal program not detected, allows writing through
                    access to constant
           Product: gcc
           Version: 3.4.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: ada
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: ludovic dot brenta at insalien dot org
                CC: gcc-bugs at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=15805


^ permalink raw reply	[flat|nested] 7+ messages in thread

end of thread, other threads:[~2007-12-13 17:59 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
     [not found] <bug-15805-286@http.gcc.gnu.org/bugzilla/>
2007-11-26 23:51 ` [Bug ada/15805] Illegal program not detected, allows writing through access to constant sam at gcc dot gnu dot org
2007-12-07 14:35 ` sam at gcc dot gnu dot org
2007-12-07 14:39 ` sam at gcc dot gnu dot org
2007-12-13 17:59 ` charlet at gcc dot gnu dot org
2004-06-03 19:18 [Bug ada/15805] New: " ludovic dot brenta at insalien dot org
2004-10-12  3:59 ` [Bug ada/15805] " pinskia at gcc dot gnu dot org
2004-10-29 13:24 ` pinskia at gcc dot gnu dot org
2004-10-29 14:47 ` pinskia at gcc dot gnu dot org

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).