Re: From Pascal to Ada

[j.khaldi@oltrelinux.com]

On Nov 2, 12:38 am, Ludovic Brenta <ludo...@ludovic-brenta.org> wrote:
> j.kha...@oltrelinux.com writes:
> > Hi,
> > how do you translate this Pascal code in Ada?
>
> > type
> >   realFunction = function(x: double): double;
>
> generic
>    with function Func (X : Long_Float) return Long_Float;
> procedure Apply (To : in out Vector);
>
Well, I am porting a math library from Object Pascal (Delphi and Free
Pascal) to Ada.
The original library was written in C and I translated it to Object
Pascal many
years ago. As other C libraries it uses a lot of pointer to functions
and the
translation between C and Object pascal code was a straitful word to
word.
The library has a lot of functions, very fast and I am using it for a
long time in
many projects without arising a single bug.
Lastly I am very interested in Ada and as first "serious" exercice, I
am trying a
fast "mechanical" translation, almost word to word, from Object Pascal
to Ada of this
library.

Jilani