Ignore:
Timestamp:
Nov 10, 2014, 4:26:09 PM (6 years ago)
Author:
Maxim Reznik
Message:

Implement more Asis queries

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ada-2012/src/parser/gela-nodes-fixed_operator_symbols.adb

    r323 r324  
    2222   is
    2323      use type Gela.Lexical_Types.Symbol;
     24      Comp    : constant Gela.Compilations.Compilation_Access :=
     25        Self.Enclosing_Compilation;
     26      Token : constant Gela.Lexical_Types.Token :=
     27        Comp.Get_Token (Self.Operator_Symbol_Token);
    2428   begin
    25       if Self.Full_Name = Gela.Lexical_Types.No_Symbol then
     29      if Token.Symbol = Gela.Lexical_Types.No_Symbol then
    2630         Visiter.String_Literal (Self);
    2731      else
Note: See TracChangeset for help on using the changeset viewer.