source: trunk/ada-2012/src/parser/gela-nodes-fixed_operator_symbols.adb@ 322

Last change on this file since 322 was 322, checked in by Maxim Reznik, 6 years ago

Add String_Literal node

File size: 632 bytes
Line 
1package body Gela.Nodes.Fixed_Operator_Symbols is
2
3 --------------------------
4 -- String_Literal_Token --
5 --------------------------
6
7 overriding function String_Literal_Token
8 (Self : Operator_Symbol)
9 return Gela.Lexical_Types.Token_Count
10 is
11 begin
12 return Self.Operator_Symbol_Token;
13 end String_Literal_Token;
14
15 -----------
16 -- Visit --
17 -----------
18
19 overriding procedure Visit
20 (Self : access Operator_Symbol;
21 Visiter : in out Gela.Element_Visiters.Visiter'Class)
22 is
23 begin
24 Visiter.Operator_Symbol (Self);
25 end Visit;
26
27end Gela.Nodes.Fixed_Operator_Symbols;
Note: See TracBrowser for help on using the repository browser.