diff options
| -rw-r--r-- | gcc/ada/g-bubsor.ads | 4 | ||||
| -rw-r--r-- | gcc/ada/g-busorg.ads | 5 | ||||
| -rw-r--r-- | gcc/ada/g-heasor.ads | 4 | ||||
| -rw-r--r-- | gcc/ada/g-hesorg.ads | 5 |
4 files changed, 8 insertions, 10 deletions
diff --git a/gcc/ada/g-bubsor.ads b/gcc/ada/g-bubsor.ads index 19dcbef7db9..d88a1753ec9 100644 --- a/gcc/ada/g-bubsor.ads +++ b/gcc/ada/g-bubsor.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1995-2005, AdaCore -- +-- Copyright (C) 1995-2006, AdaCore -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -44,7 +44,7 @@ -- has the advantage of being Pure, while this unit can only be Preelaborate. package GNAT.Bubble_Sort is - pragma Preelaborate; + pragma Pure; -- The data to be sorted is assumed to be indexed by integer values from -- 1 to N, where N is the number of items to be sorted. diff --git a/gcc/ada/g-busorg.ads b/gcc/ada/g-busorg.ads index 1e90d347a32..e99ba2a7c15 100644 --- a/gcc/ada/g-busorg.ads +++ b/gcc/ada/g-busorg.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1995-2005, AdaCore -- +-- Copyright (C) 1995-2006, AdaCore -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -39,8 +39,7 @@ -- See also GNAT.Bubble_Sort, a version that works with subprogram access -- parameters, allowing code sharing. The generic version is slightly more -- efficient but does not allow code sharing and has an interface that is --- more awkward to use. The generic version is also Pure, while the access --- subprograqm version can only be Preelaborate. +-- more awkward to use. -- There is also GNAT.Bubble_Sort_A, which is now considered obsolete, but -- was an older version working with subprogram parameters. This version diff --git a/gcc/ada/g-heasor.ads b/gcc/ada/g-heasor.ads index e3b406728cb..a30d0b6325b 100644 --- a/gcc/ada/g-heasor.ads +++ b/gcc/ada/g-heasor.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1995-2005, AdaCore -- +-- Copyright (C) 1995-2006, AdaCore -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -51,7 +51,7 @@ -- retained in the GNAT library for backwards compatibility. package GNAT.Heap_Sort is - pragma Preelaborate; + pragma Pure; -- The data to be sorted is assumed to be indexed by integer values -- from 1 to N, where N is the number of items to be sorted. diff --git a/gcc/ada/g-hesorg.ads b/gcc/ada/g-hesorg.ads index 04f2371d5b0..e7b38808c08 100644 --- a/gcc/ada/g-hesorg.ads +++ b/gcc/ada/g-hesorg.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1995-2005, AdaCore -- +-- Copyright (C) 1995-2006, AdaCore -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -39,8 +39,7 @@ -- See also GNAT.Heap_Sort, a version that works with subprogram access -- parameters, allowing code sharing. The generic version is slightly more -- efficient but does not allow code sharing and has an interface that is --- more awkward to use. The generic version is also Pure, while the access --- subprogram version can only be Preelaborate. +-- more awkward to use. -- There is also GNAT.Heap_Sort_A, which is now considered obsolete, but -- was an older version working with subprogram parameters. This version |