Mac LAK.
___________________________________________________
Ne prenez pas la vie trop au sérieux, de toutes façons, vous n'en sortirez pas vivant.
Sources et composants Delphi sur mon site, L'antre du Lak.
Pas de question technique par MP : posez-la dans un nouveau sujet, sur le forum adéquat.
Rejoignez-nous sur : ► Serveur de fichiers [NAS] ► Le Tableau de bord projets ► Le groupe de travail ICMO
Alors tu as un problème : le modificateur "Access" a été rajouté en Ada95 justement pour pallier ce manque, cela définit un "pointeur sur"... En clair, c'est un type de données, c'est donc compatible avec les fonctions.
Si ça ne marche pas chez toi, c'est anormal.
Mac LAK.
___________________________________________________
Ne prenez pas la vie trop au sérieux, de toutes façons, vous n'en sortirez pas vivant.
Sources et composants Delphi sur mon site, L'antre du Lak.
Pas de question technique par MP : posez-la dans un nouveau sujet, sur le forum adéquat.
Rejoignez-nous sur : ► Serveur de fichiers [NAS] ► Le Tableau de bord projets ► Le groupe de travail ICMO
C'est donc vrai qu'en Ada vieux, une "fonction" ne peut rien faire d'autre que retourner une valeur, tandis qu'une "procédure" peut tout faire sauf ça?
Bien joué le DoD...
PS: Est-ce qu'une fonction peut avoir des effets de bord, ou au moins appeler une procédure?
SVP, pas de questions techniques par MP. Surtout si je ne vous ai jamais parlé avant.
"Aw, come on, who would be so stupid as to insert a cast to make an error go away without actually fixing the error?"
Apparently everyone. -- Raymond Chen.
Traduction obligatoire: "Oh, voyons, qui serait assez stupide pour mettre un cast pour faire disparaitre un message d'erreur sans vraiment corriger l'erreur?" - Apparemment, tout le monde. -- Raymond Chen.
Tu peux lui passer une adresse, c'était la technique utilisée en Ada83 pour obtenir ce comportement... Par exemple :Mais bon, c'est assez sale quand même. Le modificateur "Access" en Ada95 permet d'éviter ce genre de bidouille.
Code Ada : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Function Truc ( PParameter : In System.Address ) Return Machin Is LocalParameter : Bidule ; For LocalParameter'Address Use PParameter ; Begin ....
Et, bien sûr, tu peux appeler des procédures au sein d'une fonction sans soucis.
Et bien débrouilles-toi seul, alors, vu que tu le prends sur ce ton, que veux-tu ?
Mac LAK.
___________________________________________________
Ne prenez pas la vie trop au sérieux, de toutes façons, vous n'en sortirez pas vivant.
Sources et composants Delphi sur mon site, L'antre du Lak.
Pas de question technique par MP : posez-la dans un nouveau sujet, sur le forum adéquat.
Rejoignez-nous sur : ► Serveur de fichiers [NAS] ► Le Tableau de bord projets ► Le groupe de travail ICMO
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager