diff options
| author | Hristian Kirtchev <kirtchev@adacore.com> | 2018-06-11 09:19:40 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2018-06-11 09:19:40 +0000 |
| commit | 1985767d6517bd8daa0625f3923e24f0861f68b8 (patch) | |
| tree | 972a5ecf16839a0193530c3bec5cef7a05c52b83 /gcc/ada/libgnat/a-ciormu.adb | |
| parent | ed6a6b4ea977ba93f66357de7c725d0c17ac3792 (diff) | |
| download | gcc-1985767d6517bd8daa0625f3923e24f0861f68b8.zip gcc-1985767d6517bd8daa0625f3923e24f0861f68b8.tar.gz gcc-1985767d6517bd8daa0625f3923e24f0861f68b8.tar.bz2 | |
[Ada] Minor reformatting
2018-06-11 Hristian Kirtchev <kirtchev@adacore.com>
gcc/ada/
* exp_ch9.adb, exp_unst.adb, inline.adb, libgnat/a-ciorma.adb,
libgnat/a-ciormu.adb, libgnat/a-ciorse.adb, libgnat/a-coorma.adb,
libgnat/a-coormu.adb, libgnat/a-coorse.adb, sem_prag.adb: Minor
reformatting.
From-SVN: r261429
Diffstat (limited to 'gcc/ada/libgnat/a-ciormu.adb')
| -rw-r--r-- | gcc/ada/libgnat/a-ciormu.adb | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/libgnat/a-ciormu.adb b/gcc/ada/libgnat/a-ciormu.adb index 5c3e9f7..0483f0a 100644 --- a/gcc/ada/libgnat/a-ciormu.adb +++ b/gcc/ada/libgnat/a-ciormu.adb @@ -545,9 +545,10 @@ package body Ada.Containers.Indefinite_Ordered_Multisets is raise Program_Error with "Position cursor is bad"; end if; - if Checks and then - (Left (Position.Node) = Position.Node - or else Right (Position.Node) = Position.Node) + if Checks + and then (Left (Position.Node) = Position.Node + or else + Right (Position.Node) = Position.Node) then raise Program_Error with "dangling cursor"; end if; |