From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 10.98.8.195 with SMTP id 64mr13918076pfi.7.1449931311166;
        Sat, 12 Dec 2015 06:41:51 -0800 (PST)
X-Received: by 10.182.112.135 with SMTP id iq7mr324681obb.10.1449931311102;
 Sat, 12 Dec 2015 06:41:51 -0800 (PST)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!feeder.eternal-september.org!news.glorb.com!mv3no15154438igc.0!news-out.google.com!l1ni1105igd.0!nntp.google.com!mv3no15154431igc.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Sat, 12 Dec 2015 06:41:50 -0800 (PST)
In-Reply-To: <6caaac83-bca4-4b75-a4b3-47189e281c1a@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=91.213.8.236;
 posting-account=zd4fUAoAAABZGnAfDxrdJ5Lpts-qUilv
NNTP-Posting-Host: 91.213.8.236
References: <6caaac83-bca4-4b75-a4b3-47189e281c1a@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <360882c8-263e-42fd-b3ee-ef93cc11d8f4@googlegroups.com>
Subject: Re: Basics : many way to use a Procedure
From: comicfanzine@gmail.com
Injection-Date: Sat, 12 Dec 2015 14:41:51 +0000
Content-Type: text/plain; charset=ISO-8859-1
Xref: news.eternal-september.org comp.lang.ada:28787
Date: 2015-12-12T06:41:50-08:00
List-Id: <comp.lang.ada>

Thanks for your answers everybody :)

But , i still don't know where this sign come from : " => " . Any information or A.R.M documentation about it ??

Also , how to use this ?? =

actual_parameter_part ::= 
    (parameter_association {, parameter_association})

And this ?? =

parameter_association ::= 
   [formal_parameter_selector_name =>] explicit_actual_parameter


For the moment , i figured out how to use this ( at least :) ) =

procedure_call_statement ::= 
    procedure_name;
  | procedure_prefix actual_parameter_part;

I used it like this :

    WITH Gtk.Main ;          USE Gtk.Main ;
    WITH Gtk.Window ;        USE Gtk.Window ;
    WITH Gtk.Enums ;         USE Gtk.Enums ;

    Procedure procedure_gtkada is
    
        win : Gtk_window ;
     
    begin
    
     Init ; 
     
	Gtk_New(Window => Win, 
		The_Type => Gtk.Enums.Window_Toplevel); 
			       
-- procedure Gtk_New
   --  (Window   : out Gtk_Window;
   --   The_Type : Gtk.Enums.Gtk_Window_Type := Gtk.Enums.Window_Toplevel);
     
     Show_all(win) ; 
     
       Main ; 
	
end procedure_gtkada;

-- Compile with : gnatmake procedure_gtkada `gtkada-config`
-- Of course you need the libgtkada .