with gel.World.server; package gel_demo_Server -- -- Provides the server. -- is the_server_World : gel.World.server.view; task Item is entry start; entry stop; end Item; end gel_demo_Server;