diff options
Diffstat (limited to 'src/packrat-graphs.ads')
| -rw-r--r-- | src/packrat-graphs.ads | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/packrat-graphs.ads b/src/packrat-graphs.ads index 877be3a..0ef298e 100644 --- a/src/packrat-graphs.ads +++ b/src/packrat-graphs.ads @@ -33,7 +33,7 @@ package Packrat.Graphs is - No_Position : constant Cursor; + No_Position : constant My_Interfaces.Cursor'Class; Empty_Graph : constant Parse_Graph; @@ -339,7 +339,8 @@ private No_Node : constant Node := (My_Interfaces.Node with null record); - No_Position : constant Cursor := (My_Interfaces.Cursor with null record); + No_Position_Actual : constant Cursor := (My_Interfaces.Cursor with null record); + No_Position : constant My_Interfaces.Cursor'Class := No_Position_Actual; Empty_Graph : constant Parse_Graph := (My_Interfaces.Graph with null record); |