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-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,7ee10ec601726fbf
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-11-12 18:42:05 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!logbridge.uoregon.edu!newsfeed.direct.ca!look.ca!newsfeed1.earthlink.net!newsfeed.earthlink.net!newsmaster1.prod.itd.earthlink.net!newsread1.prod.itd.earthlink.net.POSTED!not-for-mail
Message-ID: <3BF08874.BB5E904B@acm.org>
From: Jeffrey Carter <jrcarter@acm.org>
X-Mailer: Mozilla 4.7 [en] (Win98; U)
X-Accept-Language: en
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: why not
References: <3BC5D730.DA950CC7@boeing.com>
 <slrn9sdahp.k4.lutz@taranis.iks-jena.de> <3BC6ACC8.23EF21BC@free.fr>
 <QQCx7.26073$ev2.34583@www.newsranger.com> <3BC71F54.1FFE78FA@boeing.com>
 <1KGx7.26476$ev2.35117@www.newsranger.com> <3BC7AD82.2A0CCCD4@acm.org>
 <usncjtzix.fsf@gsfc.nasa.gov> <9qhiqr$af0$1@nh.pace.co.uk>
 <K1Zy7.12219$hT5.3979715684@newssvr30.news.prodigy.com>
 <1nDC7.180$6S7.92255364@newssvr11.news.prodigy.com>
 <9rjsak$bp3$1@nh.pace.co.uk> <jbfstt097fvrrqmrl0kuscmbl57neg8imf@4ax.com>
 <9rmhb9$o1b$1@nh.pace.co.uk> <3BDEF0FE.B55FED9E@san.rr.com>
 <9rmuqi$es$1@nh.pace.co.uk> <3BDF1F13.4B99361C@san.rr.com>
 <9rnbtv$5i4$1@nh.pace.co.uk> <3BDF8C59.5020108@mail.com>
 <tu014vtnua0j60@corp.supernews.com> <tu07apsr9hcp78@corp.supernews.com>
 <9rp9bk$6m9$1@nh.pace.co.uk> <tu0i54ndv2q94d@corp.supernews.com>
 <PMdE7.8703$xS6.11455@www.newsranger.com> <9rrtkt$bum$1@nh.pace.co.uk>
 <tu3223ruonn210@corp.supernews.com> <9sml2i$q9b$1@news.huji.ac.il>
 <olTH7.21844$xS6.33537@www.newsranger.com>
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Date: Tue, 13 Nov 2001 02:42:02 GMT
NNTP-Posting-Host: 209.86.209.203
X-Complaints-To: abuse@earthlink.net
X-Trace: newsread1.prod.itd.earthlink.net 1005619322 209.86.209.203 (Mon,
 12 Nov 2001 18:42:02 PST)
NNTP-Posting-Date: Mon, 12 Nov 2001 18:42:02 PST
Organization: EarthLink Inc. -- http://www.EarthLink.net
X-Received-Date: Mon,
 12 Nov 2001 18:37:58 PST (newsmaster1.prod.itd.earthlink.net)
Xref: archiver1.google.com comp.lang.ada:16395
Date: 2001-11-13T02:42:02+00:00
List-Id: <comp.lang.ada>

Ted Dennison wrote:
> 
> In particular, I don't see "Sort" being much more than 10-40 SLOC. I could be
> wrong, as no-one's started work on an implementation yet.

PragmARC.List_Unbounded_Unprotected contains a merge sort on a list.
It's about 110 physical lines, including lots of blank lines.

-- 
Jeff Carter
"If you think you got a nasty taunting this time,
you ain't heard nothing yet!"
Monty Python and the Holy Grail