comp.lang.ada
 help / color / mirror / Atom feed
From: Phil Clayton <phil.clayton@lineone.net>
Subject: Re: Pascal Calling Convention
Date: Thu, 31 Mar 2011 00:40:54 -0700 (PDT)
Date: 2011-03-31T00:40:54-07:00	[thread overview]
Message-ID: <29dd260d-474e-4b33-b460-180ad4facab1@w7g2000yqe.googlegroups.com> (raw)
In-Reply-To: d5f1b9fe-7aa7-44e9-9e53-19f8e91b5c68@dn9g2000vbb.googlegroups.com

On Mar 30, 2:42 pm, Phil Clayton <phil.clay...@lineone.net> wrote:
> On Mar 29, 1:23 pm, stefan-lu...@see-the.signature wrote:
>
>
>
> > The original C++ from Hyman Rosen was
>
> > template <unsigned N>
> > class set
> > {
> >     unsigned n;    // number of members in set
> >     unsigned d[N]; // members are in d[0..n-1]
> >     unsigned s[N]; // d[s[k]] == k if k is a member
> >     // unspecified elements of d and s are arbitrary
>
> > public:
> >     set() : n(0) { }
> >     bool has(unsigned k)
> >         { return k < N && s[k] < n && d[s[k]] == k; }
> >     void add(unsigned k)
> >         { if (k < N && !has(k)) { d[n] = k; s[k] = n++; }
> >     void del(unsigned k)
> >         { if (has(k)) { unsigned i = s[k]; d[i] = d[--n]; s[d[i]] = i; }
> >     void clr() { n = 0; }
>
> > };
>
> Interesting.  It's worth noting that if N is equal to the number of
> keys representable by unsigned

Except that it can't be because N is also of type unsigned so there
can't be 'overflow' either. I didn't see that in the template
argument. Ignore me.

Phil




  reply	other threads:[~2011-03-31  7:40 UTC|newest]

Thread overview: 57+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2011-03-23 21:37 Pascal Calling Convention Shark8
2011-03-23 23:25 ` Yannick Duchêne (Hibou57)
2011-03-24  0:24   ` Randy Brukardt
2011-03-24  0:43     ` Yannick Duchêne (Hibou57)
2011-03-24  2:04       ` Shark8
2011-03-25 15:40         ` Yannick Duchêne (Hibou57)
     [not found]       ` <F8mdnYCca6tRJBfQnZ2dnUVZ_s-dnZ2d@earthlink.com>
2011-03-24 19:20         ` Keith Thompson
2011-03-25 16:04           ` Robert A Duff
2011-03-25 17:02             ` Hyman Rosen
2011-03-25 17:09               ` Robert A Duff
2011-03-25 17:35                 ` Hyman Rosen
2011-03-26 19:51                   ` Robert A Duff
2011-03-25 17:51             ` Keith Thompson
2011-03-26 20:46               ` Robert A Duff
2011-03-27  2:24                 ` Randy Brukardt
2011-03-28 15:41                   ` Adam Beneschan
2011-03-28 19:52                   ` Robert A Duff
2011-03-29  2:32                     ` Randy Brukardt
2011-03-29  6:06                       ` Shark8
2011-03-29 23:45                         ` Randy Brukardt
2011-03-29 19:19                       ` Robert A Duff
2011-03-30  0:02                         ` Randy Brukardt
2011-03-30 12:40                           ` Robert A Duff
2011-03-30 19:40                             ` Randy Brukardt
2011-03-30 20:56                               ` tmoran
2011-03-30 22:34                                 ` Robert A Duff
2011-03-31 21:00                                   ` Randy Brukardt
2011-03-28 20:29                 ` Hyman Rosen
2011-03-28 21:16                   ` Adam Beneschan
2011-03-28 21:26                     ` Hyman Rosen
2011-03-28 22:08                       ` Adam Beneschan
2011-03-28 23:47                         ` Georg Bauhaus
2011-03-29 12:23                           ` stefan-lucks
2011-03-29 13:10                             ` Hyman Rosen
2011-03-30 13:42                             ` Phil Clayton
2011-03-31  7:40                               ` Phil Clayton [this message]
2011-03-29  2:48                         ` Hyman Rosen
2011-03-29 18:30                           ` Robert A Duff
2011-03-29 23:25                             ` Adam Beneschan
2011-03-30 12:50                               ` Robert A Duff
2011-03-30 14:47                                 ` Adam Beneschan
2011-03-30 18:10                                   ` Robert A Duff
2011-03-29  3:01                         ` Hyman Rosen
2011-03-29 18:22                           ` Robert A Duff
2011-03-26 21:30           ` Florian Weimer
2011-03-27 16:18             ` Robert A Duff
2011-03-27 16:38               ` Florian Weimer
2011-03-27 16:56                 ` Robert A Duff
2011-03-24  2:15   ` Shark8
2011-03-24  0:38 ` ytomino
2011-03-24  2:23   ` Shark8
2011-03-24 21:29 ` Gautier write-only
2011-03-25 12:47 ` Marco
2011-03-25 15:38   ` Yannick Duchêne (Hibou57)
2011-03-26  8:39     ` ObjectAda [was: Pascal Calling Convention] Gautier write-only
2011-03-26 14:05       ` Marco
2011-03-26 21:58         ` Gautier write-only
replies disabled

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