let rec _Creation_table_hachage_DEFINE arbreSyntaxe =
match arbreSyntaxe with
[] -> []
| ce_module::liste_module_restante ->
match ce_module.modTyp with
(nomModule, _) ->
match ce_module.declar with
[] -> raise Declaration_non_valide
| Var(_)::Assign(_)::Define(liste_define)::_ ->
(_Remplir_Hash_Define nomModule liste_define)
@_Creation_table_hachage_DEFINE liste_module_restante
| _::_ -> _Creation_table_hachage_DEFINE liste_module_restante