let rec _Creation_table_hachage_VAR arbreSyntaxe =
match arbreSyntaxe with
[] -> []
| ce_module::liste_module_restante ->
match ce_module.modTyp with
(nomModule, _) ->
match ce_module.declar with
[] -> []
| Var(liste_variable)::_ ->
(_Remplir_Hash_Var nomModule liste_variable)
@_Creation_table_hachage_VAR liste_module_restante
| _::_ -> raise Declaration_non_valide