diff options
author | Robert Dewar <dewar@adacore.com> | 2010-09-10 11:01:37 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-09-10 13:01:37 +0200 |
commit | 0d57c6f43f9948795a8bd7d35053fe229ea6bacd (patch) | |
tree | d4e6705fbd48b04ad6efd2b4decba123ab98240d /gcc/ada/sprint.ads | |
parent | 88df93ce3baa8e070122533b31928d3876138488 (diff) | |
download | gcc-0d57c6f43f9948795a8bd7d35053fe229ea6bacd.tar.gz |
repinfo.adb (List_Type_Info): List Small and Range for fixed-point types.
2010-09-10 Robert Dewar <dewar@adacore.com>
* repinfo.adb (List_Type_Info): List Small and Range for fixed-point
types.
* sprint.adb (Write_Ureal_With_Col_Check_Sloc): Use square brackets
rather than parens for fixed constants.
* sprint.ads: Use square brackets rather than parens for fixed constants
* urealp.adb (UR_Write): Use square brackets rather than parens
(UR_Write): Add Brackets argument
(UR_Write): Add many more special cases to output literals
* urealp.ads (UR_Write): Use square brackets rather than parens
(UR_Write): Add Brackets argument
2010-09-10 Robert Dewar <dewar@adacore.com>
* sem_ch4.adb: Minor reformatting.
From-SVN: r164165
Diffstat (limited to 'gcc/ada/sprint.ads')
-rw-r--r-- | gcc/ada/sprint.ads | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sprint.ads b/gcc/ada/sprint.ads index 64fe81ae4c5..ffbe2088624 100644 --- a/gcc/ada/sprint.ads +++ b/gcc/ada/sprint.ads @@ -76,7 +76,7 @@ package Sprint is -- Push exception label %push_xxx_exception_label (label) -- Raise xxx error [xxx_error [when cond]] -- Raise xxx error with msg [xxx_error [when cond], "msg"] - -- Rational literal See UR_Write for details + -- Rational literal [expression] -- Rem wi Treat_Fixed_As_Integer x #rem y -- Reference expression'reference -- Shift nodes shift_name!(expr, count) |