Add initial prototype.

4-high/gel/applet/demo/distributed/dsa/simple_dsa.cfg

@@ -0,0 +1,53 @@
+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;