configuration simple_DSA
is 

   pragma Starter (none);          
   --
   --  Tell 'po_gnatdist' to not create any startup script or launcher (more on this in a later tute).                                          
   --  We will launch our Server and Client partitions manually from a console. 

 
   --  Server
   --

   server_Partition : partition := (gel_demo_Services);
   --                                           
   --  Declare the Server partition and assign the 'Server' remote call interface package to this partition.


   procedure launch_Server is in server_Partition;                                    
   --
   --  Tell po_gnatdist that the 'start_Server' procedure is the the Servers 'main' subprogram or launcher. 


   --  Client
   --

   client_Partition : partition;                                                                
   --
   --  Declare the Client partition (which has no remote call interface package associated with it, so no 'initialisation' is required).
   

   procedure launch_Client;                                                                     
   --
   --  Declare the Clients 'main' subprogram or launcher. 


   for client_Partition'Main use launch_Client;                                         
   --
   --  Tell po_gnatdist to assign the above declared 'start_Client' procedure as the Clients 'main' subprogram or launcher.

   for client_Partition'Termination use Local_Termination;                  
   --
   --  Tell po_Gnatdist that Clients may terminate locally (more on this later).



   --  Misc
   --

   for Partition'Directory use "bin"; 
   --
   --  Ask po_gnatdist to place the built Client and Server partition executables in the './bin' sub-folder.

end simple_DSA;
