diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-08 06:57:39 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-08 06:57:39 +0000 |
commit | cbe489867d6c54db429d6e8dfc8ccfb3be15f1a1 (patch) | |
tree | 6cffd6610375b23eb865fd9a5ef43bdbfbf75654 /gcc/ada/a-strunb.ads | |
parent | 8464d0aa2ec6239305734446c11f0f11280c1410 (diff) | |
download | gcc-cbe489867d6c54db429d6e8dfc8ccfb3be15f1a1.tar.gz |
2008-04-08 Robert Dewar <dewar@adacore.com>
Bob Duff <duff@adacore.com>
* impunit.adb: Add Interfaces.Java.JNI, System.Strings.Stream_Ops,
Ada.Calendar.Conversions, Ada.Dispatching.EDF, GNAT.Time_Stamp
* s-intman-mingw.adb: Minor comment fix -- spell 'explicitly' correctly
* g-trasym.adb: Minor comment fix -- spell 'explicitly' correctly
* g-trasym.ads: Minor comment improvements
* s-stalib.adb: Minor comment fix -- spell 'explicitly' correctly
* a-sequio.ads, a-direio.ads: improve message for tagged type
* a-strunb.ads: Minor reformatting
* a-tifiio.adb: Minor reformatting
* atree.adb (Fix_Parents): Use clearer names for formals
Cleanup and simplify code
Use named notation in calls
* exp_fixd.adb (Do_Multiply_Fixed_Universal): Use named notation in
confusing calls
* uintp.adb: Used named notation for some confusing calls
* bindusg.adb: Minor change in one line of output
* cstand.adb: Minor reformatting of src representation of Standard
* a-assert.ads: Add comment.
* g-decstr.adb: Fix bad indentation
* expander.ads, expander.adb: Code clean up.
* sem_dist.ads, sem_type.adb, g-dirope.ads, g-exctra.ads, s-valwch.adb,
s-wchstw.adb, targparm.ads, widechar.adb: Minor reformatting
* i-cstrin.adb: Fix casing error in formal parameter name in call
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@134063 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-strunb.ads')
-rw-r--r-- | gcc/ada/a-strunb.ads | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/a-strunb.ads b/gcc/ada/a-strunb.ads index a213f0b37e2..1601f3fef74 100644 --- a/gcc/ada/a-strunb.ads +++ b/gcc/ada/a-strunb.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2006, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2008, Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -395,7 +395,6 @@ private Reference : String_Access := Null_String'Access; Last : Natural := 0; end record; - -- The Unbounded_String is using a buffered implementation to increase -- speed of the Append/Delete/Insert procedures. The Reference string -- pointer above contains the current string value and extra room at the @@ -404,6 +403,7 @@ private -- Reference (1 .. Last). pragma Stream_Convert (Unbounded_String, To_Unbounded, To_String); + -- Provide stream routines without dragging in Ada.Streams pragma Finalize_Storage_Only (Unbounded_String); -- Finalization is required only for freeing storage |