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/ada/gmem.c | |
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/ada/gmem.c')
-rw-r--r-- | gcc/ada/gmem.c | 9 |
1 files changed, 5 insertions, 4 deletions
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); |