Return to m-iris4d.h CVS log

Up to [CSRG BSD Unix] / 43BSDReno / contrib / emacs-18.55 / src

Annotation of 43BSDReno/contrib/emacs-18.55/src/m-iris4d.h, revision 1.1

1.1     ! root        1: /* m- file for Iris-4D machines.  Use with s-iris3-6.h
        !             2:    Copyright (C) 1987 Free Software Foundation, Inc.
        !             3: 
        !             4: This file is part of GNU Emacs.
        !             5: 
        !             6: GNU Emacs is distributed in the hope that it will be useful,
        !             7: but WITHOUT ANY WARRANTY.  No author or distributor
        !             8: accepts responsibility to anyone for the consequences of using it
        !             9: or for whether it serves any particular purpose or works at all,
        !            10: unless he says so in writing.  Refer to the GNU Emacs General Public
        !            11: License for full details.
        !            12: 
        !            13: Everyone is granted permission to copy, modify and redistribute
        !            14: GNU Emacs, but only under the conditions described in the
        !            15: GNU Emacs General Public License.   A copy of this license is
        !            16: supposed to have been given to you along with GNU Emacs so you
        !            17: can know your rights and responsibilities.  It should be in a
        !            18: file named COPYING.  Among other things, the copyright notice
        !            19: and this notice must be preserved on all copies.  */
        !            20: 
        !            21: 
        !            22: /* The following three symbols give information on
        !            23:  the size of various data types.  */
        !            24: 
        !            25: #define SHORTBITS 16           /* Number of bits in a short */
        !            26: 
        !            27: #define INTBITS 32             /* Number of bits in an int */
        !            28: 
        !            29: #define LONGBITS 32            /* Number of bits in a long */
        !            30: 
        !            31: /* Define BIG_ENDIAN iff lowest-numbered byte in a word
        !            32:    is the most significant byte.  */
        !            33: 
        !            34: #define BIG_ENDIAN
        !            35: 
        !            36: /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
        !            37:  * group of arguments and treat it as an array of the arguments.  */
        !            38: 
        !            39: #define NO_ARG_ARRAY
        !            40: 
        !            41: /* Define WORD_MACHINE if addresses and such have
        !            42:  * to be corrected before they can be used as byte counts.  */
        !            43: 
        !            44: #undef WORD_MACHINE
        !            45: 
        !            46: /* Define how to take a char and sign-extend into an int.
        !            47:    On machines where char is signed, this is a no-op.  */
        !            48: 
        !            49: #define SIGN_EXTEND_CHAR(c) ((signed char)(c))
        !            50: 
        !            51: /* Now define a symbol for the cpu type, if your compiler
        !            52:    does not define it automatically:
        !            53:    Ones defined so far include vax, m68000, ns16000, pyramid,
        !            54:    orion, tahoe, APOLLO and many others */
        !            55: 
        !            56: #ifndef mips
        !            57: #define mips
        !            58: #endif
        !            59: 
        !            60: #ifndef IRIS_4D
        !            61: #define IRIS_4D
        !            62: #endif
        !            63: 
        !            64: /* Use type int rather than a union, to represent Lisp_Object */
        !            65: /* This is desirable for most machines.  */
        !            66: 
        !            67: #define NO_UNION_TYPE
        !            68: 
        !            69: /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
        !            70:    the 24-bit bit field into an int.  In other words, if bit fields
        !            71:    are always unsigned.
        !            72: 
        !            73:    If you use NO_UNION_TYPE, this flag does not matter.  */
        !            74: 
        !            75: #define EXPLICIT_SIGN_EXTEND
        !            76: 
        !            77: /* Data type of load average, as read out of kmem.  */
        !            78: 
        !            79: #define LOAD_AVE_TYPE long     /* This doesn't quite work on the 4D */
        !            80: 
        !            81: /* Convert that into an integer that is 100 for a load average of 1.0  */
        !            82: 
        !            83: #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / 256.0)
        !            84: 
        !            85: /* s-iris3-6.h uses /vmunix */
        !            86: 
        !            87: #undef KERNEL_FILE
        !            88: #define KERNEL_FILE "/unix"
        !            89: 
        !            90: /* Define CANNOT_DUMP on machines where unexec does not work.
        !            91:    Then the function dump-emacs will not be defined
        !            92:    and temacs will do (load "loadup") automatically unless told otherwise.  */
        !            93: 
        !            94: #undef CANNOT_DUMP
        !            95: 
        !            96: /* Define VIRT_ADDR_VARIES if the virtual addresses of
        !            97:    pure and impure space as loaded can vary, and even their
        !            98:    relative order cannot be relied on.
        !            99: 
        !           100:    Otherwise Emacs assumes that text space precedes data space,
        !           101:    numerically.  */
        !           102: 
        !           103: /* #define VIRT_ADDR_VARIES */
        !           104: 
        !           105: /* Define C_ALLOCA if this machine does not support a true alloca
        !           106:    and the one written in C should be used instead.
        !           107:    Define HAVE_ALLOCA to say that the system provides a properly
        !           108:    working alloca function and it should be used.
        !           109:    Define neither one if an assembler-language alloca
        !           110:    in the file alloca.s should be used.  */
        !           111: 
        !           112: #define C_ALLOCA
        !           113: /* #define HAVE_ALLOCA */
        !           114: 
        !           115: /* Define NO_REMAP if memory segmentation makes it not work well
        !           116:    to change the boundary between the text section and data section
        !           117:    when Emacs is dumped.  If you define this, the preloaded Lisp
        !           118:    code will not be sharable; but that's better than failing completely.  */
        !           119: 
        !           120: #define NO_REMAP
        !           121: 
        !           122: /* This machine requires completely different unexec code
        !           123:    which lives in a separate file.  Specify the file name.  */
        !           124: 
        !           125: #define UNEXEC unexmips.o
        !           126: 
        !           127: /*
        !           128:  * The TEXT_START here is by experiment; the DATA_START is as per the
        !           129:  * manual (Assembly Language Programmers guide).  These values can be
        !           130:  * found at run time from &_ftext and &_fdata, though the C file which
        !           131:  * reads these must be compile with -G 0 (prevent access to those two
        !           132:  * 'variables' using the $gp register).  However, I am lazy and don't
        !           133:  * really want to rewrite unexec.c yet again to use this instead of
        !           134:  * TEXT_START and DATA_START.  The manual indicates that these
        !           135:  * locations are fixed for ZMAGIC files, so I'll be lazy and do it
        !           136:  * this way.  It will probably break as of the next release of the
        !           137:  * IRIS4D, but I've described up above how to find the new values, so
        !           138:  * I won't feel too guilty.  Note that the value returned through
        !           139:  * _ftext is the start of text space (in this case it was 0x400140); I
        !           140:  * presumed that the headers started at 0x400000 and was right.
        !           141:  *
        !           142:  * DATA_SEG_BITS forces that bit to be or'd in with any pointers which
        !           143:  * are trying to access pure strings (as gnu-emacs only allows 24 bits
        !           144:  * for the value field of a LISP_OBJECT).
        !           145:  */
        !           146: 
        !           147: 
        !           148: #define TEXT_START 0x400000
        !           149: #define DATA_START 0x10000000
        !           150: #define DATA_SEG_BITS  0x10000000
        !           151: 
        !           152: #undef LIBS_MACHINE
        !           153: #define LIBS_MACHINE -lPW -lmld
        !           154: #define LIBS_DEBUG
        !           155: 
        !           156: /* Define this if you have a fairly recent system,
        !           157:    in which crt1.o and crt1.n should be used.  */
        !           158: #define HAVE_CRTN
        !           159: 
        !           160: #ifdef HAVE_CRTN
        !           161: /* Must define START-FILES so that the linker can find /usr/lib/crt0.o.  */
        !           162: #define START_FILES pre-crt0.o /usr/lib/crt1.o
        !           163: #define LIB_STANDARD -lbsd -lc /usr/lib/crtn.o
        !           164: #else
        !           165: #define START_FILES pre-crt0.o /usr/lib/crt0.o
        !           166: /* The entry-point label (start of text segment) is `start', not `__start'.  */
        !           167: #define DEFAULT_ENTRY_ADDRESS start
        !           168: #define LIB_STANDARD -lbsd -lc
        !           169: #endif
        !           170: 
        !           171: /* Use terminfo instead of termcap.  */
        !           172: 
        !           173: #define TERMINFO
        !           174: 
        !           175: /* Letter to use in finding device name of first pty,
        !           176:   if system supports pty's.  'a' means it is /dev/ptya0  */
        !           177: 
        !           178: #undef FIRST_PTY_LETTER
        !           179: #define FIRST_PTY_LETTER 'q'
        !           180: 
        !           181: /* Define STACK_DIRECTION for alloca.c */
        !           182: 
        !           183: #define STACK_DIRECTION -1
        !           184: 
        !           185: /* The standard definitions of these macros would work ok,
        !           186:    but these are faster because the constants are short.  */
        !           187: 
        !           188: #define XUINT(a) (((unsigned)(a) << INTBITS-VALBITS) >> INTBITS-VALBITS)
        !           189: 
        !           190: #define XSET(var, type, ptr) \
        !           191:    ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << INTBITS-VALBITS) >> INTBITS-VALBITS))
        !           192: 
        !           193: #define XSETINT(a, b)  XSET(a, XTYPE(a), b)
        !           194: #define XSETUINT(a, b) XSET(a, XTYPE(a), b)
        !           195: #define XSETPNTR(a, b) XSET(a, XTYPE(a), b)
        !           196: 
        !           197: #define XMARKBIT(a) ((a) < 0)
        !           198: #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0))
        !           199: #define XUNMARK(a) ((a) = (((unsigned)(a) << INTBITS-GCTYPEBITS-VALBITS) >> INTBITS-GCTYPEBITS-VALBITS))

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