comp.lang.ada
 help / color / mirror / Atom feed
From: Jacob Sparre Andersen <jacob@jacob-sparre.dk>
Subject: Re: need help learning Ada for a modula-2 programmer
Date: Thu, 30 Jan 2014 10:05:32 +0100
Date: 2014-01-30T10:05:32+01:00	[thread overview]
Message-ID: <87bnytet5v.fsf@adaheads.sparre-andersen.dk> (raw)
In-Reply-To: lcc47p$lhf$2@dont-email.me

Jeffrey Carter wrote:
> On 01/29/2014 01:41 PM, Jacob Sparre Andersen wrote:
>>
>> Generalising the array index beyond type Integer takes up ten lines
>> in my first take on the task.  (Recursion _might_ make it shorter.)
>
> Mine is the same number of lines whether the index is numeric or
> not. 2 of the lines differ to handle non-numeric indices.

I'm curious how you're doing it.  My implementation has one declaration
of a constant (to manage shifts further than one array length) and one
return statement (split over two lines to make it more readable).

The non-numeric index version has another ten lines to make the
mathematical operations used in the return statement work on a
non-numeric index.

Hmmm...  I think I may have figured it out...

Yes.

Converting back and forth between type Index and integers in-line makes
the return statement somewhat less readable. :-(

Using Ada 2012 I can do it with exactly the requested dozen lines (two
of which are blank to improve readability ;-).

Greetings,

Jacob

PS: I'm waiting for the OP to post his/her solution before I'm going to
    post mine.  Please hurry up.
-- 
Never attribute to malice what can adequately be explained by incompetence.


  reply	other threads:[~2014-01-30  9:05 UTC|newest]

Thread overview: 46+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2014-01-28  1:06 need help learning Ada for a modula-2 programmer agent
2014-01-28  1:33 ` adambeneschan
2014-01-28  1:52 ` Jeffrey Carter
2014-01-28 12:18 ` Brian Drummond
2014-02-02  2:47   ` agent
2014-02-02  6:09     ` Jeffrey Carter
2014-02-02 15:02       ` agent
2014-02-02 16:00         ` gautier_niouzes
2014-02-02 19:48         ` Jeffrey Carter
2014-02-03  8:24           ` Dmitry A. Kazakov
2014-02-02 17:18     ` Brian Drummond
2014-02-03  0:10       ` agent
2014-02-03  0:36         ` agent
2014-02-03 12:53         ` Brian Drummond
2014-01-28 22:51 ` Jerry
2014-01-29 12:15   ` Mike H
2014-01-29 20:41     ` Jacob Sparre Andersen
2014-01-29 23:52       ` Jeffrey Carter
2014-01-30  9:05         ` Jacob Sparre Andersen [this message]
2014-01-30 14:20       ` Mike H
2014-01-30 14:35         ` Bill Findlay
2014-01-30 15:40           ` Mike H
2014-01-30 23:39         ` Jeffrey Carter
2014-01-31 20:16           ` Mike H
2014-01-29 23:52     ` Jeffrey Carter
2014-01-30  1:44       ` Bill Findlay
2014-01-30  2:01         ` Jeffrey Carter
2014-01-30 12:24       ` Simon Wright
2014-01-30 23:38         ` Jeffrey Carter
2014-02-03 23:12     ` agent
2014-02-04  6:10       ` J-P. Rosen
2014-02-04 22:38   ` agent
2014-01-29 16:58 ` Dirk Heinrichs
2014-01-29 20:43   ` Randy Brukardt
2014-01-29 22:53     ` Georg Bauhaus
2014-01-30 12:13       ` Simon Wright
2014-01-30 17:05     ` Dirk Heinrichs
2014-01-30 23:21       ` Randy Brukardt
2014-01-30  4:29   ` Nasser M. Abbasi
2014-01-30  8:45     ` Where to put change descriptions (Was: need help learning Ada for a modula-2 programmer) Jacob Sparre Andersen
2014-01-30  9:53     ` need help learning Ada for a modula-2 programmer Georg Bauhaus
2014-01-30 21:58       ` Randy Brukardt
2014-01-30 16:28     ` Pascal Obry
2014-01-30 17:43       ` Marius Amado-Alves
2014-01-30 18:10       ` Simon Wright
2014-01-30 22:38       ` Randy Brukardt
replies disabled

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