Add initial prototype.
This commit is contained in:
14
4-high/gel/applet/demo/distributed/gel_demo_services.ads
Normal file
14
4-high/gel/applet/demo/distributed/gel_demo_services.ads
Normal file
@@ -0,0 +1,14 @@
|
||||
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;
|
||||
Reference in New Issue
Block a user