From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,ba4120618164eac4,start
X-Google-Attributes: gid103376,public
From: Recep Inal <ri@ddci.dk>
Subject: discriminant dependent entry families
Date: 1997/04/09
Message-ID: <334B9F4B.35E9@ddci.dk>#1/1
X-Deja-AN: 234513049
Sender: usenet@ddci.dk
X-Nntp-Posting-Host: sparc6
Organization: DDC-I
Newsgroups: comp.lang.ada
Date: 1997-04-09T00:00:00+00:00
List-Id: <comp.lang.ada>


Greetings,

Following program piece causes a crash at compile-time when using GNAT 3.09.

-----------------------------------------
   task type Tsk( D : Integer ) is
      entry Ent( 1 .. D );
   end Tsk;
   
   task body Tsk is
   begin
      null;
   end Tsk;
--------------------------------------------

Following message appears:

+===========================GNAT BUG DETECTED==============================+
| No source file position information available                            |
| Please submit bug report by email to report@gnat.com                     |
| Use a subject line meaningful to you and us to track the bug             |
| Include full sources in ASCII in a format compatible with gnatchop       |
| First line of sources must be marked by an Ada -- comment line           |
| Last line of sources must be last line of email message (no signature!)  |
| See gnatinfo.txt file for more info on procedure for submitting bugs     |
| 3.09 (970121) (sparc-sun-sunos4.1.3) Gigi abort, Code=116                |
+==========================================================================+

Is it a well-known problem, that is under correction?

Regards,

Recep Inal