From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,e44790cdcea9da82
X-Google-Attributes: gid103376,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news1.google.com!news.glorb.com!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeeds.sol.net!posts.news.twtelecom.net!nnrp2.twtelecom.net!not-for-mail
From: "Matthew Heaney" <mheaney@on2.com>
Newsgroups: comp.lang.ada
References: <41651D37.4030805@mailinator.com> <c0a9d.3371$4b.445@trndny09>
 <2skt9qF1ljjdtU1@uni-berlin.de> <4165472D.2030704@mailinator.com>
 <416573FA.4010003@mailinator.com> <87k6u2mj08.fsf@insalien.org>
 <4166538E.6090907@mailinator.com>
 <41702af7$0$91003$39cecf19@news.twtelecom.net>
 <417377F7.7050506@mailinator.com>
Subject: Re: Problem with -gnatt
Date: Mon, 18 Oct 2004 12:48:11 -0400
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1437
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1441
Message-ID: <4173f0ed$0$91003$39cecf19@news.twtelecom.net>
Organization: Time-Warner Telecom
NNTP-Posting-Date: 18 Oct 2004 16:35:57 GMT
NNTP-Posting-Host: 5876444f.news.twtelecom.net
X-Trace: 
 DXC=8dC`[A7R2IUkQo;=iDEbGSC_A=>8kQj6]hHXa^^g6TZTgb_Rl>hnMPRdYZAA8S:<lPl33eLRn>X?]
X-Complaints-To: abuse@twtelecom.net
Xref: g2news1.google.com comp.lang.ada:5403
Date: 2004-10-18T16:35:57+00:00
List-Id: <comp.lang.ada>


"Alex R. Mosteo" <devnull@mailinator.com> wrote in message
news:417377F7.7050506@mailinator.com...
>
> Sole instance of a Map:
>
http://deepsix.homeip.net/svn/Adagio%20head/src/download/adagio-download-manager.adb

Note that protected operations should only execute "for a short time."  Your
Http_Report_Downloads protected operation could take longer than a "short
time," if the map is large.  Consider using a semaphore style lock,
something like:

procedure Http_Report_Downloads (...) is
   Control : Control_Type (Semaphore'Access);
begin
   ... -- safely manipulate map that you now have locked
end;

where Control_Type calls Semaphore.Seize during controlled Initialization,
and calls Semaphore.Release during controlled Finalization.

Also consider using a passive iterator instead of an exaplicit loop.  The
passive iterator is likely to be slightly more efficient than an active
iterator.