diff options
| author | Arnaud Charlet <charlet@act-europe.fr> | 2003-10-23 10:15:00 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@act-europe.fr> | 2003-10-23 10:15:00 +0000 |
| commit | 2780ecb5a3b3ffe54de68a1a770a1b34f3e8d6d1 (patch) | |
| tree | 83af38aa397c50755531e2b8a3dce1226b37d923 | |
| parent | 6700664fb8b4fb6855e0fc1fce05f10509624c04 (diff) | |
* init.c, adaint.c: Minor reformatting.
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@72841 138bc75d-0d04-0410-961f-82ee72b054a4
| -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 8373bfc36c3..3ddc2d31ae1 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 75020576425..c5a1cddced6 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 6995b8c7ca3..c23819d7e08 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)); |