* init.c, adaint.c: Minor reformatting.
authorArnaud Charlet <charlet@gcc.gnu.org>
Thu, 23 Oct 2003 10:15:00 +0000 (12:15 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Thu, 23 Oct 2003 10:15:00 +0000 (12:15 +0200)
From-SVN: r72841

gcc/ada/ChangeLog
gcc/ada/adaint.c
gcc/ada/init.c

index 8373bfc36c30b48f2badf5d977b56eb714be2619..3ddc2d31ae1b36eeec2800ea4651b7f23ecbf2a7 100644 (file)
@@ -1,7 +1,10 @@
+2003-10-23  Arnaud Charlet  <charlet@act-europe.fr>
+
+       * init.c, adaint.c: Minor reformatting.
+
 2003-10-23  Danny Smith  <dannysmith@users.sourceforge.net>
 
-       * ada/adaint.c (w32_epoch_offset): Define static const at file
-       level.
+       * adaint.c (w32_epoch_offset): Define static const at file level.
        (win32_filetime): Replace offset with w32_epoch_offset. Use NULL
        rather than t_create, t_access in call to GetFileTime. Use union
        to convert between FILETIME and  unsigned long long.
@@ -34,7 +37,7 @@
 
 2003-10-22  Arnaud Charlet  <charlet@act-europe.fr>
 
-       * Makefile.in: Disable build of gnatpa. PR ada/10110.
+       * Makefile.in: Disable build of gnatpsta. PR ada/10110.
        * cstreams.c (__gnat_full_name): Minor improvements and clean up
        of previous change.
 
@@ -55,7 +58,7 @@
        * mingw32.h: New file.
        * gnat_wrapper.adb: New file.
 
-2003/10/22  Jerome Roussel  <roussel@act-europe.fr>
+2003-10-22  Jerome Roussel  <roussel@act-europe.fr>
 
        * g-regpat.ads, g-regpat.adb (Match): new function, to know if a
        string match a pre compiled regular expression (the corresponding
@@ -63,7 +66,7 @@
        Fix typos in various comments
        Update copyright notice in spec
 
-2003/10/21  Gary Dismukes  <dismukes@gnat.com>
+2003-10-21  Gary Dismukes  <dismukes@gnat.com>
 
        * exp_ch3.adb: 
        (Component_Needs_Simple_Initialization): Return False when the type is a
@@ -75,7 +78,7 @@
        covers the case of zero-initialization of bit arrays).
        Update copyright notice.
 
-2003/10/21  Ed Schonberg  <schonberg@gnat.com>
+2003-10-21  Ed Schonberg  <schonberg@gnat.com>
 
        * sem_ch12.adb: 
        (Load_Parent_Of_Generic): If parent is compilation unit, stop search,
index 7502057642585a9915774c0fbe4c440e5d06b86a..c5a1cddced685088e37d0a740b071c74a7444644 100644 (file)
@@ -836,7 +836,7 @@ __gnat_file_time_name (char *name)
   time_t ret = 0;
   HANDLE h = CreateFile (name, GENERIC_READ, FILE_SHARE_READ, 0,
                         OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS, 0);
+
   if (h != INVALID_HANDLE_VALUE)
     {
       ret = win32_filetime (h);
@@ -961,7 +961,7 @@ __gnat_set_file_time_name (char *name, time_t time_stamp)
     FILETIME ft_time;
     unsigned long long ull_time;
   } t_write;
-  
+
   HANDLE h  = CreateFile (name, GENERIC_WRITE, FILE_SHARE_WRITE, NULL,
                          OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS,
                          NULL);
index 6995b8c7ca3d90e3b919dc0f29fbfb6c27f86f60..c23819d7e08f520d6bd5cf025791d40496f35093 100644 (file)
@@ -715,7 +715,7 @@ __gnat_error_handler (sig)
       msg = "unhandled signal";
     }
 
-  mstate = (*Get_Machine_State_Addr)();
+  mstate = (*Get_Machine_State_Addr) ();
   if (mstate)
     {
       mstate->eip = info->eip;
@@ -1130,7 +1130,7 @@ __gnat_error_handler (sig, code, sc)
       msg = "unhandled signal";
     }
 
-  mstate = (*Get_Machine_State_Addr)();
+  mstate = (*Get_Machine_State_Addr) ();
   if (mstate != 0)
     memcpy ((void *) mstate, (const void *) sc, sizeof (sigcontext_t));