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

* g-regpat.adb: (Match): Change a misuse of or to or else 

From-SVN: r91887
This commit is contained in:
Arnaud Charlet 2004-12-08 12:46:58 +01:00
parent 2fb9c1bbd4
commit 4722c5d693
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gcc/ada/g-regpat.adb
View File

@ -2549,7 +2549,7 @@ package body GNAT.Regpat is
end if;
Scan := Get_Next (Program, Scan);
exit when Scan = 0 or Program (Scan) /= BRANCH;
exit when Scan = 0 or else Program (Scan) /= BRANCH;
end loop;
exit State_Machine;