Ignore:
Timestamp:
Apr 14, 2005, 6:15:23 AM (15 years ago)
Author:
gb
Message:

Start moving parameters from "backend" structure to new "target-arch" structure.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/compiler/arch.lisp

    r365 r1094  
    172172(defconstant operand-fake 28)
    173173
     174(defstruct (target-arch (:conc-name target-))
     175  (name nil)
     176  (lisp-node-size 0)
     177  (nil-value 0)
     178  (fixnum-shift 0)
     179  (most-positive-fixnum 0)
     180  (most-negative-fixnum 0)
     181  (misc-data-offset 0)
     182  (misc-dfloat-offset 0)
     183  (nbits-in-word 0)
     184  (ntagbits 0)
     185  (nlisptagbits 0)
     186  (uvector-subtags 0)
     187  (max-64-bit-constant-index 0)
     188  (max-32-bit-constant-index 0)
     189  (max-16-bit-constant-index 0)
     190  (max-8-bit-constant-index 0)
     191  (max-1-bit-constant-index 0)
     192  (word-shift 0))
    174193
    175194(ccl::provide "ARCH")
Note: See TracChangeset for help on using the changeset viewer.