Pristine Ack-5.5
[Ack-5.5.git] / lang / fortran / comp / machdefs.h
1 #define TYLENG  TYLONG          /* char string length field */
2
3 #define TYINT   TYLONG
4 #define SZADDR  4
5 #define SZSHORT 2
6 #define SZINT   4
7
8 #define SZLONG  4
9 #define SZLENG  SZLONG
10
11 #define SZDREAL 8
12
13 /* Alignment restrictions */
14
15 #define ALIADDR SZADDR
16 #define ALISHORT SZSHORT
17 #define ALILONG 4
18 #define ALIDOUBLE 8
19 #define ALIINT  ALILONG
20 #define ALILENG ALILONG
21
22 #define BLANKCOMMON "_BLNK__"           /* Name for the unnamed
23                                            common block; this is unique
24                                            because of underscores */
25
26 #define LABELFMT "%s:\n"
27
28 #define MAXREGVAR 4
29 #define TYIREG TYLONG
30 #define MSKIREG  (M(TYSHORT)|M(TYLONG)) /* allowed types of DO indicies
31                                            which can be put in registers */