diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2022-01-18 01:08:53 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-05-09 09:27:37 +0000 |
| commit | a746131d375283f28e6e0a3e45bddffb6d1ebfcd (patch) | |
| tree | 2f83215c313fe27600d98f9d412585de4ed4a2cc /gcc/ada/uintp.adb | |
| parent | 348931ea3e09cbafa0bbd4dadfb05694aef531c0 (diff) | |
| download | gcc-a746131d375283f28e6e0a3e45bddffb6d1ebfcd.zip gcc-a746131d375283f28e6e0a3e45bddffb6d1ebfcd.tar.gz gcc-a746131d375283f28e6e0a3e45bddffb6d1ebfcd.tar.bz2 | |
[Ada] Remove extra space around binary operators
Style cleanups. Violation initially spotted while reading the code for
UI_Expon; other occurrences found with grep (and examined manually,
because sometimes the extra space is needed for a code layout).
gcc/ada/
* bindgen.adb, errout.adb, exp_unst.adb, gnatchop.adb,
libgnat/a-ngcefu.adb, libgnat/a-strunb.adb,
libgnat/a-stwiun.adb, libgnat/a-stzunb.adb,
libgnat/a-wtedit.adb, libgnat/g-debpoo.adb, osint.adb,
sigtramp-vxworks.c, uintp.adb: Remove extra whitespace around +,
-, *, / and **.
Diffstat (limited to 'gcc/ada/uintp.adb')
| -rw-r--r-- | gcc/ada/uintp.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/uintp.adb b/gcc/ada/uintp.adb index 5c13061..854d2e1 100644 --- a/gcc/ada/uintp.adb +++ b/gcc/ada/uintp.adb @@ -1431,7 +1431,7 @@ package body Uintp is N := N / Uint_2; exit when N = Uint_0; - Squares := Squares * Squares; + Squares := Squares * Squares; end loop; Uintp.Release_And_Save (M, Result); |