[multiple changes]

2009-10-30  Emmanuel Briot  <briot@adacore.com>

	* make.adb (Start_Compile_If_Possible): Compute location of resulting
	ALI file in this procedure instead of after the compilation itself,
	since the current directory might have changed in between when using
	-j<n>.

	* osint.ads: Addded missing alignment clause.

	* adaint.c, adaint.h, osint.adb (__gnat_reset_attributes,
	__gnat_size_of_file_attributes): Rename reset_attributes and
	size_of_file_attributes.

2009-10-30  Javier Miranda  <miranda@adacore.com>

	* sem_scil.adb (Adjust_SCIL_Node): Add missing management of sequences
	of statements when searching for SCIL nodes.

2009-10-30  Tristan Gingold  <gingold@adacore.com>

	* gnatlink.adb, link.c: By default use shared libgcc on darwin.

From-SVN: r153749

1 files changed, 13 insertions, 13 deletions

diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index e26f3ca..5bce387 100644
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -325,7 +325,7 @@ const int __gnat_vmsp = 0;
 #endif
 
 /* Used for Ada bindings */
-const int size_of_file_attributes = sizeof (struct file_attributes);
+const int __gnat_size_of_file_attributes = sizeof (struct file_attributes);
 
 /* Reset the file attributes as if no system call had been performed */
 void __gnat_stat_to_attr (int fd, char* name, struct file_attributes* attr);
@@ -378,7 +378,7 @@ to_ptr32 (char **ptr64)
 #endif
 
 void
-reset_attributes
+__gnat_reset_attributes
   (struct file_attributes* attr)
 {
   attr->exists     = -1;
@@ -1133,7 +1133,7 @@ long
 __gnat_file_length (int fd)
 {
   struct file_attributes attr;
-  reset_attributes (&attr);
+  __gnat_reset_attributes (&attr);
   return __gnat_file_length_attr (fd, NULL, &attr);
 }
 
@@ -1141,7 +1141,7 @@ long
 __gnat_named_file_length (char *name)
 {
   struct file_attributes attr;
-  reset_attributes (&attr);
+  __gnat_reset_attributes (&attr);
   return __gnat_file_length_attr (-1, name, &attr);
 }
 
@@ -1371,7 +1371,7 @@ OS_Time
 __gnat_file_time_name (char *name)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_file_time_name_attr (name, &attr);
 }
 
@@ -1465,7 +1465,7 @@ OS_Time
 __gnat_file_time_fd (int fd)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_file_time_fd_attr (fd, &attr);
 }
 
@@ -1819,7 +1819,7 @@ int
 __gnat_file_exists (char *name)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_file_exists_attr (name, &attr);
 }
 
@@ -1876,7 +1876,7 @@ int
 __gnat_is_regular_file (char *name)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_is_regular_file_attr (name, &attr);
 }
 
@@ -1894,7 +1894,7 @@ int
 __gnat_is_directory (char *name)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_is_directory_attr (name, &attr);
 }
 
@@ -2118,7 +2118,7 @@ int
 __gnat_is_readable_file (char *name)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_is_readable_file_attr (name, &attr);
 }
 
@@ -2156,7 +2156,7 @@ int
 __gnat_is_writable_file (char *name)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_is_writable_file_attr (name, &attr);
 }
 
@@ -2192,7 +2192,7 @@ int
 __gnat_is_executable_file (char *name)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_is_executable_file_attr (name, &attr);
 }
 
@@ -2334,7 +2334,7 @@ int
 __gnat_is_symbolic_link (char *name ATTRIBUTE_UNUSED)
 {
    struct file_attributes attr;
-   reset_attributes (&attr);
+   __gnat_reset_attributes (&attr);
    return __gnat_is_symbolic_link_attr (name, &attr);
 
 }