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,36c3031bc861026a,start
X-Google-Attributes: gid103376,public
From: Jocelyn H�bert <felix@odyssee.net>
Subject: Help GNAT 3.05 Compiler Message
Date: 1996/10/18
Message-ID: <326825DF.614D@odyssee.net>#1/1
X-Deja-AN: 190395380
content-type: text/plain; charset=us-ascii
organization: Odyssee Internet
mime-version: 1.0
newsgroups: comp.lang.ada
x-mailer: Mozilla 2.02 (Win16; I)
Date: 1996-10-18T00:00:00+00:00
List-Id: <comp.lang.ada>


Hi!
	I want to put pointer to a list that is instantiated from a generic package into 
a record, the list type is declared private in the generic package. When I compile the 
following code I get the error message "subtype mark require in this context", I am new 
to Ada and do not understand this message. If anyone has any suggestion please send them 
at my E-mail address. Thanks in advance!

	 10. WITH Generic_Lists;
	 11. 
	 12. PACKAGE Priority_List IS
	 13. 
	 14.  
	 15.  -- exported types
	 16. 
	 17.  TYPE Pos IS PRIVATE;
	 18.  TYPE Priority IS PRIVATE;
	 19.  
	 20.  
	 21. PRIVATE
	 22.     TYPE Process IS RECORD
	 23.        Num_Priority :  Integer;
	 24.        Num_Process  :  Integer;
	 25.      END RECORD;
	 26.      
	 27.  
	 28.  PACKAGE Process_List IS NEW Generic_Lists( ElementType => Process);
	 29.  
	 30. 
	 31. 
	 32.  TYPE Node;
	 33.  TYPE Pos IS ACCESS Node;
	 34.  TYPE Ptr_Process IS ACCESS Process_List;
											
	  |
		  >>> subtype mark required in this context

	 35.  
	 36.     
	 37.  TYPE Node IS RECORD
	 38.        Priority : Integer;
	 39.        Process  : Ptr_Process;
	 40.        Link     : Pos;
	 41.      END RECORD;
	 42.      
	 43.  TYPE Priority IS RECORD
	 44.        Head  : Pos;
	 45.        Tail  : Pos;
	 46.      END RECORD;
	 47.      
	 48. END Priority_List;
	 49.     
	 50.        
	 51.  

 51 lines:

Jocelyn Hebert, felix@odyssee.net