X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=base-target-features.lisp-expr;h=50b732ebd47abacce9b535583d0776613f90e113;hb=f2db6743b1fadeea9e72cb583d857851c87efcd4;hp=ba12b0d456d4c92d349c669cf71a986bd7b4889c;hpb=dcd86042bba514f5dfc39246de9cdbb030648569;p=sbcl.git diff --git a/base-target-features.lisp-expr b/base-target-features.lisp-expr index ba12b0d..50b732e 100644 --- a/base-target-features.lisp-expr +++ b/base-target-features.lisp-expr @@ -155,6 +155,54 @@ ;; ; :cycle-counter + ;; Enabled automatically for platforms which implement complex arithmetic + ;; VOPs. Such platforms should implement real-complex, complex-real and + ;; complex-complex addition and subtractions (for complex-single-float + ;; and complex-double-float). They should also also implement complex-real + ;; and real-complex multiplication, complex-real division, and + ;; sb!vm::swap-complex, which swaps the real and imaginary parts. + ;; Finally, they should implement conjugate and complex-real, real-complex + ;; and complex-complex CL:= (complex-complex EQL would usually be a good + ;; idea). + ;; + ; :complex-float-vops + + ;; Enabled automatically for platforms which implement VOPs for EQL + ;; of single and double floats. + ;; + ; :float-eql-vops + + ;; Enabled automatically for platform that can implement inline constants. + ;; + ;; Such platform must implement 5 functions, in SB!VM: + ;; * canonicalize-inline-constant: converts a constant descriptor (list) into + ;; a canonical description, to be used as a key in an EQUAL hash table + ;; and to guide the generation of the constant itself. + ;; * inline-constant-value: given a canonical constant descriptor, computes + ;; two values: + ;; 1. A label that will be used to emit the constant (usually a + ;; sb!assem:label) + ;; 2. A value that will be returned to code generators referring to + ;; the constant (on x86oids, an EA object) + ;; * sort-inline-constants: Receives a vector of unique constants; + ;; the car of each entry is the constant descriptor, and the cdr the + ;; corresponding label. Destructively returns a vector of constants + ;; sorted in emission order. It could actually perform arbitrary + ;; modifications to the vector, e.g. to fuse constants of different + ;; size. + ;; * emit-constant-segment-header: receives the vector of sorted constants + ;; and a flag (true iff speed > space). Expected to emit padding + ;; of some sort between the ELSEWHERE segment and the constants, or some + ;; metadata. + ;; * emit-inline-constant: receives a constant descriptor and its associated + ;; label. Emits the constant. + ;; + ;; Implementing this features lets VOP generators use sb!c:register-inline-constant + ;; to get handles (as returned by sb!vm:inline-constant-value) from constant + ;; descriptors. + ;; + ; :inline-constants + ;; Peter Van Eynde's increase-bulletproofness code for CMU CL ;; ;; Some of the code which was #+high-security before the fork has now