Ada broken on mingw32 on trunk.

[Danny Smith]

 Arnaud Charlet 
> 
> > recent spate of patches has broken build of libada on 
> mingw32 target:
> 
> Sorry about that.
> 
> Should now be fixed with the following commit:
> 
> 2007-06-11  Bob Duff  <duff@adacore.com>
>             Thomas Quinot  <quinot@adacore.com>
> 
>         * g-stsifd-sockets.adb (Create): Work around strange 
> behavior of
>         'bind' on windows that causes 'connect' to fail 
> intermittently, by
>         retrying the 'bind'.
>         (GNAT.Sockets.Thin.Signalling_Fds): New procedure Close.


Thanks for your quick reponse.  It is indeed fixed now.
Danny