aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorVincent Celier <celier@adacore.com>2008-08-20 17:29:33 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2008-08-20 17:29:33 +0200
commitaa2fca8f34ba2372731c060464c00d1292ddd113 (patch)
treea15a1ab88aabba03c6de2b7d22a4e7616259316e
parentc92d77212d70d505cb1641e3ea8eb72d0f310fdd (diff)
downloadgcc-aa2fca8f34ba2372731c060464c00d1292ddd113.zip
gcc-aa2fca8f34ba2372731c060464c00d1292ddd113.tar.gz
gcc-aa2fca8f34ba2372731c060464c00d1292ddd113.tar.bz2
prj-nmsc.adb (Check_Naming_Schemes): Accept source file names for gprbuild when casing is MixedCase...
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
-rw-r--r--gcc/ada/prj-nmsc.adb3
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/prj-nmsc.adb b/gcc/ada/prj-nmsc.adb
index cf0f472..db6a70c 100644
--- a/gcc/ada/prj-nmsc.adb
+++ b/gcc/ada/prj-nmsc.adb
@@ -7720,6 +7720,9 @@ package body Prj.Nmsc is
end if;
end loop;
+ when Mixed_Case =>
+ null;
+
when others =>
OK := False;
end case;