Problem with Ada in MinGW GCC-6.3 release

[David Gressett-6]

Here is the source code of a simple program (test.adb) that fails to build:

with Ada.Text_IO;
use Ada.Text_IO;

with Ada.Directories;
use Ada.Directories;

procedure Test
is
  Search: Search_Type;
  File: Directory_Entry_Type;
 
begin
  Start_Search(Search, ".", "*");
 
  while More_Entries(Search) loop
    Get_Next_Entry(Search, File);
    Ada.Text_IO.Put_Line(Simple_Name(File));
  end loop;
 
  End_Search(Search);
 
end Test;

When I try to build it, I get this:

$ gnatmake test
fatal error, run-time library not installed correctly
cannot locate file system.ads
ǩ: *** make failed.

system.ads does exist; it is at C:\MinGW\lib\gcc\mingw32\6.3.0\adainclude\system.ads

The problem occurs with two installations of GCC-6.3.0, one on a Windows 7
computer, and another on Windows 10.

I will open a ticket for this later today
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
MinGW-users mailing list
[hidden email]

This list observes the Etiquette found at
http://www.mingw.org/Mailing_Lists.
We ask that you be polite and do the same.  Disregard for the list etiquette may cause your account to be moderated.

_______________________________________________
You may change your MinGW Account Options or unsubscribe at:
https://lists.sourceforge.net/lists/listinfo/mingw-users
Also: mailto:[hidden email]?subject=unsubscribe

[MinGW - User mailing list]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

On 27/07/17 16:22, David Gressett wrote:

> Here is the source code of a simple program (test.adb) that fails to
> build:
>
> with Ada.Text_IO;
> use Ada.Text_IO;
>
> with Ada.Directories;
> use Ada.Directories;
>
> procedure Test
> is
>   Search: Search_Type;
>   File: Directory_Entry_Type;
>  
> begin
>   Start_Search(Search, ".", "*");
>  
>   while More_Entries(Search) loop
>     Get_Next_Entry(Search, File);
>     Ada.Text_IO.Put_Line(Simple_Name(File));
>   end loop;
>  
>   End_Search(Search);
>  
> end Test;
>
> When I try to build it, I get this:
>
> $ gnatmake test
> fatal error, run-time library not installed correctly
> cannot locate file system.ads
> ǩ: *** make failed.

FWIW, this WJFFM with the cross-compiler, with which I built GCC-6.3.0
as a MinGW.org distributable suite:

  $ mingw32-gnatmake test
  mingw32-gcc -c test.adb
  mingw32-gnatbind -x test.ali
  mingw32-gnatlink test.ali

Running it (under wine):

  $ ./test.exe ; rstty
  .
  ..
  test.o
  test.adb
  test.exe
  test.ali

(The "rstty" is there because wine lacks the courtesy to restore my
terminal settings, after it has mucked about with them).

> system.ads does exist; it is at
> C:\MinGW\lib\gcc\mingw32\6.3.0\adainclude\system.ads

In my case, it is in:

  $ find ~/mingw32/ -name system.ads
  /home/keith/mingw32/lib/gcc/mingw32/6.3.0/adainclude/system.ads

(with the entire cross-compiler suite installed behind the ~/mingw32
symlink).

> The problem occurs with two installations of GCC-6.3.0, one on a
> Windows 7 computer, and another on Windows 10.

So, is this an issue with my crossed-native distribution build?  It
clearly doesn't affect my cross-compiler itself.

- --
Regards,
Keith.

Public key available from keys.gnupg.net
Key fingerprint: C19E C018 1547 DE50 E1D4 8F53 C0AD 36C6 347E 5A3F
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2.0.20 (GNU/Linux)

iQIcBAEBAgAGBQJZfgLIAAoJEMCtNsY0flo/e54P/RDVFQoaLWb30REq9JhQUnwD
10OyzGnHuVNFlEL2CIqV1ksHJDp2HH3L5V3zME6JFNRdO5Ev+Evq2+0p/vpCj21e
d5DoVVySoCoJPWzwhinjHP1wmvrnO6JLO1kO/zf7s3+qTkQQl8V7wyrHrL2Zg8pR
0b+V7vkUo3JIelU8rgwbsgvVdsvge04CpCQIlRjEoBk7dH+Grx96FgiTNeijI9uN
5s46YQasOBJ6j6RPz/Jf/e4948XGCHCx2IciOkyc3OBDXA2CEosrlQ5J9vU3ngCm
YPo75mVy8so6WNBFgp38+I4XmbvQUeBmX3WH/QGY1yBk4U4XluaOx7by/BPM2PwC
/WCKT5nv5r2ZhpVH9h6r1AX3Hv8TJYX7EMwmOEcecPNL6+3ReuUiGQPkje3S2maA
EC0eSWjkSF+wNVnd85mxHXm5S9THtNHcXF89HpnYyla8b5qjr9Jdlt7diCTHfPoP
OKdrbr8cA3LL04pPWCwAPXfRspN/gqTo89cQtZit+TCQpQQl35RqazXQUWKQ8fQe
Mg1tAnx5rZ4NZ9K5gbO2LrcZjxlR0AcRn0UJtkeUhiXWyY9VZNbQrnQDK5MFhLpV
Ztw/gcQnJ38Pb2zuXpbH0l7Jfq3TkIXzBn405G8DsNLXlerSVmiJBUqTHYvxPFsT
wPX6GEMbENkzEHHpUOlO
=er1f
-----END PGP SIGNATURE-----

------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
MinGW-users mailing list
[hidden email]

This list observes the Etiquette found at
http://www.mingw.org/Mailing_Lists.
We ask that you be polite and do the same.  Disregard for the list etiquette may cause your account to be moderated.

_______________________________________________
You may change your MinGW Account Options or unsubscribe at:
https://lists.sourceforge.net/lists/listinfo/mingw-users
Also: mailto:[hidden email]?subject=unsubscribe

[David Gressett-6]

On Sunday, July 30, 201 Keith Marshall wrote
>On 27/07/17 16:22, David Gressett wrote:
>> Here is the source code of a simple program (test.adb) that fails to
> build:


... snip ...

>FWIW, this WJFFM with the cross-compiler, with which I built GCC-6.3.0 as a MinGW.org distributable suite:

... snip ...

>So, is this an issue with my crossed-native distribution build?  It clearly doesn't affect my cross-compiler itself.

I downloaded  the MinGW 6.3.0 source code  and built it as a native build; I used that to overwrite the original
installation made by the graphical-mode installer. The problem disappeared.

I need to do some detective work to compare my overwritten MinGW directory structure with a
new installation.

My free time for such things has disappeared,  so I will probably not get to that until the weekend.




------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
MinGW-users mailing list
[hidden email]

This list observes the Etiquette found at
http://www.mingw.org/Mailing_Lists.
We ask that you be polite and do the same.  Disregard for the list etiquette may cause your account to be moderated.

_______________________________________________
You may change your MinGW Account Options or unsubscribe at:
https://lists.sourceforge.net/lists/listinfo/mingw-users
Also: mailto:[hidden email]?subject=unsubscribe