public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug ada/16096] New: Illegal program not detected, RM 8.5.4(5)
@ 2004-06-20 11:28 ludovic dot brenta at insalien dot org
  2004-06-20 16:41 ` [Bug ada/16096] " pinskia at gcc dot gnu dot org
                   ` (2 more replies)
  0 siblings, 3 replies; 6+ messages in thread
From: ludovic dot brenta at insalien dot org @ 2004-06-20 11:28 UTC (permalink / raw)
  To: gcc-bugs

--  RM 8.5.4(5)
--  ...the convention of the renamed subprogram shall not be
--  Intrinsic.
with unchecked_deallocation;
procedure Test_248681 is
   generic -- when non generic, we get the expected error
   package pak1 is
      type int_ptr is access integer;
      procedure free(x: in out int_ptr);
   end pak1;

   package body pak1 is
      procedure deallocate is new
        unchecked_deallocation(integer, int_ptr);
      procedure free(x: in out int_ptr) renames
        deallocate;  --ERROR: renaming as body can't rename intrinsic
   end pak1;
begin
   null;
end Test_248681;

I expect:
test_248681.adb:16:09: subprogram used in renaming_as_body cannot be intrinsic
gnatmake: "test_248681.adb" compilation error

But I get nothing.

-- 
           Summary: Illegal program not detected, RM 8.5.4(5)
           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=16096


^ permalink raw reply	[flat|nested] 6+ messages in thread
[parent not found: <bug-16096-4@http.gcc.gnu.org/bugzilla/>]

end of thread, other threads:[~2014-02-27 18:39 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-06-20 11:28 [Bug ada/16096] New: Illegal program not detected, RM 8.5.4(5) ludovic dot brenta at insalien dot org
2004-06-20 16:41 ` [Bug ada/16096] " pinskia at gcc dot gnu dot org
2004-10-29 14:39 ` pinskia at gcc dot gnu dot org
2004-10-29 14:47 ` pinskia at gcc dot gnu dot org
     [not found] <bug-16096-4@http.gcc.gnu.org/bugzilla/>
2011-08-31 11:52 ` nicolas.boulenguez at free dot fr
2014-02-27 18:39 ` nicolas.boulenguez at free dot fr

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