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 */
32