summaryrefslogtreecommitdiff
path: root/gcc/ada/s-dimmks.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2012-02-08 10:13:54 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2012-02-08 10:13:54 +0000
commit70db3df9541cbf4b93af420b00b22237521f1181 (patch)
treeac74688e2712a1abbfa5739a283cc020bbff4d7a /gcc/ada/s-dimmks.ads
parentb15003c30f919aedce170d8e0166745eec4d83aa (diff)
downloadgcc-70db3df9541cbf4b93af420b00b22237521f1181.tar.gz
2012-02-08 Vincent Celier <celier@adacore.com>
* gcc-interface/Make-lang.in: Add g-byorma.o to gnatbind objects (g-buorma is now imported by sinput). Update dependencies. * scn.adb (Initialize_Scanner): Call Check_For_BOM * sinput-p.adb (Source_File_Is_Subunit): Call Check_For_BOM * sinput.adb: New procedure Check_For_BOM * sinput.ads: New procedure Check_For_BOM 2012-02-08 Vincent Pucci <pucci@adacore.com> * impunit.adb: Dimension package names updated * Makefile.rtl: s-dim added * sem_dim.adb (Is_Procedure_Put_Call): minor changes (Is_Dim_IO_Package_Instantiation): minor changes * sem_dim.ads: minor changes in comments * snames.ads-tmpl: Name_Dim added Name_Dim_Float_IO and Name_Dim_Integer_IO removed * s-dim.ads: New package. Define the dimension terminology. * s-diflio.adb, s-diinio.adb, s-dimkio.ads, s-dimmks.ads, * s-dmotpr.ads: Package names updated. * s-diflio.ads, s-diinio.ads: Documentation added and package names updated. 2012-02-08 Gary Dismukes <dismukes@adacore.com> * gcc-interface/utils2.c (build_call_alloc_dealloc_proc): Revise test for storage pools to test for an underlying record type rather than testing Is_Tagged_Type, so that simple storage pools will be handled the same as normal Ada storage pools. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@184004 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-dimmks.ads')
-rw-r--r--gcc/ada/s-dimmks.ads10
1 files changed, 6 insertions, 4 deletions
diff --git a/gcc/ada/s-dimmks.ads b/gcc/ada/s-dimmks.ads
index 1ee73872136..28e8563c732 100644
--- a/gcc/ada/s-dimmks.ads
+++ b/gcc/ada/s-dimmks.ads
@@ -2,7 +2,7 @@
-- --
-- GNAT RUN-TIME COMPONENTS --
-- --
--- S Y S T E M . D I M _ M K S --
+-- S Y S T E M . D I M . M K S --
-- --
-- S p e c --
-- --
@@ -35,9 +35,11 @@
-- System.Dim_Mks.Other_Prefixes) in order to avoid too many constant
-- declarations in this package.
+-- The dimension terminology is defined in System.Dim_IO package
+
with Ada.Numerics;
-package System.Dim_Mks is
+package System.Dim.Mks is
e : constant := Ada.Numerics.e;
Pi : constant := Ada.Numerics.Pi;
@@ -54,7 +56,7 @@ package System.Dim_Mks is
(Mole, "mol"),
(Candela, "cd"));
- -- SI Base
+ -- SI Base dimensioned subtype
subtype Length is Mks_Type
with
@@ -321,4 +323,4 @@ package System.Dim_Mks is
kA : constant Electric_Current := 1.0E+03; -- kilo
MeA : constant Electric_Current := 1.0E+06; -- mega
-end System.Dim_Mks;
+end System.Dim.Mks;