----------------------------------------------------------------------- -- awa-services -- Services -- Copyright (C) 2011 Stephane Carrez -- Written by Stephane Carrez (Stephane.Carrez@gmail.com) -- -- Licensed under the Apache License, Version 2.0 (the "License"); -- you may not use this file except in compliance with the License. -- You may obtain a copy of the License at -- -- http://www.apache.org/licenses/LICENSE-2.0 -- -- Unless required by applicable law or agreed to in writing, software -- distributed under the License is distributed on an "AS IS" BASIS, -- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. -- See the License for the specific language governing permissions and -- limitations under the License. ----------------------------------------------------------------------- with Ada.Containers.Hashed_Maps; with Util.Strings; package AWA.Services is pragma Preelaborate; subtype Service_Id is Util.Strings.Name_Access; type Service is limited interface; type Service_Access is access all Service'Class; package Service_Map is new Ada.Containers.Hashed_Maps (Key_Type => Service_Id, Element_Type => Service_Access, Hash => Util.Strings.Hash, Equivalent_Keys => Util.Strings.Equivalent_Keys); end AWA.Services;