Discussion :

[barry_mohamed91]

Bonjour,
Je suis débutant , je viens d'écrire le paquettage ci -dessous

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
 
 
                  package ES_Simples is 
 
                                            procedure Lire(F: out Float ) ; 
 
 
				            procedure Afficher(F: in Float ) ; 
 
 
				            procedure Afficher (S: in String ) ; 
 
				            procedure Saut_Ligne( N: in Integer:=1);
 
 
		        end ES_simples ;		    
 
 
 
          package body ES_Simples is
 
              		   procedure Lire(F: out Float ) is
 
			   F:Float ;
 
                           begin 
 
			      get(F) ;
 
			        end Lire ;
 
 
			    procedure Afficher(F: in Float ) is
 
			      F:Float ;
 
			    begin
 
			     put(F);
 
			       end afficher ;
 
 
			    procedure Afficher (S: in String ) is
 
			      s:String ;
 
			    begin 
 
			     put(S) ;
 
			        end afficher ;
 
 
			    procedure Saut_Ligne( N: in Integer:=1) is 
 
		             N:Integer:=1 ;
 
		            begin 
 
				put(N);
 
				end Saut_ligne;
 
 
 
end ES_Simples ;

Seulement , le problème est à la compilation , j'obtient l'erreur;

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 gnatmake trame_function_racine.adb
gcc -c trame_function_racine.adb
trame_function_racine.adb:13:26: keyword "body" expected here [see file name]
gnatmake: "trame_function_racine.adb" compilation error

Je comprend le sens du message qui dit que le mot clé body manque quelque part , mais il me semble que le corps du paquettage également appelé body existe et est correctement implémentée.
Merci de m'aidez SVP.
Cordialement.
[/CODE]

[Invité]

Bonjour.
Je pense que pour faire un paquetage, il faut écrire un fichier .ads contenant la spécification du paquetage et un .adb contenant le corps du paquetage.
Mais je suis pas un pro, il y a peut-être d'autre solution.