BSD 4_4 release
[unix-history] / usr / src / usr.bin / f77 / include.tahoe / machdefs.h
/*-
* Copyright (c) 1991 The Regents of the University of California.
* All rights reserved.
*
* This module is believed to contain source code proprietary to AT&T.
* Use and redistribution is subject to the Berkeley Software License
* Agreement and your Software Agreement with AT&T (Western Electric).
*
* @(#)machdefs.h 5.2 (Berkeley) 4/12/91
*/
/*
* machdefs.h
*
* Machine definitions for f77 compiler, pass 1. VAX version.
*
* University of Utah CS Dept modification history:
*
* $Header: machdefs.h,v 2.2 85/01/14 03:41:13 donn Exp $
* $Log: machdefs.h,v $
* Revision 2.2 85/01/14 03:41:13 donn
* Added changes to make the storage used for constants that are passed
* as arguments to functions come out read-only.
*
* Revision 2.1 84/07/19 12:55:11 donn
* Changed comment header to UofU.
*
* Revision 1.3 84/07/02 12:04:42 donn
* I goofed when I added the original changes for SZFLOAT and SZDOUBLE.
* Thanks to Raleigh Romine for pointing this out (sigh).
*
* Revision 1.2 84/02/28 20:46:16 donn
* Added definitions for SZFLOAT and SZDOUBLE, needed by Berkeley changes to
* produce shorter offsets to variables in machine code.
*
*/
#ifndef TARGET
TARGET NOT DEFINED !!!
#endif
#if TARGET!= TAHOE
Target= TARGET OUT OF RANGE!!
#endif
#ifndef FAMILY
FAMILY NOT DEFINED!!!
#endif
#if FAMILY!=PCC && FAMILY!=DMR
Family = FAMILY OUT OF RANGE
#endif
#define SDB 1
#define TYLENG TYLONG
#define TYINT TYLONG
#define SZADDR 4
#define SZSHORT 2
#define SZINT 4
#define SZFLOAT 4
#define SZDOUBLE 8
#define SZLONG 4
#define SZLENG SZLONG
#define ALIADDR SZADDR
#define ALISHORT SZSHORT
#define ALILONG 4
#define ALIDOUBLE 4
#define ALIINT ALILONG
#define ALILENG ALILONG
#define AUTOREG 13
#define ARGREG 12
#define LVARREG 11
#define ARGOFFSET 4
#define FUDGEOFFSET 1
#define BITSPERCHAR 8
#define XL 16
#define USETEXT ".text"
#define USECONST ".data\t0"
#define USEBSS ".data\t1"
#define USEINIT ".data\t2"
#define BLANKCOMMON "_BLNK_"
#define LABELFMT "%s:\n"
#define MAXREGVAR 5
#define TYIREG TYLONG
#define MSKIREG (M(TYSHORT)|M(TYLONG))
#define MAXINT 0x7fffffff
#define MININT 0x80000000
#define MAXBYTE 0xff
#define BYTESIZE 8
#define SMALLVAR(x) ((x) < 512)