Re: Odd error with access to derived types

[A. Imran <me5@privacy.net>]

Thank you for looking at the code.  Here is the error message:

~> gnatmake test
gcc -c test.adb
parent-child.ads:10:09: "derived_access" conflicts with declaration at
line 6
gnatmake: "test.adb" compilation error


Relevant lines from parent-child.ads:

     6		type derived_access is access all derived_type;

    10		type derived_type is new base_type with record
    11			dummy : boolean;
    12		end record;

Complete code:

package parent is

	task type a_task;

	type base_type is abstract tagged limited record
		dummy_task : a_task;
	end record;

end parent;



package parent.child is

	type derived_type is new base_type with private;

	type derived_access is access all derived_type;

private

	type derived_type is new base_type with record
		dummy : boolean;
	end record;

end parent.child;


The driver I use to compile the code:

with parent;
with parent.child;

procedure test is
begin
	null;
end test;