diff options
Diffstat (limited to 'gcc/ada/par-ch13.adb')
| -rw-r--r-- | gcc/ada/par-ch13.adb | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/gcc/ada/par-ch13.adb b/gcc/ada/par-ch13.adb index 0fadd30..18c63a3 100644 --- a/gcc/ada/par-ch13.adb +++ b/gcc/ada/par-ch13.adb @@ -88,9 +88,9 @@ package body Ch13 is Result := True; else Scan; -- past identifier - Result := Token = Tok_Arrow - or else Token = Tok_Comma - or else Token = Tok_Semicolon; + Result := Token = Tok_Arrow or else + Token = Tok_Comma or else + Token = Tok_Semicolon; end if; -- If earlier than Ada 2012, check for valid aspect identifier (possibly @@ -113,9 +113,7 @@ package body Ch13 is -- defaulted True value. Further checks when analyzing aspect -- specification, which may include further aspects. - elsif Token = Tok_Comma - or else Token = Tok_Semicolon - then + elsif Token = Tok_Comma or else Token = Tok_Semicolon then Result := True; elsif Token = Tok_Apostrophe then |