|
|
1.1 ! root 1: /* m- file for Megatest 68000's. ! 2: Copyright (C) 1985 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: /* 68000 has lowest-numbered byte as most significant */ ! 32: ! 33: #define BIG_ENDIAN ! 34: ! 35: /* XINT must explicitly sign-extend */ ! 36: ! 37: #define EXPLICIT_SIGN_EXTEND ! 38: ! 39: /* Define how to take a char and sign-extend into an int. ! 40: On machines where char is signed, this is a no-op. */ ! 41: ! 42: #define SIGN_EXTEND_CHAR(c) (c) ! 43: ! 44: /* Say this machine is a 68000 */ ! 45: ! 46: #define m68000 ! 47: ! 48: /* Use type int rather than a union, to represent Lisp_Object */ ! 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: #define LOAD_AVE_CVT(x) ((int) ((x) * 100.0))
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.