diff options
Diffstat (limited to 'gcc/ada/a-strunb-shared.ads')
| -rw-r--r-- | gcc/ada/a-strunb-shared.ads | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/a-strunb-shared.ads b/gcc/ada/a-strunb-shared.ads index 617e210bbb1..e952b8e849d 100644 --- a/gcc/ada/a-strunb-shared.ads +++ b/gcc/ada/a-strunb-shared.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2010, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2011, 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 -- @@ -70,7 +70,7 @@ with Ada.Strings.Maps; private with Ada.Finalization; -private with Interfaces; +private with System.Atomic_Counters; package Ada.Strings.Unbounded is pragma Preelaborate; @@ -430,7 +430,7 @@ private package AF renames Ada.Finalization; type Shared_String (Max_Length : Natural) is limited record - Counter : aliased Interfaces.Unsigned_32 := 1; + Counter : System.Atomic_Counters.Atomic_Counter; -- Reference counter Last : Natural := 0; |