diff options
| author | Hristian Kirtchev <kirtchev@adacore.com> | 2016-04-20 10:05:41 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2016-04-20 12:05:41 +0200 |
| commit | b83dd5ecea2899fc6220aa8be8f999ed61a6b62f (patch) | |
| tree | 3438abf83b3f97d2bcec2c7f57ba4b88008aa762 /gcc/ada/s-imguns.adb | |
| parent | 2697b189020b174f822a756914af6a04c905b435 (diff) | |
| download | gcc-b83dd5ecea2899fc6220aa8be8f999ed61a6b62f.tar.gz | |
s-imgllu.adb, [...]: Minor reformatting.
2016-04-20 Hristian Kirtchev <kirtchev@adacore.com>
* s-imgllu.adb, sem_util.adb, s-imgint.adb, s-imguns.adb,
s-imglli.adb: Minor reformatting.
From-SVN: r235251
Diffstat (limited to 'gcc/ada/s-imguns.adb')
| -rw-r--r-- | gcc/ada/s-imguns.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/s-imguns.adb b/gcc/ada/s-imguns.adb index c6df94c936a..c466db3f671 100644 --- a/gcc/ada/s-imguns.adb +++ b/gcc/ada/s-imguns.adb @@ -56,7 +56,8 @@ package body System.Img_Uns is procedure Set_Image_Unsigned (V : Unsigned; S : in out String; - P : in out Natural) is + P : in out Natural) + is begin if V >= 10 then Set_Image_Unsigned (V / 10, S, P); |