Re: troubles learning OOP: expected type "Parent.Some_Child", found type Parent'Class

["Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>]

On 13/02/2018 12:28, Simon Wright wrote:
> Mehdi Saada <00120260a@gmail.com> writes:
> 
>> case ELEMENT is
>> when '(' => V_LOCAL (I) := new T_TOKEN_PARENTHESE'(La_Parenthese => '(');
>> when ')' => V_LOCAL (I) := new T_TOKEN_PARENTHESE'(La_Parenthese => ')');
>> when ';' => V_LOCAL (I) := new T_TOKEN_TERMINATEUR'(Le_Terminateur => ';');
>> when '+' | '-' | '*' | '/' =>
>>    V_LOCAL (I) := new T_Token_Operateur'(L_Operateur => T_Operateur'Value (STRING'(1 => ELEMENT)));
> 
> Well, I would make T_TOKEN contain the first and last indices of the
> token in the input string if it'll still be available,

Right. A source location object would be even better. Actually there is 
no need to keep tokens anywhere because the corresponding lexical calls 
can de done immediately.

> Of course that wouldn't cover what to
> do with numeric or operator tokens. Or those parentheses.

These do not apply to tokens anyway, it is too early to decide at the 
lexical analyze stage. Literals and names/calls/indices come later when 
all tokens are already gone.

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de