diff options
Diffstat (limited to 'src/packrat-parse_graphs.adb')
-rw-r--r-- | src/packrat-parse_graphs.adb | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/src/packrat-parse_graphs.adb b/src/packrat-parse_graphs.adb index 16b74dc..c911fb4 100644 --- a/src/packrat-parse_graphs.adb +++ b/src/packrat-parse_graphs.adb @@ -232,6 +232,22 @@ package body Packrat.Parse_Graphs is + function Is_Ambiguous + (Container : in Parse_Graph) + return Boolean is + begin + for N of Container.Nodes loop + if Finish_List (Container, N)'Length > 1 then + return True; + end if; + end loop; + return False; + end Is_Ambiguous; + + + + + function Vector_To_Array (Input : in Type_Vectors.Vector) return Array_Type is |