* g-regpat.adb: (Match): Change a misuse of or to or else
From-SVN: r91887
This commit is contained in:
parent
2fb9c1bbd4
commit
4722c5d693
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user