diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2003-10-23 12:15:00 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2003-10-23 12:15:00 +0200 |
| commit | 6d244bbea8b8d094bd27172bfb890b1cf595b1b6 (patch) | |
| tree | 83af38aa397c50755531e2b8a3dce1226b37d923 | |
| parent | 8f4eb34be674c9a0f3f8fe9ed22516a5c622aabc (diff) | |
| download | gcc-6d244bbea8b8d094bd27172bfb890b1cf595b1b6.zip gcc-6d244bbea8b8d094bd27172bfb890b1cf595b1b6.tar.gz gcc-6d244bbea8b8d094bd27172bfb890b1cf595b1b6.tar.bz2 | |
* init.c, adaint.c: Minor reformatting.
From-SVN: r72841
| -rw-r--r-- | gcc/ada/ChangeLog | 15 | ||||
| -rw-r--r-- | gcc/ada/adaint.c | 4 | ||||
| -rw-r--r-- | gcc/ada/init.c | 4 |
3 files changed, 13 insertions, 10 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 8373bfc..3ddc2d3 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -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, diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index 7502057..c5a1cdd 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -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); diff --git a/gcc/ada/init.c b/gcc/ada/init.c index 6995b8c..c23819d 100644 --- a/gcc/ada/init.c +++ b/gcc/ada/init.c @@ -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)); |