Partage
  • Partager sur Facebook
  • Partager sur Twitter

[ADA] erreur: definition de procedure impossible

erreur rencontre en utilisant les container de la librairie standard

    12 mars 2024 à 10:11:22

    bonjour,

    je suis nouveau en ada et je me suis confronte a un probleme durant la creation d'un projet personel

    le compilateur me donne ce message d'erreur:

    headmaker.adb:38:38: error: no selector "addToHeader" for type "sourceFile" defined at process.ads:6
    process.ads:18:19: error: this primitive operation is declared too late

    Et voila le code problematique:

    process.ads:

    with Ada.Containers.Doubly_Linked_Lists;
    with Ada.Strings.Unbounded;
    use Ada.Strings.Unbounded;
    
    package Process is
            type sourceFile is tagged record
                    prototypes: Unbounded_String;
                    header: Unbounded_String;
                    has_header: Boolean := False;
            end record;
    
            function headName(self: in out sourceFile; line: String) return Boolean;
            procedure getPrototype(self: in out sourceFile; line: String);
            procedure processFile(self: in out sourceFile; path: String);
    
            package sourceList is new Ada.Containers.Doubly_Linked_Lists(process.sourceFile);
    
            procedure addToHeader(headers: in out sourceList.List; self: sourceFile);
    end Process;



    merci d'avance pour vos reponses


    -
    Edité par TidianDelage1 12 mars 2024 à 10:12:02

    • Partager sur Facebook
    • Partager sur Twitter
      2 juin 2024 à 18:54:15

      Bonjour,

      je pense qu'en déclarant le paquetage sourcelist après la déclaration du type sourcefile, tu a des chances.

      -
      Edité par DeGirardiManuel 2 juin 2024 à 18:55:14

      • Partager sur Facebook
      • Partager sur Twitter

      [ADA] erreur: definition de procedure impossible

      × Après avoir cliqué sur "Répondre" vous serez invité à vous connecter pour que votre message soit publié.
      • Editeur
      • Markdown