Changeset 372


Ignore:
Timestamp:
Jan 24, 2004, 3:27:47 PM (21 years ago)
Author:
Gary Byers
Message:

Define target-most-[positive,negative]-fixnum

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/compiler/PPC/PPC32/ppc32-arch.lisp

    r228 r372  
    7979(defconstant charcode-shift (- nbits-in-word ncharcodebits))
    8080(defconstant word-shift 2)
    81 
     81(defconstant target-most-negative-fixnum (ash -1 (1- (- nbits-in-word nfixnumtagbits))))
     82(defconstant target-most-positive-fixnum (1- (ash 1 (1- (- nbits-in-word nfixnumtagbits)))))
    8283
    8384;; PPC-32 stuff and tags.
Note: See TracChangeset for help on using the changeset viewer.