X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fbackend.lisp;h=2d1a88cfcbe149a8a91675ce3cb1ba94a017ef77;hb=c712f88b26cd7547ee984b90e18c134401335bc3;hp=aefdae6c0895c33043c1a24e0460e493e2e9f190;hpb=a91c4554a3130bbde7d60fd9b7a128b5c186cb26;p=sbcl.git diff --git a/src/compiler/backend.lisp b/src/compiler/backend.lisp index aefdae6..2d1a88c 100644 --- a/src/compiler/backend.lisp +++ b/src/compiler/backend.lisp @@ -168,6 +168,7 @@ immediate-constant-sc location-print-name combination-implementation-style + boxed-immediate-sc-p ;; from primtype.lisp primitive-type-of @@ -194,6 +195,9 @@ make-dynamic-state-tns make-nlx-entry-arg-start-location + ;; from pred.lisp + convert-conditional-move-p + ;; from support.lisp generate-call-sequence generate-return-sequence @@ -263,7 +267,8 @@ conditionalization. ;;; The default value of NIL means use only unguarded VOPs. The ;;; initial value is customizeable via ;;; customize-backend-subfeatures.lisp -(defvar *backend-subfeatures* '#.sb-cold:*shebang-backend-subfeatures*) +(defvar *backend-subfeatures* + '#.(sort (copy-list sb-cold:*shebang-backend-subfeatures*) #'string<)) ;;; possible *BACKEND-SUBFEATURES* values: ;;;