1
2
3
4
5
6
7
8
9
|
-- Generated at 2014-05-31 15:03:28 +0000 by Natools.Static_Hash_Maps
-- from natools-static_hash_maps-s_expressions-hash_maps.sx
private package Natools.Static_Hash_Maps.S_Expressions.Command_Maps is
function To_Package_Command (Key : String) return Package_Command;
function To_Map_Command (Key : String) return Map_Command;
private
|
|
|
|
1
2
3
4
5
6
7
8
9
|
-- Generated at 2014-11-09 20:46:38 +0000 by Natools.Static_Hash_Maps
-- from src/natools-static_hash_maps-s_expressions-hash_maps.sx
private package Natools.Static_Hash_Maps.S_Expressions.Command_Maps is
function To_Package_Command (Key : String) return Package_Command;
function To_Map_Command (Key : String) return Map_Command;
private
|
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
Extra_Declarations,
Private_Child,
Public_Child,
Pure_Package,
Preelaborate_Package,
Test_Function);
Map_2_Key_0 : aliased constant String := "hash-package";
Map_2_Key_1 : aliased constant String := "nodes";
Map_2_Key_2 : aliased constant String := "function";
Map_2_Key_3 : aliased constant String := "not-found";
Map_2_Keys : constant array (0 .. 3) of access constant String
:= (Map_2_Key_0'Access,
Map_2_Key_1'Access,
Map_2_Key_2'Access,
Map_2_Key_3'Access);
Map_2_Elements : constant array (0 .. 3) of Map_Command
:= (Hash_Package,
Nodes,
Function_Name,
Not_Found);
end Natools.Static_Hash_Maps.S_Expressions.Command_Maps;
|
|
|
|
|
>
>
>
>
|
|
>
>
>
>
|
>
>
>
>
|
|
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
Extra_Declarations,
Private_Child,
Public_Child,
Pure_Package,
Preelaborate_Package,
Test_Function);
Map_2_Key_0 : aliased constant String := "definite";
Map_2_Key_1 : aliased constant String := "definite-elements";
Map_2_Key_2 : aliased constant String := "indefinite";
Map_2_Key_3 : aliased constant String := "indefinite-elements";
Map_2_Key_4 : aliased constant String := "hash-package";
Map_2_Key_5 : aliased constant String := "nodes";
Map_2_Key_6 : aliased constant String := "function";
Map_2_Key_7 : aliased constant String := "not-found";
Map_2_Keys : constant array (0 .. 7) of access constant String
:= (Map_2_Key_0'Access,
Map_2_Key_1'Access,
Map_2_Key_2'Access,
Map_2_Key_3'Access,
Map_2_Key_4'Access,
Map_2_Key_5'Access,
Map_2_Key_6'Access,
Map_2_Key_7'Access);
Map_2_Elements : constant array (0 .. 7) of Map_Command
:= (Definite_Elements,
Definite_Elements,
Indefinite_Elements,
Indefinite_Elements,
Hash_Package,
Nodes,
Function_Name,
Not_Found);
end Natools.Static_Hash_Maps.S_Expressions.Command_Maps;
|