Data update

Task/Distributed-programming/Ada/distributed-programming-4.adb

@@ -0,0 +1,13 @@
+configuration DSA is
+   pragma Starter (None);
+
+   -- Server
+   Server_Partition : Partition := (Server);
+   procedure Run_Server is in Server_Partition;
+
+   -- Client
+   Client_Partition : Partition;
+   for Client_Partition'Termination use Local_Termination;
+   procedure Client;
+   for Client_Partition'Main use Client;
+end DSA;