15 lines
197 B
Ada
15 lines
197 B
Ada
with
|
|
gel.remote.World;
|
|
|
|
|
|
package gel_demo_Services
|
|
--
|
|
-- Provides RCI services.
|
|
--
|
|
is
|
|
pragma remote_call_Interface;
|
|
|
|
function World return gel.remote.World.view;
|
|
|
|
end gel_demo_Services;
|