Sophie

Sophie

distrib > Fedora > 15 > x86_64 > by-pkgid > 19b9ab2c1960fa706e46fe8fe0d2ea83 > files > 2

gprbuild-2010-7.fc15.src.rpm

--- a/gnat/osint.ads	2010-06-08 19:33:24.000000000 +0400
+++ b/gnat/osint.ads	2011-02-05 00:48:30.236428001 +0300
@@ -94,11 +94,11 @@
    --  this call converts the given string to canonical all lower case form,
    --  so that two file names compare equal if they refer to the same file.
 
-   function Get_Env_Vars_Case_Sensitive return Int;
-   pragma Import (C, Get_Env_Vars_Case_Sensitive,
-                  "__gnat_get_env_vars_case_sensitive");
-   Env_Vars_Case_Sensitive : constant Boolean :=
-                                 Get_Env_Vars_Case_Sensitive /= 0;
+   -- function Get_Env_Vars_Case_Sensitive return Int;
+   --pragma Import (C, Get_Env_Vars_Case_Sensitive,
+   --               "__gnat_get_env_vars_case_sensitive");
+   Env_Vars_Case_Sensitive : constant Boolean := True ;
+   --                              Get_Env_Vars_Case_Sensitive /= 0;
    --  Set to indicate whether the operating system convention is for
    --  environment variable names to be case sensitive (e.g., in Unix, set
    --  True), or non case sensitive (e.g., in Windows, set False).