Searched refs:Callable_Nodes (Results 1 – 4 of 4) sorted by relevance
89 subtype Callable_Nodes is GS_Node_Kinds range subtype92 subtype Subprogram_Nodes is Callable_Nodes range A_Procedure .. A_Function;93 subtype Protected_Subprogram_Nodes is Callable_Nodes range
626 pragma Assert (GS_Node_Kind (N) in Callable_Nodes);951 pragma Assert (GS_Node_Kind (N) in Callable_Nodes);961 pragma Assert (GS_Node_Kind (N) in Callable_Nodes);2010 pragma Assert (GS_Node_Kind (N) in Callable_Nodes);2043 pragma Assert (GS_Node_Kind (N) in Callable_Nodes);
707 return GS_Node_Kind (N) in Callable_Nodes;884 if GS_Node_Kind (N) in Callable_Nodes then1166 if New_Node.Node_Kind in Callable_Nodes then
116 pragma Assert (Present (N) and then GS_Node_Kind (N) in Callable_Nodes);