From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 1499) id A2A04382EF2C; Wed, 14 Dec 2022 12:18:23 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org A2A04382EF2C DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1671020303; bh=EH59PJprTZuFxT5f6gYKRaoTJfWdLiFS7+ToK5OTfCU=; h=From:To:Subject:Date:From; b=b8PePoiPxa9Vg5ynKzXu2VqSRkM++iFFqxj7URX2CSw5RT+LQMaLNKymaUMGYiacK Cgcwc4wa66DxMK4WYqWVyTiX8oI6OfgHL4C4EcubGwC4NA4G9J3g/OToaq9m4/PApD lVnNMc8DUB2j8e3hciWDaloN+/gM1W/ZbrdbN6L0= Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit From: Gaius Mulley To: gcc-cvs@gcc.gnu.org Subject: [gcc/devel/modula-2] Add list of potential target datatype comments to SYSTEM.def X-Act-Checkin: gcc X-Git-Author: Gaius Mulley X-Git-Refname: refs/heads/devel/modula-2 X-Git-Oldrev: 28f261c515c6e8ef5a430c2f191711be163b1306 X-Git-Newrev: 2922dd0987902a0afa0a019f6e39a7582ff7954e Message-Id: <20221214121823.A2A04382EF2C@sourceware.org> Date: Wed, 14 Dec 2022 12:18:23 +0000 (GMT) List-Id: https://gcc.gnu.org/g:2922dd0987902a0afa0a019f6e39a7582ff7954e commit 2922dd0987902a0afa0a019f6e39a7582ff7954e Author: Gaius Mulley 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 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 (* ; *) 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: ): 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: ): 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: ): 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. *)