X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fbackend.lisp;h=2d1a88cfcbe149a8a91675ce3cb1ba94a017ef77;hb=bcd323c39d6f5f80020ba4a5d9eb8d348c6cc499;hp=644924628cb26b1d0770c57b6b4fa0b0e6d95665;hpb=c2431e2d0d0222a3cf20cfdfa48201bdcc65cd76;p=sbcl.git

diff --git a/src/compiler/backend.lisp b/src/compiler/backend.lisp
index 6449246..2d1a88c 100644
--- a/src/compiler/backend.lisp
+++ b/src/compiler/backend.lisp
@@ -167,6 +167,8 @@
     ;; from vm.lisp
     immediate-constant-sc
     location-print-name
+    combination-implementation-style
+    boxed-immediate-sc-p
 
     ;; from primtype.lisp
     primitive-type-of
@@ -193,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
@@ -262,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:
 ;;;