Re: Serial port configuration

[Shark8 <OneWingedShark@gmail.com>]

On 06-Apr-14 12:57, Simon Wright wrote:
>> >    overriding procedure Read
>> >      (--Port   : in out Serial_Port;
>> >       Port   : in out Port;
> You can't use the name Port twice like that. I'd suggest using
> Serial_Port for the type name, like the original (why change?).

You can use the same name as the type if you fully qualify it:

Generic
   Type Element(<>) is private;
   Maximum_Size : Positive:=  1024;
Package Stack_Package is
   type Stack is private;

   Function Pop( Stack : Stack_Package.Stack ) return Element;

End;