Annotation of 43BSD/contrib/emacs/src/m-sun2.h, revision 1.1.1.1

1.1       root        1: /* m- file for Sun 68000's version 2.
                      2:    Copyright (C) 1985 Richard M. Stallman.
                      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: /* Define how to take a char and sign-extend into an int.
                     36:    On machines where char is signed, this is a no-op.  */
                     37: 
                     38: #define SIGN_EXTEND_CHAR(c) (c)
                     39: 
                     40: /* Say this machine is a 68000 */
                     41: 
                     42: #define m68000
                     43: 
                     44: /* Use type int rather than a union, to represent Lisp_Object */
                     45: 
                     46: #define NO_UNION_TYPE
                     47: 
                     48: /* Sun can't write competant compilers */
                     49: #define COMPILER_REGISTER_BUG
                     50: 
                     51: /* XINT must explicitly sign-extend */
                     52: 
                     53: #define EXPLICIT_SIGN_EXTEND
                     54: 
                     55: /* Data type of load average, as read out of kmem.  */
                     56: 
                     57: #define LOAD_AVE_TYPE long
                     58: 
                     59: /* Convert that into an integer that is 100 for a load average of 1.0  */
                     60: 
                     61: #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE)
                     62: 
                     63: /* Say that this is a Sun 2; must check for and maybe reinitialize
                     64:    the "sky" board.  */
                     65: 
                     66: #define sun2

unix.superglobalmegacorp.com

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