|
|
1.1 ! root 1: /* m- file for HLH Orion 1/05 (Clipper). ! 2: Copyright (C) 1985 Free Software Foundation, Inc. ! 3: Lee McLoughlin <lmjm%[email protected]> ! 4: ! 5: This file is part of GNU Emacs. ! 6: ! 7: GNU Emacs is distributed in the hope that it will be useful, ! 8: but WITHOUT ANY WARRANTY. No author or distributor ! 9: accepts responsibility to anyone for the consequences of using it ! 10: or for whether it serves any particular purpose or works at all, ! 11: unless he says so in writing. Refer to the GNU Emacs General Public ! 12: License for full details. ! 13: ! 14: Everyone is granted permission to copy, modify and redistribute ! 15: GNU Emacs, but only under the conditions described in the ! 16: GNU Emacs General Public License. A copy of this license is ! 17: supposed to have been given to you along with GNU Emacs so you ! 18: can know your rights and responsibilities. It should be in a ! 19: file named COPYING. Among other things, the copyright notice ! 20: and this notice must be preserved on all copies. */ ! 21: ! 22: ! 23: /* The following three symbols give information on ! 24: the size of various data types. */ ! 25: ! 26: #define SHORTBITS 16 /* Number of bits in a short */ ! 27: ! 28: #define INTBITS 32 /* Number of bits in an int */ ! 29: ! 30: #define LONGBITS 32 /* Number of bits in a long */ ! 31: ! 32: /* Define BIG_ENDIAN iff lowest-numbered byte in a word ! 33: is the most significant byte. */ ! 34: ! 35: #undef BIG_ENDIAN ! 36: ! 37: /* Define NO_ARG_ARRAY if you cannot take the address of the first of a ! 38: * group of arguments and treat it as an array of the arguments. */ ! 39: ! 40: #define NO_ARG_ARRAY ! 41: ! 42: /* Define WORD_MACHINE if addresses and such have ! 43: * to be corrected before they can be used as byte counts. */ ! 44: ! 45: #define SIGN_EXTEND_CHAR(c) ((int)(c)) ! 46: ! 47: /* Use type int rather than a union, to represent Lisp_Object */ ! 48: /* This is desirable for most machines. */ ! 49: ! 50: #define NO_UNION_TYPE ! 51: ! 52: /* Data type of load average, as read out of kmem. */ ! 53: ! 54: #define LOAD_AVE_TYPE double ! 55: ! 56: /* Convert that into an integer that is 100 for a load average of 1.0 */ ! 57: ! 58: #ifndef FSCALE ! 59: #define FSCALE 1.0 ! 60: #endif ! 61: #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) ! 62: ! 63: /* HLH have a SIGWINCH defined (but unimplemented) so we need a sigmask */ ! 64: #ifndef sigmask ! 65: #define sigmask(m) (1 << ((m) - 1)) ! 66: #endif ! 67: ! 68: #define HAVE_ALLOCA ! 69: ! 70: /* Here is where programs actually start running */ ! 71: #define TEXT_START 0x8000 ! 72: #define LD_TEXT_START_ADDR 8000 ! 73: ! 74: /* Arguments to ignore before argc in crt0.c. */ ! 75: #define DUMMIES dummy1, dummy2, ! 76: ! 77: /* dbx can't cope so what the heck - currently (July 88) eval.c causes ! 78: * the compiler to go into an infinite loop - so compile it by hand ! 79: * cc -c -Demacs eval.c ! 80: * before running make ! 81: */ ! 82: #define C_DEBUG_SWITCH -O ! 83: ! 84: /* Since not debugging don't add dbx lib */ ! 85: #define LIBS_DEBUG
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.