Package AdaDoc_Tree.List
Author
Julien Burdy & Vincent Decorges
Date
10.4.02
Description
Management of the tree (Tree structure and operations)
File name
: adadoc_tree-list.ads
Definitions
Quick access :
Clauses
-
Generics
-
Definitions
-
Subprograms
Types
Name
Declaration
Node_Type
private
The type Node is public because the package offer
function to find an element from a certain node in the list
Node_Ptr_Type
private
Tree_Type
limited private
Subprograms
Quick access :
Clauses
-
Generics
-
Definitions
-
Subprograms
Insert
procedure
Purpose : Insert a node to the parse tree
in out : Tree : The parse tree
in : Object : the content of the node
Parameter name
Type
Mode
Default
Tree
Tree_Type
in out
Object
Object_Token_Ptr
in
Is_Empty
function
Return
Boolean
Purpose : Return true if the list is empty
in : Tree : The parse tree
return : Boolean
Parameter name
Type
Mode
Default
Tree
Tree_Type
in
Exist
function
Return
Boolean
Purpose : Return true if a Tag_Name object exist in the tree
in : Tree : The parse tree
in : Tag_Name : The tag of the type
return : Boolean
Parameter name
Type
Mode
Default
Tree
Tree_Type
in
Tag_Name
String
in
Exist
function
Return
Boolean
Purpose : Return true if a Tag_Name object exist in the tree
in : Node : The node to begin
in : Tag_Name : The tag of the type
return : Boolean
Parameter name
Type
Mode
Default
Node
Node_Ptr_Type
in
Tag_Name
String
in
Find_Next
procedure
Purpose : Return a pointer on the object to find
or null if not find
in : Tree : The parse tree
in : Tag_Name : First search criteria
out : Object found. Null if not found
Parameter name
Type
Mode
Default
Tree
Tree_Type
in out
Tag_Name
String
in
Object
Object_Token_Ptr
out
Find_Next
procedure
Purpose : Return a pointer on the object to find
or null if not find
in : Tree : The parse tree
in : Tag_Name : First search criteria
in : Tag_Name2 : Second search criteria
out : Object found. Null if not found
Parameter name
Type
Mode
Default
Tree
Tree_Type
in out
Tag_Name
String
in
Tag_Name2
String
in
Object
Object_Token_Ptr
out
Empty
procedure
Purpose : Free the list
in out : Tree : The parse tree
Parameter name
Type
Mode
Default
Tree
Tree_Type
in out