From 614ca4e0ba7ea33fba3ec967e3de324aa47389bf Mon Sep 17 00:00:00 2001 From: Christophe Rhodes Date: Thu, 20 Sep 2012 19:38:46 +0100 Subject: [PATCH] sort *features*ish variable values for repeatability --- src/code/target-misc.lisp | 3 ++- src/compiler/backend.lisp | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/src/code/target-misc.lisp b/src/code/target-misc.lisp index 365bfaa..5432cae 100644 --- a/src/code/target-misc.lisp +++ b/src/code/target-misc.lisp @@ -136,7 +136,8 @@ ;;; various environment inquiries -(defvar *features* '#.sb-cold:*shebang-features* +(defvar *features* + '#.(sort (copy-list sb-cold:*shebang-features*) #'string<) #!+sb-doc "a list of symbols that describe features provided by the implementation") diff --git a/src/compiler/backend.lisp b/src/compiler/backend.lisp index 4dbb9cb..2d1a88c 100644 --- a/src/compiler/backend.lisp +++ b/src/compiler/backend.lisp @@ -267,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: ;;; -- 1.7.10.4