OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

s-regpat.adb (Parse_Character_Class): Fix handling of empty character classes ("[]").

Browse Source 
2007-09-10  Emmanuel Briot  <briot@adacore.com>

	* s-regpat.adb (Parse_Character_Class): Fix handling of empty character
	classes ("[]").

From-SVN: r128333
This commit is contained in:
Emmanuel Briot 2007-09-10 14:47:36 +02:00 committed by Arnaud Charlet
parent b5c84c3ccf
commit 36df551d43
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/ada/s-regpat.adb
View File

@ -1457,6 +1457,10 @@ package body System.Regpat is
elsif not In_Range then elsif not In_Range then
Last_Value := Value; Last_Value := Value;
if Parse_Pos > Expression'Last then
Fail ("Empty character class []");
end if;
if Expression (Parse_Pos) = '-' if Expression (Parse_Pos) = '-'
and then Parse_Pos < Parse_End and then Parse_Pos < Parse_End
and then Expression (Parse_Pos + 1) /= ']' and then Expression (Parse_Pos + 1) /= ']'