Re: C Interface example

[Georg Bauhaus <bauhaus@futureapps.de>]

On Sat, 2007-02-03 at 10:09 -0800, artifact.one@googlemail.com wrote:
> On Feb 3, 5:48 pm, Gautier <gaut...@fakeaddress.nil> wrote:
> > Looking at your code the most simple and portable way will be not to interface
> > at all with C!
> >
> > package Vectors is
> >
> >    type Vector is array(Natural range <>) of Float;
> >
> >    procedure Add(va: in out Vector; vb: in Vector);
> >
> > end Vectors;

In fact, Ada 2007 will provide this in the standard library,

with Ada.Numerics.Real_Arrays;

   va, vb, result: Real_Array(1 .. n);

   result := va + vb;

Not sure whether there is a big performance penalty
when not modifying va in place.


> Yes this was quite a contrived example because my real version of
> vec_add()
> actually calls Altivec, SSE, SSE2 or pure C code depending on detected
> hardware,
> which stretches on to about 300 lines.

Any reason to dismiss the BLAS libraries optimized for
the respective processors?