Changeset 11295


Ignore:
Timestamp:
Nov 5, 2008, 10:36:23 AM (13 years ago)
Author:
gb
Message:

MAX-n-BIT-CONSTANT-INDEX: define all as ARRAY-TOTAL-SIZE-LIMIT.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/compiler/X86/X8632/x8632-arch.lisp

    r11093 r11295  
    361361(defconstant misc-dfloat-offset ( + misc-header-offset 8))
    362362
    363 (defconstant max-64-bit-constant-index (ash (+ #x7fff x8632::misc-dfloat-offset) -3))
    364 (defconstant max-32-bit-constant-index (ash (+ #x7fff x8632::misc-data-offset) -2))
    365 (defconstant max-16-bit-constant-index (ash (+ #x7fff x8632::misc-data-offset) -1))
    366 (defconstant max-8-bit-constant-index (+ #x7fff x8632::misc-data-offset))
    367 (defconstant max-1-bit-constant-index (ash (+ #x7fff x8632::misc-data-offset) 5))
     363(defconstant max-64-bit-constant-index (ash 1 24))
     364(defconstant max-32-bit-constant-index (ash 1 24))
     365(defconstant max-16-bit-constant-index (ash 1 24))
     366(defconstant max-8-bit-constant-index (ash 1 24))
     367(defconstant max-1-bit-constant-index (ash 1 24))
    368368
    369369)  ;eval-when
Note: See TracChangeset for help on using the changeset viewer.