summaryrefslogtreecommitdiff
path: root/example
diff options
context:
space:
mode:
Diffstat (limited to 'example')
-rw-r--r--example/sentence.adb8
1 files changed, 7 insertions, 1 deletions
diff --git a/example/sentence.adb b/example/sentence.adb
index f522b5f..5270d3a 100644
--- a/example/sentence.adb
+++ b/example/sentence.adb
@@ -115,12 +115,18 @@ begin
Put_Line ("Lexer token output:");
for T of Lexed_Tokens loop
- Put (My_Rat.Lexer_Traits.Tokens.Debug_String (T));
+ Put (My_Rat.Lexer_Tokens.Debug_String (T));
end loop;
New_Line;
Put_Line ("Parser graph output:");
Put_Line (My_Rat.Parse_Graphs.Debug_String (Result_Graph));
+ New_Line;
+
+ Put_Line ("Root tokens:");
+ for T of Result_Graph.Root_Elements loop
+ Put (My_Rat.Parser_Tokens.Debug_String (T));
+ end loop;
end Sentence;