diff options
| author | Richard Kenner <kenner@gnat.com> | 2001-10-26 17:03:05 +0000 |
|---|---|---|
| committer | Geert Bosch <bosch@gcc.gnu.org> | 2001-10-26 19:03:05 +0200 |
| commit | c0b1738da2f6682ed11ed77389e8ee9b3acd2448 (patch) | |
| tree | 9a7b6858610b5c22805cf799de615e2737d3f72c /gcc | |
| parent | 5b09c1536828dd5d11dc5755956357427dbacdc4 (diff) | |
| download | gcc-c0b1738da2f6682ed11ed77389e8ee9b3acd2448.zip gcc-c0b1738da2f6682ed11ed77389e8ee9b3acd2448.tar.gz gcc-c0b1738da2f6682ed11ed77389e8ee9b3acd2448.tar.bz2 | |
* gmem.c (__gnat_gmem_read_next): Properly check for EOF
From-SVN: r46552
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/gmem.c | 9 |
2 files changed, 9 insertions, 4 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 3ddc5f9..c302afa 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,9 @@ 2001-10-26 Richard Kenner <kenner@gnat.com> + * gmem.c (__gnat_gmem_read_next): Properly check for EOF + +2001-10-26 Richard Kenner <kenner@gnat.com> + * decl.c (validate_size): Modify message for bad size to avoid implication that compiler is modifying the size. diff --git a/gcc/ada/gmem.c b/gcc/ada/gmem.c index 809ef0b..772667b 100644 --- a/gcc/ada/gmem.c +++ b/gcc/ada/gmem.c @@ -112,7 +112,7 @@ __gnat_gmem_initialize (dumpname) fclose (gmemfile); return 0; } - + return 1; } @@ -140,16 +140,17 @@ __gnat_gmem_read_next (buf) { void *addr; int size; - char c; + int j; - if ((c = fgetc (gmemfile)) == EOF) + j = fgetc (gmemfile); + if (j == EOF) { fclose (gmemfile); sprintf (buf, "Program exited."); } else { - switch (c) + switch (j) { case 'A' : fread (&addr, sizeof (char *), 1, gmemfile); |