aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/g-htable.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/g-htable.ads')
-rw-r--r--gcc/ada/g-htable.ads15
1 files changed, 7 insertions, 8 deletions
diff --git a/gcc/ada/g-htable.ads b/gcc/ada/g-htable.ads
index 36307f755dd..ef28bc5d675 100644
--- a/gcc/ada/g-htable.ads
+++ b/gcc/ada/g-htable.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1995-2005 AdaCore --
+-- Copyright (C) 1995-2005, 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- --
@@ -46,13 +46,12 @@
with System.HTable;
package GNAT.HTable is
-pragma Preelaborate (HTable);
-
-pragma Elaborate_Body;
--- The elaborate body is because we have a dummy body to deal with bootstrap
--- path problems (we used to have a real body, and now we don't need it any
--- more, but the bootstrap requires that we have a dummy body, since otherwise
--- the old body gets picked up.
+ pragma Preelaborate;
+ pragma Elaborate_Body;
+ -- The elaborate body is because we have a dummy body to deal with
+ -- bootstrap path problems (we used to have a real body, and now we don't
+ -- need it any more, but the bootstrap requires that we have a dummy body,
+ -- since otherwise the old body gets picked up.
-------------------
-- Simple_HTable --