public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
* [gcc/devel/modula-2] Add list of potential target datatype comments to SYSTEM.def
@ 2022-12-14 12:18 Gaius Mulley
  0 siblings, 0 replies; only message in thread
From: Gaius Mulley @ 2022-12-14 12:18 UTC (permalink / raw)
  To: gcc-cvs

https://gcc.gnu.org/g:2922dd0987902a0afa0a019f6e39a7582ff7954e

commit 2922dd0987902a0afa0a019f6e39a7582ff7954e
Author: Gaius Mulley <gaiusmod2@gmail.com>
Date:   Wed Dec 14 12:17:48 2022 +0000

    Add list of potential target datatype comments to SYSTEM.def
    
    Add list of potential target datatype comments to all SYSTEM.def
    files to improve usefulness of target independent documentation.
    
    gcc/m2/ChangeLog:
    
            * gm2-libs-coroutines/SYSTEM.def: Added list of data types.
            * gm2-libs-iso/SYSTEM.def: Added list of data types.
            * gm2-libs/SYSTEM.def: Added list of data types.
            * target-independent/SYSTEM-iso.texi: Rebuilt.
            * target-independent/SYSTEM-pim.texi: Rebuilt.
            * target-independent/gm2-libs.texi: Rebuilt.
    
    Signed-off-by: Gaius Mulley <gaiusmod2@gmail.com>

Diff:
---
 gcc/m2/gm2-libs-coroutines/SYSTEM.def     | 17 +++++++++-
 gcc/m2/gm2-libs-iso/SYSTEM.def            | 18 +++++++++--
 gcc/m2/gm2-libs/SYSTEM.def                | 18 +++++++++--
 gcc/m2/target-independent/SYSTEM-iso.texi | 18 +++++++++--
 gcc/m2/target-independent/SYSTEM-pim.texi | 18 +++++++++--
 gcc/m2/target-independent/gm2-libs.texi   | 53 ++++++++++++++++++++++++++++---
 6 files changed, 128 insertions(+), 14 deletions(-)

diff --git a/gcc/m2/gm2-libs-coroutines/SYSTEM.def b/gcc/m2/gm2-libs-coroutines/SYSTEM.def
index 4ceb284569b..d5650b60d01 100644
--- a/gcc/m2/gm2-libs-coroutines/SYSTEM.def
+++ b/gcc/m2/gm2-libs-coroutines/SYSTEM.def
@@ -51,7 +51,22 @@ TYPE
    PROCESS  = RECORD
                  context: INTEGER ;
               END ;
-(* all the following types are declared internally to gm2
+
+(* Note that the full list of system and sized datatypes include:
+   LOC, WORD, BYTE, ADDRESS,
+
+   (and the non language standard target types)
+
+   INTEGER8, INTEGER16, INTEGER32, INTEGER64,
+   CARDINAL8, CARDINAL16, CARDINAL32, CARDINAL64,
+   WORD16, WORD32, WORD64, BITSET8, BITSET16,
+   BITSET32, REAL32, REAL64, REAL128, COMPLEX32,
+   COMPLEX64, COMPLEX128, CSIZE_T, CSSIZE_T.
+
+   Also note that the non-standard data types will
+   move into another module in the future.  *)
+
+(* The following types are supported on this target:
    @SYSTEM_TYPES@
 *)
 
diff --git a/gcc/m2/gm2-libs-iso/SYSTEM.def b/gcc/m2/gm2-libs-iso/SYSTEM.def
index 638b50b3c8d..716793b706f 100644
--- a/gcc/m2/gm2-libs-iso/SYSTEM.def
+++ b/gcc/m2/gm2-libs-iso/SYSTEM.def
@@ -34,9 +34,23 @@ CONST
                   (* <implementation-defined constant> ; *)
   LOCSPERBYTE = 8 DIV BITSPERLOC ;
 
+(* Note that the full list of system and sized datatypes include:
+   LOC, WORD, BYTE, ADDRESS,
+
+   (and the non language standard target types)
+
+   INTEGER8, INTEGER16, INTEGER32, INTEGER64,
+   CARDINAL8, CARDINAL16, CARDINAL32, CARDINAL64,
+   WORD16, WORD32, WORD64, BITSET8, BITSET16,
+   BITSET32, REAL32, REAL64, REAL128, COMPLEX32,
+   COMPLEX64, COMPLEX128, CSIZE_T, CSSIZE_T.
+
+   Also note that the non-standard data types will
+   move into another module in the future.  *)
+
 (*
-   all the objects below are declared internally to gm2
-   ====================================================
+   All the data types and procedures below are declared internally.
+   ===============================================================
 
 TYPE
    @SYSTEM_TYPES@
diff --git a/gcc/m2/gm2-libs/SYSTEM.def b/gcc/m2/gm2-libs/SYSTEM.def
index a26ea04cabe..2667e3bcdf5 100644
--- a/gcc/m2/gm2-libs/SYSTEM.def
+++ b/gcc/m2/gm2-libs/SYSTEM.def
@@ -35,8 +35,22 @@ CONST
   BITSPERBYTE   = __ATTRIBUTE__ __BUILTIN__ ((BITS_PER_UNIT)) ;
   BYTESPERWORD  = __ATTRIBUTE__ __BUILTIN__ ((UNITS_PER_WORD)) ;
 
+(* Note that the full list of system and sized datatypes include:
+   LOC, WORD, BYTE, ADDRESS,
 
-(* all the following types are declared internally to gm2
+   (and the non language standard target types)
+
+   INTEGER8, INTEGER16, INTEGER32, INTEGER64,
+   CARDINAL8, CARDINAL16, CARDINAL32, CARDINAL64,
+   WORD16, WORD32, WORD64, BITSET8, BITSET16,
+   BITSET32, REAL32, REAL64, REAL128, COMPLEX32,
+   COMPLEX64, COMPLEX128, CSIZE_T, CSSIZE_T.
+
+   Also note that the non-standard data types will
+   move into another module in the future.  *)
+
+
+(* The following types are supported on this target:
 TYPE
    @SYSTEM_TYPES@
 *)
@@ -44,7 +58,7 @@ TYPE
 
 (*
    all the functions below are declared internally to gm2
-   ====================================================
+   ======================================================
 
 PROCEDURE ADR (VAR v: <anytype>): ADDRESS;
   (* Returns the address of variable v. *)
diff --git a/gcc/m2/target-independent/SYSTEM-iso.texi b/gcc/m2/target-independent/SYSTEM-iso.texi
index 052c1ce2218..ece68a1fcdc 100644
--- a/gcc/m2/target-independent/SYSTEM-iso.texi
+++ b/gcc/m2/target-independent/SYSTEM-iso.texi
@@ -29,9 +29,23 @@ CONST
 @findex LOCSPERBYTE (const)
   LOCSPERBYTE = 8 DIV BITSPERLOC ;
 
+(* Note that the full list of system and sized datatypes include:
+   LOC, WORD, BYTE, ADDRESS,
+
+   (and the non language standard target types)
+
+   INTEGER8, INTEGER16, INTEGER32, INTEGER64,
+   CARDINAL8, CARDINAL16, CARDINAL32, CARDINAL64,
+   WORD16, WORD32, WORD64, BITSET8, BITSET16,
+   BITSET32, REAL32, REAL64, REAL128, COMPLEX32,
+   COMPLEX64, COMPLEX128, CSIZE_T, CSSIZE_T.
+
+   Also note that the non-standard data types will
+   move into another module in the future.  *)
+
 (*
-   all the objects below are declared internally to gm2
-   ====================================================
+   All the data types and procedures below are declared internally.
+   ===============================================================
 
 TYPE
    (* Target specific data types.  *)
diff --git a/gcc/m2/target-independent/SYSTEM-pim.texi b/gcc/m2/target-independent/SYSTEM-pim.texi
index 21c1e8300c5..e2afa9d67cc 100644
--- a/gcc/m2/target-independent/SYSTEM-pim.texi
+++ b/gcc/m2/target-independent/SYSTEM-pim.texi
@@ -14,8 +14,22 @@ CONST
 @findex BYTESPERWORD (const)
   BYTESPERWORD  = __ATTRIBUTE__ __BUILTIN__ ((UNITS_PER_WORD)) ;
 
+(* Note that the full list of system and sized datatypes include:
+   LOC, WORD, BYTE, ADDRESS,
 
-(* all the following types are declared internally to gm2
+   (and the non language standard target types)
+
+   INTEGER8, INTEGER16, INTEGER32, INTEGER64,
+   CARDINAL8, CARDINAL16, CARDINAL32, CARDINAL64,
+   WORD16, WORD32, WORD64, BITSET8, BITSET16,
+   BITSET32, REAL32, REAL64, REAL128, COMPLEX32,
+   COMPLEX64, COMPLEX128, CSIZE_T, CSSIZE_T.
+
+   Also note that the non-standard data types will
+   move into another module in the future.  *)
+
+
+(* The following types are supported on this target:
 TYPE
    (* Target specific data types.  *)
 *)
@@ -23,7 +37,7 @@ TYPE
 
 (*
    all the functions below are declared internally to gm2
-   ====================================================
+   ======================================================
 
 @findex ADR
 PROCEDURE ADR (VAR v: <anytype>): ADDRESS;
diff --git a/gcc/m2/target-independent/gm2-libs.texi b/gcc/m2/target-independent/gm2-libs.texi
index 539b2ae760c..09627bde702 100644
--- a/gcc/m2/target-independent/gm2-libs.texi
+++ b/gcc/m2/target-independent/gm2-libs.texi
@@ -3189,8 +3189,22 @@ CONST
 @findex BYTESPERWORD (const)
   BYTESPERWORD  = __ATTRIBUTE__ __BUILTIN__ ((UNITS_PER_WORD)) ;
 
+(* Note that the full list of system and sized datatypes include:
+   LOC, WORD, BYTE, ADDRESS,
 
-(* all the following types are declared internally to gm2
+   (and the non language standard target types)
+
+   INTEGER8, INTEGER16, INTEGER32, INTEGER64,
+   CARDINAL8, CARDINAL16, CARDINAL32, CARDINAL64,
+   WORD16, WORD32, WORD64, BITSET8, BITSET16,
+   BITSET32, REAL32, REAL64, REAL128, COMPLEX32,
+   COMPLEX64, COMPLEX128, CSIZE_T, CSSIZE_T.
+
+   Also note that the non-standard data types will
+   move into another module in the future.  *)
+
+
+(* The following types are supported on this target:
 TYPE
    (* Target specific data types.  *)
 *)
@@ -3198,7 +3212,7 @@ TYPE
 
 (*
    all the functions below are declared internally to gm2
-   ====================================================
+   ======================================================
 
 @findex ADR
 PROCEDURE ADR (VAR v: <anytype>): ADDRESS;
@@ -8501,7 +8515,22 @@ TYPE
                  context: INTEGER ;
 @findex END (type)
               END ;
-(* all the following types are declared internally to gm2
+
+(* Note that the full list of system and sized datatypes include:
+   LOC, WORD, BYTE, ADDRESS,
+
+   (and the non language standard target types)
+
+   INTEGER8, INTEGER16, INTEGER32, INTEGER64,
+   CARDINAL8, CARDINAL16, CARDINAL32, CARDINAL64,
+   WORD16, WORD32, WORD64, BITSET8, BITSET16,
+   BITSET32, REAL32, REAL64, REAL128, COMPLEX32,
+   COMPLEX64, COMPLEX128, CSIZE_T, CSSIZE_T.
+
+   Also note that the non-standard data types will
+   move into another module in the future.  *)
+
+(* The following types are supported on this target:
    (* Target specific data types.  *)
 *)
 
@@ -13120,9 +13149,23 @@ CONST
 @findex LOCSPERBYTE (const)
   LOCSPERBYTE = 8 DIV BITSPERLOC ;
 
+(* Note that the full list of system and sized datatypes include:
+   LOC, WORD, BYTE, ADDRESS,
+
+   (and the non language standard target types)
+
+   INTEGER8, INTEGER16, INTEGER32, INTEGER64,
+   CARDINAL8, CARDINAL16, CARDINAL32, CARDINAL64,
+   WORD16, WORD32, WORD64, BITSET8, BITSET16,
+   BITSET32, REAL32, REAL64, REAL128, COMPLEX32,
+   COMPLEX64, COMPLEX128, CSIZE_T, CSSIZE_T.
+
+   Also note that the non-standard data types will
+   move into another module in the future.  *)
+
 (*
-   all the objects below are declared internally to gm2
-   ====================================================
+   All the data types and procedures below are declared internally.
+   ===============================================================
 
 TYPE
    (* Target specific data types.  *)

^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2022-12-14 12:18 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-12-14 12:18 [gcc/devel/modula-2] Add list of potential target datatype comments to SYSTEM.def Gaius Mulley

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).