From 28963c8f26b1ad75f6bfba4653708f4e0ec22d79 Mon Sep 17 00:00:00 2001
From: Paul Brook <paul@codesourcery.com>
Date: Sun, 16 May 2004 18:21:42 +0000
Subject: [PATCH] * io/format.c (format_lex): Make c an int.

From-SVN: r81920
---
 libgfortran/ChangeLog   | 4 ++++
 libgfortran/io/format.c | 3 ++-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 05609b4f5b4..2b897dd81d7 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+2004-05-16  Paul Brook  <paul@codesourcery.com>
+
+	* io/format.c (format_lex): Make c an int.
+
 2004-05-16  Janne Blomqvist  <jblomqvi@cc.hut.fi>
 	Paul Brook  <paul@codesourcery.com>
 
diff --git a/libgfortran/io/format.c b/libgfortran/io/format.c
index 0be913c59b9..4255e29f49c 100644
--- a/libgfortran/io/format.c
+++ b/libgfortran/io/format.c
@@ -164,7 +164,8 @@ format_lex (void)
 {
   format_token token;
   int negative_flag;
-  char c, delim;
+  int c;
+  char delim;
 
   if (saved_token != FMT_NONE)
     {