[Ann] More Ada0Y packages for Ada95!

[Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

I've updated my web page to include the following implementations:

1) AI-248 - Ada.Directories.*
2) AI-351 - Ada.Calendar.*
3) AI-301 - Ada.(Wide_)_Text_IO.(Wide_)Unbounded_IO
4) AI-302 - Ada.Containers.*
5) AI-296 - Ada.Numerics.Generic_[Complex|Real]_Arrays
6) AI-346 - Ada.Numerics.Generic_[Complex|Real]_Arrays.Generic_Roots

The implementation of Ada.Containers.* is a 'back-port' to Ada95 of Matthew
Heaney's reference implementation available from:
http://charles.tigris.org/. This version has a couple of extra explicit
access-to-subprogram types that will be replaced with something better for
Ada0Y but are otherwise identical.

Item 6 above is really only 'adabrowse'-able just now but if I get time I'll
actually implemented it! :-)

Cheers

-- Martin

Re: [Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

> I've updated my web page to include the following implementations:

An address mught have been handy! :-)

http://www.martin.dowie.btinternet.co.uk/

Re: [Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

Martin Dowie wrote:
>> I've updated my web page to include the following implementations:
>
> An address mught have been handy! :-)
>
> http://www.martin.dowie.btinternet.co.uk/

Just added AI-286 Ada.Assertions

Cheers

-- Martin

Re: [Ann] More Ada0Y packages for Ada95!

[Anh_Vo]

"Martin Dowie" <martin.dowie@btopenworld.com> wrote in message news:<ce8pjj$7an$1@titan.btinternet.com>...
> Martin Dowie wrote:
> >> I've updated my web page to include the following implementations:
> >
> > An address mught have been handy! :-)
> >
> > http://www.martin.dowie.btinternet.co.uk/
> 
> Just added AI-286 Ada.Assertions
> 
> Cheers
> 
> -- Martin

It is a great effort you are putting in.

I would like to make a suggestion regarding exception handler. It
would be better to use Raise_Exception (E => Exception_Name'Identity,
"useful message") than raise Exception_Name. In fact, it is extremely
useful in debugging quickly where the problem comes from.

AV

Re: [Ann] More Ada0Y packages for Ada95!

[tmoran]

>I would like to make a suggestion regarding exception handler. It
>would be better to use Raise_Exception (E => Exception_Name'Identity,
>"useful message") than raise Exception_Name. In fact, it is extremely
>useful in debugging quickly where the problem comes from.
  The usefulness of the message for "raise Exception_Name" is
compiler dependent, so whether the longer form is better is also
compiler dependent.

Re: [Ann] More Ada0Y packages for Ada95!

[Anh_Vo]

tmoran@acm.org wrote in message news:<yFzOc.187518$IQ4.154381@attbi_s02>...
> >I would like to make a suggestion regarding exception handler. It
> >would be better to use Raise_Exception (E => Exception_Name'Identity,
> >"useful message") than raise Exception_Name. In fact, it is extremely
> >useful in debugging quickly where the problem comes from.
>   The usefulness of the message for "raise Exception_Name" is
> compiler dependent, so whether the longer form is better is also
> compiler dependent.

But the Exception_Message must return the message. It is compiler
independent. Thus, the exception can be located by a simple search for
the message.

Re: [Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

"Anh_Vo" <anh_vo@udlp.com> wrote in message
news:5a59d6a9.0407301150.348121a8@posting.google.com...
> "Martin Dowie" <martin.dowie@btopenworld.com> wrote in message
news:<ce8pjj$7an$1@titan.btinternet.com>...
> > Martin Dowie wrote:
> > >> I've updated my web page to include the following implementations:
> > >
> > > An address mught have been handy! :-)
> > >
> > > http://www.martin.dowie.btinternet.co.uk/
> >
> > Just added AI-286 Ada.Assertions
>
> It is a great effort you are putting in.

You more than welcome - Matt has just fixed the Ada.Containers.Ordered_Sets,
so look out for an update of that real soon. :-)


> I would like to make a suggestion regarding exception handler. It
> would be better to use Raise_Exception (E => Exception_Name'Identity,
> "useful message") than raise Exception_Name. In fact, it is extremely
> useful in debugging quickly where the problem comes from.

Do you mean the Ada.Assertions package? Or all the packages? If you mean the
Ada.Assertions package then they give you exactly what the AI requires. If
you
want a message then use the overloaded subprogram that has the "Message"
parameter.

For Ada.Directories.* I did add quite a few with messages and hopefully they
are helpful. I think the rest are pretty bare in the exception message
department
but I've got time(!) I'll go back and add some where I can.

Cheers

-- Martin

Re: [Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

Martin Dowie wrote:
> but I've got time(!) I'll go back and add some where I can.

That should have been "IF I've got time" of course!

Re: [Ann] More Ada0Y packages for Ada95!

[Anh_Vo]

"Martin Dowie" <martin.dowie@btopenworld.com> wrote in message > 
> 
> > I would like to make a suggestion regarding exception handler. It
> > would be better to use Raise_Exception (E => Exception_Name'Identity,
> > "useful message") than raise Exception_Name. In fact, it is extremely
> > useful in debugging quickly where the problem comes from.
> 
> Do you mean the Ada.Assertions package? Or all the packages? If you mean the
> Ada.Assertions package then they give you exactly what the AI requires. If
> you
> want a message then use the overloaded subprogram that has the "Message"
> parameter.
> 
> For Ada.Directories.* I did add quite a few with messages and hopefully they
> are helpful. I think the rest are pretty bare in the exception message
> department
> but I've got time(!) I'll go back and add some where I can.
> 
I meant any packages that did not have exception handlers like
Ada.Directories.* had.

Re: [Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

Martin Dowie wrote:
>> I've updated my web page to include the following implementations:
>
> An address mught have been handy! :-)
>
> http://www.martin.dowie.btinternet.co.uk/

Now with fixed "Ada.Containers.Ordered_Sets".

Please note that "Ada.Containers.*" is different to the others on this page
in that it is still not at "Amendment 200Y" status (it's also still being
tested by Matt) but I think it is of sufficient interest to include.

Cheers

-- Martin

Re: [Ann] More Ada0Y packages for Ada95!

[Jano]

Martin Dowie wrote:
> Martin Dowie wrote:
> 
>>>I've updated my web page to include the following implementations:
>>
>>An address mught have been handy! :-)
>>
>>http://www.martin.dowie.btinternet.co.uk/
> 
> 
> Now with fixed "Ada.Containers.Ordered_Sets".
> 
> Please note that "Ada.Containers.*" is different to the others on this page
> in that it is still not at "Amendment 200Y" status (it's also still being
> tested by Matt) but I think it is of sufficient interest to include.

Would you say it is already at a good level of reliability (say, on par 
of Charles)? I make frequent use of Charles and I'm thinking of 
migrating already. I'm very interested in the containers for indefinite 
types too (my principal urge to migrate).

Best regards,

Alex.

Re: [Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

Jano wrote:
> Would you say it is already at a good level of reliability (say, on
> par of Charles)? I make frequent use of Charles and I'm thinking of
> migrating already. I'm very interested in the containers for
> indefinite types too (my principal urge to migrate).

Matt's in a better position to answer that than I am. The only
thing I've found was the problem with the Ordered_Sets and
Matt fixed that within the day. Personnally, I'll be using it from
now on and the more people use it the more it will be tested
and any bugs eliminated.

Cheers

-- Martin

Re: [Ann] More Ada0Y packages for Ada95!

[Jano]

Martin Dowie wrote:
> Jano wrote:
> 
>>Would you say it is already at a good level of reliability (say, on
>>par of Charles)? I make frequent use of Charles and I'm thinking of
>>migrating already. I'm very interested in the containers for
>>indefinite types too (my principal urge to migrate).
> 
> 
> Matt's in a better position to answer that than I am. The only
> thing I've found was the problem with the Ordered_Sets and
> Matt fixed that within the day. Personnally, I'll be using it from
> now on and the more people use it the more it will be tested
> and any bugs eliminated.

Ok, I think I'll do the same and will use it for any new development. 
Downloading now!

Re: [Ann] More Ada0Y packages for Ada95!

[Georg Bauhaus]

Jano <notelacreas@porfavor.no> wrote:
: 
: Ok, I think I'll do the same and will use it for any new development. 

Unless something has changed recently, some kinds of programs,
with a bias towards algorithms rather than containers might
still profit from what is available in Charles, I think.



-- Georg

Re: [Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

Georg Bauhaus wrote:
> Jano <notelacreas@porfavor.no> wrote:
>>
>> Ok, I think I'll do the same and will use it for any new development.
>
> Unless something has changed recently, some kinds of programs,
> with a bias towards algorithms rather than containers might
> still profit from what is available in Charles, I think.

You can still use the Charles.Algorithms.* hierarchy with the
Ada.Containers.* hierarchy but you're right there isn't much
in the way of standardized algorithm support, which is a
shame - something for Ada1Z! ;-)

Cheers

-- Martin

Re: [Ann] More Ada0Y packages for Ada95!

[Georg Bauhaus]

Martin Dowie <martin.dowie@baesystems.com> wrote:
: 
: You can still use the Charles.Algorithms.* hierarchy with the
: Ada.Containers.* hierarchy

Truly generic!  :-) Thanks Matt!

-- Georg

Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Dan Nagle]

Hello,

Has there been any thought, in Ada0Y, to improving
the interface to Fortran?

Fortran 2003 in a long way from 77.

-- 
Cheers!

Dan Nagle
Purple Sage Computing Solutions, Inc.

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Martin Dowie]

Dan Nagle wrote:
> Hello,
>
> Has there been any thought, in Ada0Y, to improving
> the interface to Fortran?
>
> Fortran 2003 in a long way from 77.

You can look for yourself by searching the AI and AC database:

http://www.ada-auth.org/search-ais.html

The short answer appears to be "No".

Cheers

-- Martin

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Dan Nagle]

Hello,

Thanks for the link.

Perhaps it would be handy to be able to interface
to a Fortran program's derived types and pointers (aliases).

I'm a member of J3, and if someone on the Ada side
wanted to do some work along these lines, I can act
as liaison on the Fortran side.

Just thought I'd ask.

-- 
Cheers!

Dan Nagle
Purple Sage Computing Solutions, Inc.

On Tue, 3 Aug 2004 13:51:43 +0100, "Martin Dowie"
<martin.dowie@baesystems.com> wrote:

>Dan Nagle wrote:
>> Hello,
>>
>> Has there been any thought, in Ada0Y, to improving
>> the interface to Fortran?
>>
>> Fortran 2003 in a long way from 77.
>
>You can look for yourself by searching the AI and AC database:
>
>http://www.ada-auth.org/search-ais.html
>
>The short answer appears to be "No".
>
>Cheers
>
>-- Martin
>
>

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Martin Dowie]

"Dan Nagle" <dnagle@erols.com> wrote in message
news:80e1h0l3hofab47jphamslo3s8pkds1kl9@4ax.com...
Hello,

Thanks for the link.

Perhaps it would be handy to be able to interface
to a Fortran program's derived types and pointers (aliases).

I'm a member of J3, and if someone on the Ada side
wanted to do some work along these lines, I can act
as liaison on the Fortran side.

Too late for Ada0Y but maybe for the 5-year 'minor' update standard or Ada1Z
someone could do this.

Cheers

-- Martin

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Jean-Pierre Rosen]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 722 bytes --]


"Martin Dowie" <martin.dowie@btopenworld.com> a �crit dans le message de news:cequjd$9l3$1@sparta.btinternet.com...
> Too late for Ada0Y but maybe for the 5-year 'minor' update standard or Ada1Z
> someone could do this.
>
Not exactly. Of course, an interface to Fortran03 could not be part of Ada05, but nothing prevents you from designing an interface
right now. It could even have the blessing of ISO as a Workshop Agreement Standard, without waiting for 5 more years.

Then, you'll have to convince compiler vendors to implement it, but that's another story...

-- 
---------------------------------------------------------
           J-P. Rosen (rosen@adalog.fr)
Visit Adalog's web site at http://www.adalog.fr

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Martin Dowie]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 888 bytes --]

Jean-Pierre Rosen wrote:
> "Martin Dowie" <martin.dowie@btopenworld.com> a �crit dans le message
> de news:cequjd$9l3$1@sparta.btinternet.com...
>> Too late for Ada0Y but maybe for the 5-year 'minor' update standard
>> or Ada1Z someone could do this.
>>
> Not exactly. Of course, an interface to Fortran03 could not be part
> of Ada05, but nothing prevents you from designing an interface right
> now. It could even have the blessing of ISO as a Workshop Agreement
> Standard, without waiting for 5 more years.

That's very interesting - perhaps that is a route for including the
'Algorithms'
that would have been nice to have with the Containers? They were
deliberately
excluded as there wasn't going to be time to include anything otherwise.

Perhaps additional Containers could be included this way too (e.g. Bounded
forms or Quadtree, Fibonnaci Heaps, etc).

Cheers

-- Martin

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Jean-Pierre Rosen]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 906 bytes --]


"Martin Dowie" <martin.dowie@baesystems.com> a �crit dans le message de news:4111e11d$1_1@baen1673807.greenlnk.net...
> That's very interesting - perhaps that is a route for including the
> 'Algorithms'
> that would have been nice to have with the Containers? They were
> deliberately
> excluded as there wasn't going to be time to include anything otherwise.
>
> Perhaps additional Containers could be included this way too (e.g. Bounded
> forms or Quadtree, Fibonnaci Heaps, etc).
>
Yes. If you are serious about it, please get in touch with Jim Moore, and make a proposal. I'm quite sure he would be delighted to
present it to WG9. We've been talking about Workshop agreements for a long time, but never had (yet) an opportunity to start one...

-- 
---------------------------------------------------------
           J-P. Rosen (rosen@adalog.fr)
Visit Adalog's web site at http://www.adalog.fr

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Martin Dowie]

Jean-Pierre Rosen wrote:
> Yes. If you are serious about it, please get in touch with Jim Moore,
> and make a proposal. I'm quite sure he would be delighted to present
> it to WG9. We've been talking about Workshop agreements for a long
> time, but never had (yet) an opportunity to start one...

Do you have an email for Jim?

Cheers

-- Martin

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Martin Dowie]

Martin Dowie wrote:
> Jean-Pierre Rosen wrote:
>> Yes. If you are serious about it, please get in touch with Jim Moore,
>> and make a proposal. I'm quite sure he would be delighted to present
>> it to WG9. We've been talking about Workshop agreements for a long
>> time, but never had (yet) an opportunity to start one...
>
> Do you have an email for Jim?

Never mind - got it! :-)

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Ken Thomas]

One of the key features of Ada95 is the ability to interface languages such
as Fortran and C. In my own domain of scientific computing there is a vast
pool of reuseable components (BLAS, LAPACK, MPI,...) that can be used with
advantage.

Ada95 is a superb "gluing" language and it would a pity to lose this
feature.

Ken Thomas


"Martin Dowie" <martin.dowie@baesystems.com> wrote in message
news:411209ae$1_1@baen1673807.greenlnk.net...
> Martin Dowie wrote:
> > Jean-Pierre Rosen wrote:
> >> Yes. If you are serious about it, please get in touch with Jim Moore,
> >> and make a proposal. I'm quite sure he would be delighted to present
> >> it to WG9. We've been talking about Workshop agreements for a long
> >> time, but never had (yet) an opportunity to start one...
> >
> > Do you have an email for Jim?
>
> Never mind - got it! :-)
>
>

Re: Fortran Interface (Was:Re: [Ann] More Ada0Y packages for Ada95!)

[Wes Groleau]

Dan Nagle wrote:
> Has there been any thought, in Ada0Y, to improving
> the interface to Fortran?
> 
> Fortran 2003 in a long way from 77.

But is there any difference in what matters for _interfacing_ ?

-- 
Wes Groleau

You always have time for what you do first.

Re: Fortran Interface

[Georg Bauhaus]

Wes Groleau <groleau+news@freeshell.org> wrote:
: Dan Nagle wrote:
:> Has there been any thought, in Ada0Y, to improving
:> the interface to Fortran?
:> 
:> Fortran 2003 in a long way from 77.
: 
: But is there any difference in what matters for _interfacing_ ?

Polymorphic entities?

Re: Fortran Interface

[Dan Nagle]

Hello,

On Tue, 3 Aug 2004 18:15:20 +0000 (UTC), Georg Bauhaus
<sb463ba@l1-hrz.uni-duisburg.de> wrote:

>Wes Groleau <groleau+news@freeshell.org> wrote:
>: Dan Nagle wrote:
>:> Has there been any thought, in Ada0Y, to improving
>:> the interface to Fortran?
>:> 
>:> Fortran 2003 in a long way from 77.
>: 
>: But is there any difference in what matters for _interfacing_ ?
>
>Polymorphic entities?

In Fortran 03, yes.

-- 
Cheers!

Dan Nagle
Purple Sage Computing Solutions, Inc.

Re: Fortran Interface

[Georg Bauhaus]

Dan Nagle <dnagle@erols.com> wrote:

:>:> Fortran 2003 in a long way from 77.
:>: 
:>: But is there any difference in what matters for _interfacing_ ?
:>
:>Polymorphic entities?
: 
: In Fortran 03, yes.

This is what I thought; Ada standard or not, there are means
to use C++ classes in Ada programs, using GNAT, and AFAIK,
ObjectAda compilers. Maybe similar facilities could be used
to use Fortran's polymorphic entities?

Will Fortran programmers be interested in Ada like tasking
or resource sharing facilities?


-- Georg

Re: Fortran Interface

[Dan Nagle]

On Wed, 4 Aug 2004 15:35:13 +0000 (UTC), Georg Bauhaus
<sb463ba@l1-hrz.uni-duisburg.de> wrote:

<snip requoted>
>
>Will Fortran programmers be interested in Ada like tasking
>or resource sharing facilities?

Some will, it's difficult to say what proportion.
I think the tasking is the more likely way.

>
>
>-- Georg

-- 
Cheers!

Dan Nagle
Purple Sage Computing Solutions, Inc.

Re: Fortran Interface

[Dr Steve Sangwine]

On Tue, 3 Aug 2004 18:15:20 +0000 (UTC), Georg Bauhaus
<sb463ba@l1-hrz.uni-duisburg.de> wrote:

>Wes Groleau <groleau+news@freeshell.org> wrote:
>: Dan Nagle wrote:
>:> Has there been any thought, in Ada0Y, to improving
>:> the interface to Fortran?
>:> 
>:> Fortran 2003 in a long way from 77.
>: 
>: But is there any difference in what matters for _interfacing_ ?

What about double precision complex types. Interfaces.Fortran includes
only single precision complex, which is not much use when the default
these days is often double.

Steve Sangwine

Re: [Ann] More Ada0Y packages for Ada95!

[Jano]

"Martin Dowie" <martin.dowie@btopenworld.com> wrote in message news:<ce3tv5$ahh$1@hercules.btinternet.com>...
> I've updated my web page to include the following implementations:

> 4) AI-302 - Ada.Containers.*

Sorry for resurrecting an old thread but I'm getting errors using this
package. I've made an instance of the Ada.Containers.Ordered_Sets and
in my first attempt to insert something I get:

Exception: Exception name: PROGRAM_ERROR
Message: EXCEPTION_ACCESS_VIOLATION

more precisely in this assignation:

   procedure Set_Left
     (Node : Node_Access;
      Left : Node_Access) is
   begin
      Node.Left := Left; -- <-- HERE IN a-coorse.adb line 108
   end Set_Left;

The simplest instantiation using Natural as set members fails as well.

Can someone reproduce it? Thanks in advance,

Alex.

Re: [Ann] More Ada0Y packages for Ada95!

[Martin Dowie]

Jano wrote:
> Sorry for resurrecting an old thread but I'm getting errors using this
> package. I've made an instance of the Ada.Containers.Ordered_Sets and
> in my first attempt to insert something I get:
>
> Exception: Exception name: PROGRAM_ERROR
> Message: EXCEPTION_ACCESS_VIOLATION

I think you have an "old" copy - the version on the web site has a fix for
this. I did say on the web page that there was a problem with Ordered_Sets
and you've found it! :-)

Cheers

-- Martin

Re: [Ann] More Ada0Y packages for Ada95!

[Jano]

"Martin Dowie" <martin.dowie@baesystems.com> wrote in message news:<41245906$1_1@baen1673807.greenlnk.net>...
> Jano wrote:
> > Sorry for resurrecting an old thread but I'm getting errors using this
> > package. I've made an instance of the Ada.Containers.Ordered_Sets and
> > in my first attempt to insert something I get:
> >
> > Exception: Exception name: PROGRAM_ERROR
> > Message: EXCEPTION_ACCESS_VIOLATION
> 
> I think you have an "old" copy - the version on the web site has a fix for
> this. I did say on the web page that there was a problem with Ordered_Sets
> and you've found it! :-)

Oh, thanks, I must have missed it :/ Downloading now, if I remain
silent it means that everything went ok :)

Thanks!