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@
*)
(* <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@
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@
*)
(*
all the functions below are declared internally to gm2
- ====================================================
+ ======================================================
PROCEDURE ADR (VAR v: <anytype>): ADDRESS;
(* Returns the address of variable v. *)
@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. *)
@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. *)
*)
(*
all the functions below are declared internally to gm2
- ====================================================
+ ======================================================
@findex ADR
PROCEDURE ADR (VAR v: <anytype>): ADDRESS;
@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. *)
*)
(*
all the functions below are declared internally to gm2
- ====================================================
+ ======================================================
@findex ADR
PROCEDURE ADR (VAR v: <anytype>): ADDRESS;
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. *)
*)
@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. *)