Return to machdefs.h CVS log

Up to [CSRG BSD Unix] / 43BSD / usr.bin / f77 / include

Annotation of 43BSD/usr.bin/f77/include/machdefs.h, revision 1.1.1.1

1.1       root        1: /*
                      2:  * machdefs.h
                      3:  *
                      4:  * Machine definitions for f77 compiler, pass 1.  VAX version.
                      5:  *
                      6:  * University of Utah CS Dept modification history:
                      7:  *
                      8:  * $Header: machdefs.h,v 2.2 85/01/14 03:41:13 donn Exp $
                      9:  * $Log:       machdefs.h,v $
                     10:  * Revision 2.2  85/01/14  03:41:13  donn
                     11:  * Added changes to make the storage used for constants that are passed
                     12:  * as arguments to functions come out read-only.
                     13:  * 
                     14:  * Revision 2.1  84/07/19  12:55:11  donn
                     15:  * Changed comment header to UofU.
                     16:  * 
                     17:  * Revision 1.3  84/07/02  12:04:42  donn
                     18:  * I goofed when I added the original changes for SZFLOAT and SZDOUBLE.
                     19:  * Thanks to Raleigh Romine for pointing this out (sigh).
                     20:  * 
                     21:  * Revision 1.2  84/02/28  20:46:16  donn
                     22:  * Added definitions for SZFLOAT and SZDOUBLE, needed by Berkeley changes to
                     23:  * produce shorter offsets to variables in machine code.
                     24:  * 
                     25:  */
                     26: 
                     27: #ifndef TARGET
                     28: TARGET NOT DEFINED !!!
                     29: #endif
                     30: #if TARGET!=VAX
                     31: Target= TARGET OUT OF RANGE!!
                     32: #endif
                     33: 
                     34: #ifndef FAMILY
                     35: FAMILY NOT DEFINED!!!
                     36: #endif
                     37: #if FAMILY!=PCC && FAMILY!=DMR
                     38: Family = FAMILY OUT OF RANGE
                     39: #endif
                     40: 
                     41: #define SDB 1
                     42: 
                     43: #define TYLENG         TYLONG
                     44: 
                     45: #define TYINT          TYLONG
                     46: #define SZADDR         4
                     47: #define SZSHORT                2
                     48: #define SZINT          4
                     49: #define SZFLOAT                4
                     50: #define SZDOUBLE       8
                     51: 
                     52: #define SZLONG         4
                     53: #define SZLENG         SZLONG
                     54: 
                     55: #define ALIADDR SZADDR
                     56: #define ALISHORT SZSHORT
                     57: #define ALILONG 4
                     58: #define ALIDOUBLE 4
                     59: #define ALIINT ALILONG
                     60: #define ALILENG        ALILONG
                     61: 
                     62: #define AUTOREG 13
                     63: #define ARGREG 12
                     64: #define CARGREG 12
                     65: #define ARGOFFSET 4
                     66: #define SAVESPACE 40
                     67: 
                     68: 
                     69: #define FUDGEOFFSET 1
                     70: #define BITSPERCHAR 8
                     71: #define XL 16
                     72: 
                     73: #define USETEXT        ".text\t0"
                     74: #define USECONST       ".text\t1"
                     75: #define USEBSS ".data\t0"
                     76: #define USEINIT        ".data\t1"
                     77: 
                     78: #define BLANKCOMMON "_BLNK_"
                     79: 
                     80: #define LABELFMT "%s:\n"
                     81: 
                     82: #define MAXREGVAR 5
                     83: #define TYIREG TYLONG
                     84: #define MSKIREG  (M(TYSHORT)|M(TYLONG))
                     85: 
                     86: #define MAXINT 2147483647
                     87: #define MININT  ((-2147483647) - 1)
                     88: 
                     89: #define MAXBYTE        255
                     90: #define BYTESIZE       8
                     91: 
                     92: #define SMALLVAR(x) ((x) < 512)

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.