diff options
Diffstat (limited to 'example')
| -rw-r--r-- | example/sentence.adb | 8 |
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; |