Bonjour,
J'utilise un langage de haut niveau fortement typé, je désire appeler une fonction A à l'entrée du text "A".
Comment procèderiez- vous ?
 
Le mieux que je saurais faire c'est mettre des type accès à fonction englobé avec un nom et éxécuter la fonction de nom "nom" après recherche du nom.
Merci pour votre aide.

En PHP, on peut faire ça. Mais ça peut être dangereux puisque tu donnes accès à l'utilisateur à pleins de fonctions

Bonjour rufo.
J'écris avec Ada, mais c'est une autre solution que je viens chercher ici si c'est possible de faire autrement.

@localghost
 
Pas compris , peut-tu donner un exemple plus realiste ?
 

Post le code , ça aide .

Je pense qu'il parle d'une sorte de gros switch où, en fonction de la chaîne de caractères rentrée (le nom de la fonction), il appelle la fonction portant le même nom.
 
Mais bon, c'est sûr que ça serait long si y'a beaucoup de fonctions

Je voulais faire ce genre de truc avec du VHDL (proche du ada donc), jamais trouvé mieux que le gros switch

Le but est d'éviter un switch justement.

 
 
Bonjour eroge,
Merci de t'intéresser à mon problème.
Loin d'avoir implémenté la solution, voici un début de spécification avec Ada.

package Libroot.Es.Abstracts is
   
   pragma Pure (Libroot.Es.Abstracts);
   
   type Abstract_Type is abstract tagged null record;
         
end Libroot.Es.Abstracts;

package Libroot.Es.Abstracts.objects is      
   
   type Object_Type is abstract new Abstract_Type with null record;         
   
   type Object_Access is access all Object_Type'Class;
   
   type Variadic_Array_Type is array (Natural range <> ) of Object_Access;
   
   type Procedure_Access is access 
     procedure (Object : in out Object_Type'Class;
                Var    : in Variadic_Array_Type);
      
end Libroot.Es.Abstracts.objects;

package Libroot.Es.Abstracts.Objects.Entries is
   
   type String_Access is access all String;
   
   type Entry_Type is tagged
      record     
         Proc : Procedure_Access;
         Name : String_Access;
      end record;   
end Libroot.Es.Abstracts.Objects.Entries;

Bon, finalement j'ai fait comme j'ai dit.
Ca retourn juste une image de l'objet de type chaîne de character;
Ca donne pas mal, puisque au final j'ai ça pour nimporte quel objet et nimporte quel function :
 

for Entry_Id in Human_Interface.Human_Entries'Range loop
  if Human_Interface.Human_Entries(Entry_Id).Name.all = Predicat then
    Human_Interface.Human_Entries(Entry_Id).Proc (Human_Interface,
                                        Parameters,
                                        Results);
 
    for Result_Id in Results'Range loop                                     
       if Results(Result_Id).all.Initialized then
       Response(Result_Id) := new String ' (Results(Result_Id).all.To_String);
       end if;
    end loop;
    exit;
  end if;
end loop;

 
Merci, si vous avez une autre idée, je suis curieux.

Le projet à la naissance, c'est Cyborg écrit avec Ada est c'est viewable here
Ah oui, c'est un système client/serveur mais je n'ai implémenté que le serveur qui disose d'un client qui permet de passer deux commandes : date et hello ; dans une interface text dans un terminal Gnu/Linux avec un beau cadre qui affiche l'heure en temps réel, et qui scinde une long ligne de commande ou de résultat sur plusieurs lignes dans des cadred, ... Normalement.

Purée, c'est moi, ou Jovalise est revenu ? Dès que je vois des topics avec Ada et des phrases que je ne pige pas, je pense à lui

Tu n'es pas le seul à te faire exactement la même remarque ... Mais le style est un poil différent, je trouve, y compris au niveau de la mise en forme du code (qui était  meilleure (dans mon souvenir) avec l'original )
 
Je vote pour un copycat !

Comment ça meilleurs que mon code ?
Aurais-je transigé avec ma discipline ?

Je parle de la mise en forme sur le forum, pas du code en lui même !

 
 
A+,

C'est bien ce qu'il me semblait... Jovalise, tu as beau changer de pseudo (ça doit bien faire le 3ème), on e reconnais à chaque fois : ton style d'expression est inimitable

Non mais ADA + ce style, c'est inimitable  
 
A+,