prj-nmsc.adb (Check_Naming_Schemes): Accept source file names for gprbuild when casin...
authorVincent Celier <celier@adacore.com>
Wed, 20 Aug 2008 15:29:33 +0000 (17:29 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 20 Aug 2008 15:29:33 +0000 (17:29 +0200)
2008-08-20  Vincent Celier  <celier@adacore.com>

* prj-nmsc.adb (Check_Naming_Schemes): Accept source file names for
gprbuild when casing is MixedCase, whatever the casing of the letters
in the file name.

From-SVN: r139312

gcc/ada/prj-nmsc.adb

index cf0f4725084b0ce5d35787725d3a2f1e34fba8ae..db6a70cd7b019cc2700db2dcaf2e4024202a3674 100644 (file)
@@ -7720,6 +7720,9 @@ package body Prj.Nmsc is
                               end if;
                            end loop;
 
+                        when Mixed_Case =>
+                           null;
+
                         when others =>
                            OK := False;
                      end case;