comparison src/lisp.h @ 542:2e265ae71eed

[xemacs-hg @ 2001-05-17 09:52:16 by yoshiki] My patch "[PATCH] EMACS_INT_MAX is too big", <87u22s1ffj.fsf@u.sanpo.t.u-tokyo.ac.jp> * lisp.h (EMACS_INT_MAX): This should be one bit less since EMACS_INT is signed.
author yoshiki
date Thu, 17 May 2001 09:52:19 +0000
parents ef4d2466a29c
children 9a775fb11bb7
comparison
equal deleted inserted replaced
541:02261edd09de 542:2e265ae71eed
579 #define GCBITS 2 579 #define GCBITS 2
580 #define INT_GCBITS 1 580 #define INT_GCBITS 1
581 581
582 #define INT_VALBITS (BITS_PER_EMACS_INT - INT_GCBITS) 582 #define INT_VALBITS (BITS_PER_EMACS_INT - INT_GCBITS)
583 #define VALBITS (BITS_PER_EMACS_INT - GCBITS) 583 #define VALBITS (BITS_PER_EMACS_INT - GCBITS)
584 #define EMACS_INT_MAX ((EMACS_INT) ((1UL << INT_VALBITS) -1UL)) 584 #define EMACS_INT_MAX ((EMACS_INT) ((1UL << (INT_VALBITS - 1)) -1UL))
585 #define EMACS_INT_MIN (-(EMACS_INT_MAX) - 1) 585 #define EMACS_INT_MIN (-(EMACS_INT_MAX) - 1)
586 586
587 #ifdef USE_UNION_TYPE 587 #ifdef USE_UNION_TYPE
588 # include "lisp-union.h" 588 # include "lisp-union.h"
589 #else /* !USE_UNION_TYPE */ 589 #else /* !USE_UNION_TYPE */