Files
PolyORB/Examples/MultiPro/main.adb
Laurent Pautet e0985cc23b Add example of multi protocol use
Subversion-branch: /importfromcvs/trunk
Subversion-revision: 47450
2000-05-24 17:42:04 +00:00

8 lines
105 B
Ada

with RCI_1;
procedure Main is
begin
delay 1.0;
RCI_1.Dump_Partition_Table;
delay 1.0;
end Main;