procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

match.c (gfc_match): Add assertion to catch wrong calls trying to match upper-case characters.

Browse source 
2008-07-24  Daniel Kraft  <d@domob.eu>

	* match.c (gfc_match):  Add assertion to catch wrong calls trying to
	match upper-case characters.

From-SVN: r138120
This commit is contained in:
Daniel Kraft 2008-07-24 18:06:55 +02:00 • committed by Daniel Kraft
parent 56b7e765f5
commit befdf74172
2 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/fortran/ChangeLog
View file

@ -1,3 +1,8 @@
2008-07-24 Daniel Kraft <d@domob.eu>
* match.c (gfc_match): Add assertion to catch wrong calls trying to
match upper-case characters.
2008-07-24 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/29952

5
gcc/fortran/match.c
View file

@ -1187,6 +1187,11 @@ loop:
}
default:
/* gfc_next_ascii_char converts characters to lower-case, so we shouldn't
expect an upper case character here! */
gcc_assert (TOLOWER (c) == c);
if (c == gfc_next_ascii_char ())
goto loop;
break;