Re: Serial port configuration

[hreba <hreba@terra.com.br>]

On 04/06/2014 03:57 PM, Simon Wright wrote:
> hreba <hreba@terra.com.br> writes:
>
>> package body SerAux is
>>
>>     type Port_Data is new int;
>>     type Port_Data_Access is access Port_Data;
>>     type Port is new Ada.Streams.Root_Stream_Type with record
>>        H : Port_Data_Access;
>>     end record;
>
> The declaration of type Port needs to be in the spec; and you need to
> have the spec of Read there also.
>
>>     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?).

Thanks for the hints.
>
> In fact, why not just copy the contents of the GNAT version and change
> the bits you need to?
>
This might not be the most elegant solution, but the one with the least 
effort. I think I'll try that.
-- 
hreba