comp.lang.ada
 help / color / mirror / Atom feed
From: Martin <martin@thedowies.com>
Subject: Re: Question Exception with Ada.Containers.Generic_Constrained_Array_Sort
Date: Wed, 15 Aug 2012 00:11:07 -0700 (PDT)
Date: 2012-08-15T00:11:07-07:00	[thread overview]
Message-ID: <8219ebbf-dc47-445f-b5eb-df6500f3e85e@googlegroups.com> (raw)
In-Reply-To: <b5dc96a3-542e-4e11-abaa-d88194a43c95@googlegroups.com>

On Tuesday, August 14, 2012 1:39:29 PM UTC+1, Marc C wrote:
> On Monday, August 13, 2012 3:05:51 PM UTC-5, awdorrin wrote:
> 
> 
> 
> > The comparison function is:
> 
> >
> 
> >   function DevName_Less_Than( L,R : Device_Object_Type) return Boolean is
> 
> >   begin
> 
> >     if GetDeviceName(L) < GetDeviceName(R)
> 
> >     then
> 
> >       return TRUE;
> 
> >     else
> 
> >       return FALSE;
> 
> >     end if;
> 
> >   end DevName_Less_Than;
> 
> 
> 
> Just a pet peeve of mine... :-)
> 
> 
> 
> function DevName_Less_Than( L,R : Device_Object_Type) return Boolean is
> 
> begin
> 
>    return GetDeviceName(L) < GetDeviceName(R);
> 
> end DevName_Less_Than;

+1

-- Martin



  reply	other threads:[~2012-08-17 21:06 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2012-08-13 20:05 Question Exception with Ada.Containers.Generic_Constrained_Array_Sort awdorrin
2012-08-13 20:44 ` awdorrin
2012-08-13 21:25   ` Adam Beneschan
2012-08-14 12:22     ` awdorrin
2012-08-14 12:39 ` Marc C
2012-08-15  7:11   ` Martin [this message]
2012-08-15 16:02     ` Georg Bauhaus
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox